Microsoft 365 Affichage resultat recherche dans textbox

[mfb]

Bonjour à Tous.
J'ai 1 Usf de recherche qui fonctionne et affiche le ou les résultats dans une textbox.
Si l'objet recherché se situe dans une cellule comportant 2 lignes ces 2 lignes s'affichent
avec un symbole séparateur.
Est-il possible de supprimer ce symbole et d'afficher, dans la textbox,
chacune des lignes dans une colonne séparée tout en conservant les références de la cellule.
A dispo pour + info
Par avance merci
Daniel

 

[jmfmarques]

Bonjour

Est-il possible de supprimer ce symbole et d'afficher, dans la textbox,
chacune des lignes dans une colonne séparée

une textbox n'a pas de colonnes

 

[mfb]

Re,
Excuses,
Mes doigts ont fourchés il faut lire listbox et NON TextBox.
merci pour la remarque
A+
Daniel

 

[jmfmarques]

C'est alors simple :
la fonction split, utilisée avec le séparateur chr(10), donne un array dont chaque article est l'une des lignes de la cellule concernée
Il suffit alors d'utiliser chaque article de cet array pour abonder la colonne correspondante de la listbox.
Commence sur ces bases et reviens avec ce ainsi tenté si encore en difficulté.

 

[mfb]

C'est alors simple :
la fonction split, utilisée avec le séparateur chr(10), donne un array dont chaque article est l'une des lignes de la cellule concernée
Il suffit alors d'utiliser chaque article de cet array pour abonder la colonne correspondante de la listbox.
Commence sur ces bases et reviens avec ce ainsi tenté si encore en difficulté.

 

[mfb]

Re,
Mes connaissances en VBA sont limitées (très).
je n'ai jamais manipulé la fonction split.
Après déduction de ce que j'ai vu sur le forum cela doit servir à transformer ou remplacer du genre x = Slpit(Replace???)
Mais je suis désolé je ne sais ni le formuler encore moins l'utiliser.
Alors ... un petit coup de main serait le bien venu
Merci
Daniel

 

[jmfmarques]

je n'ai jamais manipulé la fonction split.
Après déduction de ce que j'ai vu sur le forum cela doit servir à transformer ou remplacer du genre x = Slpit(Replace???)

et si tu utilisais plutôt ton aide vba interne ?
Tu apprendrais déjà ceci :
Renvoie un Lien supprimé de base zéro à une dimension contenant le nombre spécifié de sous-chaînes.
Syntaxe
Split(expression[, delimiter[, limit[, compare]]])
La syntaxe de la fonction Split comprend les Lien supprimé suivants :

Élément	Description
expression	Lien supprimé contenant des sous-chaînes et des séparateurs. Si l'argument expression est une chaîne de longueur nulle (""), la fonction Split renvoie un tableau vide, c'est-à-dire un tableau ne comportant ni éléments, ni données.
delimiter	Facultatif. Caractère de chaîne utilisé pour identifier les limites de sous-chaîne. S'il est omis, le caractère espace (" ") est utilisé comme séparateur par défaut. Si l'argument delimiter est une chaîne de longueur nulle, un tableau à un élément contenant toute la chaîne expression est renvoyé.

et parce-que tu veux (non ?° apprendre, tu essaierais par exemple ceci :

toto  = "voilà un exemple # où le séparateur est le signe dièse"
titi = split(toto,"#)
msgbox titi(0)
msgbox titi(1)

dans cet exemple , le séparateur est "#". IL est chr(10) dans une cellule répartie sur deux lignes.
Tu t'y mets ? (au moins un peu, hein ...)

 

[mfb]

Bonjour à Tous,
Les pistes fournies par jmf ont fini par porter leurs fruits.
Le pb est résolu c'est peut etre pas très excellien mais cela me convient.
j' ai utilsé substitute au lieu de replace et posé des tirets entre les mots au lieu Split.
Cela était + simple pour le béotien que je suis.
Alors un GRAND MERCI à jmf.
Si je rencontre un pb avec tout ça je me permettrai de revenir.
Bonne soirée
A+
Daniel