[Résolu] Extraction données d'une cellule

Discussions à propos du tableur Calc.
Les questions sur les macros doivent être postées dans la section dédiée en dessous.

Modérateur : Vilains modOOs

Règles du forum
Cette section est uniquement dédiée au tableur Calc. Vous ne devez pas poster ici de questions sur les macros mais utiliser la section éponyme.
Renaud-Noumea
Fraîchement OOthentifié
Messages : 4
Inscription : 29 sept. 2021 09:45

[Résolu] Extraction données d'une cellule

Message par Renaud-Noumea »

Bonjour à tous,

Je suis nouveau sur le forum donc d'abord Bonjour à tous !
et me permets de faire appel à vos lumières.
J'ai un besoin certainement simple pour vous, mais pas si facile pour moi.

J'ai un fichier dans lequel des cellules d'une même colonne ont des données types (exemple pour une cellule disons A1) : [3917]+[4009]+[4010]+[4011]+[7308]+[8413]+[8426]+[8427]+[842
8]+[8429]+[8430]+[8431]-[843110]+[87]+[8802]+[8803]+[8805]

J'aimerais extraire ces données dans une autre colonne, ou dans un autre feuillet (peu importe) pour avoir le résultat suivant

3917
4009
4010
4011
7308
etc...

C'est à dire que j'aimerais avoir un résultat par ligne sur une même colonne. (par exemple en B2, B3, B4 etc... ou en A1, A2 etc.. sur un autre feuillet)

Si vous avons quelque chose à me proposer, merci d'avance et bonne journée !

Renaud.
Vous ne pouvez pas consulter les pièces jointes insérées à ce message.
Dernière modification par Renaud-Noumea le 29 sept. 2021 10:29, modifié 1 fois.
Open Office 4.1.10 - Windows 10
Avatar de l’utilisateur
micmac
RespOOnsable forum
RespOOnsable forum
Messages : 9255
Inscription : 28 août 2010 08:45

Re: Extraction données d'une cellule

Message par micmac »

Bonjour et bienvenue,

Image
Comment joindre un fichier au format ODF
Veillez également à dépersonnaliser votre fichier.
Donnez un nom clair à ce fichier. Evitez "essai" et autres "test" dont nos tiroirs débordent...
Dans votre signature il y a écrit :Open Office 4.1.7 - Windows 10
Cette version de OpenOffice est obsolète.
Si c'est une obligation ou un choix mentionnez-le dans votre signature.

Afin de profiter des dernières améliorations, il est fortement recommandé d'être à jour de la dernière version officielle.
Accès direct à votre signature pour la corriger.
Touche Ctrl de Windows = touche cmd⌘ sur Mac
Outils > Options sur Windows = OpenOffice > Préférences sur Mac
Renaud-Noumea
Fraîchement OOthentifié
Messages : 4
Inscription : 29 sept. 2021 09:45

Re: Extraction données d'une cellule

Message par Renaud-Noumea »

Bonjour et merci.
J'ai joins le fichier à mon premier message et j'ai mis à jour Open Office avec la dernière version.
Bonne journée à vous.
Renaud.
Open Office 4.1.10 - Windows 10
Avatar de l’utilisateur
Jean-Louis Cadeillan
GourOOu
GourOOu
Messages : 5753
Inscription : 02 janv. 2009 23:56

Re: Extraction données d'une cellule

Message par Jean-Louis Cadeillan »

Bonjour,
Si la chaîne de texte est en A1, tu peux utiliser cette formule :

Code : Tout sélectionner

=STXT(A$1;TROUVE("²";SUBSTITUE(A$1;"[";"²";LIGNE(A1)))+1;TROUVE("²";SUBSTITUE(A$1;"]";"²";LIGNE(A1)))-TROUVE("²";SUBSTITUE(A$1;"[";"²";LIGNE(A1)))-1)
puis la dérouler vers le bas ; il faudrait ajouter un contrôle d'erreur lorsque la formule extrait au-delà de la chaîne…
Cordialement,
Jean-Louis
LibO 7.6.6.3 (x64 avec Java 1.8.0_411) et AOO 4.1.15 (avec Java x32 1.8.0_381), Windows 7 Édition Intégrale 64 SP1
Renaud-Noumea
Fraîchement OOthentifié
Messages : 4
Inscription : 29 sept. 2021 09:45

Re: Extraction données d'une cellule

Message par Renaud-Noumea »

Bonjour et merci beaucoup pour votre réponse !
Bonne journée !
Renaud.
Open Office 4.1.10 - Windows 10
Avatar de l’utilisateur
Jean-Louis Cadeillan
GourOOu
GourOOu
Messages : 5753
Inscription : 02 janv. 2009 23:56

Re: Extraction données d'une cellule

Message par Jean-Louis Cadeillan »

Bonjour,
Un petit complément à propos du contrôle d'erreur. On pourrait bien sûr utiliser la fonction ESTERR() sous AOO ou SIERREUR() sous LibO, mais ici, il suffit de comptabiliser le nombre de crochets ouvrants (donc de nombres) et de le comparer au n° de ligne en cours :

Code : Tout sélectionner

=SI(LIGNE(A1)<=(NBCAR(A$1)-NBCAR(SUBSTITUE(A$1;"[";"")));STXT(A$1;TROUVE("²";SUBSTITUE(A$1;"[";"²";LIGNE(A1)))+1;TROUVE("²";SUBSTITUE(A$1;"]";"²";LIGNE(A1)))-TROUVE("²";SUBSTITUE(A$1;"[";"²";LIGNE(A1)))-1);"")
Ce qui allonge la formule… mais pas trop.
Ainsi, après le dernier nombre extrait, les cellules n'affichent plus rien.
Cordialement,
Jean-Louis
LibO 7.6.6.3 (x64 avec Java 1.8.0_411) et AOO 4.1.15 (avec Java x32 1.8.0_381), Windows 7 Édition Intégrale 64 SP1
Renaud-Noumea
Fraîchement OOthentifié
Messages : 4
Inscription : 29 sept. 2021 09:45

Re: Extraction données d'une cellule

Message par Renaud-Noumea »

Merci Beaucoup à vous Jean-Louis.
Bonne journée.
Renaud.
Open Office 4.1.10 - Windows 10