Bonjour à tous,
Je cherche un moyen de déterminer le nombre de lignes d'un TextBox que remplit une variable String (ou Mémo) sachant que dans le String il peut y avoir un ou plusieurs retours à la ligne (vbCrLf).
Merci de vos aides.
Cordialement,
Bonjour à tous,
Je cherche un moyen de déterminer le nombre de lignes d'un TextBox que remplit une variable String (ou Mémo) sachant que dans le String il peut y avoir un ou plusieurs retours à la ligne (vbCrLf).
Merci de vos aides.
Cordialement,
Bonsoir,
En cherchant un peu j'ai trouvé.
J'ai remplacé le Textbox traditionnel par un Textbox de l'ActiveX de Microsoft Forms et j'ai utilisé la propriété : ".LineCount".
@+
Bonjour
Voilà par exemple une fonction qui permet de détecter les retours à la ligne et donc te renvoies le nombre de lignes.
Il y a sûrement mieux, mais c'est une première approche à tester dans ton contexte.
Philippe
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 Public Function NbrLignesMemo(strChaine As String) As Integer ' déclaration d'un tableau Dim tabQte() As String ' on remplit le tableau tabQte = Split(strChaine, Chr(13)) ' récupération du nombre de ligne If LBound(tabQte()) = 0 Then NbrLignesMemo = UBound(tabQte()) + 1 Else NbrLignesMemo = UBound(tabQte()) End If End Function
Bonjour,
Effectivement le TextBox ne permet pas de compter ses lignes.
Peut-être ce code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 Dim s() As String s = Split( Me!TextBox , vbcrlf) NbLignes = Ubound(s) + 1
Philippe et helas, je vous remercie pour vos réponses mais cela ne permet de trouver le nombres de lignes inscrites dans le TextBox pour une chaine de longueur > à la largeur du controle. Les retours à la ligne se font directement sans ajout de symboles dans la chaine.
Tant pis c'est pas grave, avec ActiveX Forms je règle mon problème !
Merci quand même.
@+
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager