[VBA] - Compter le nombre d'espaces

Bonsoir,

Ça fait 2 heures que j’essaie toutes les solutions que je trouve sur internet pour compter le nombre d'espace dans chaque cellule d'une plage de donnée. J'ai un mal fou à travailler avec les chaînes de caractères !

L'idée est de compter le nombre d'espaces de chaque cellule d'une plage et de supprimer la ligne lorsque le nombre d'espaces est inférieur à 3.

Vous auriez quelques chose comme ça dans vos chapeaux ?

Bonne soirée !

A plus tard.

Bonjour,

Est-ce que tu as lu : https://forum.excel-pratique.com/viewtopic.php?t=16314

ric

Bonsoir,

Oui, mais je n'ai eu de resultat que pour la première ligne. Et quand j'essaie de faire la recherche sur chaque ligne, j'ai une erreurn.

bonjour,

Le problème avec cette question, c'est les caractères retour ligne (RL) = Chr(10) : Est-ce qu'il y en a ou pas ?

Un retour ligne ne nécessite pas d'espace cependant dans certain texte on arrive à en trouver avant ou après (parfois avant ET après !) A+

[EDIT] Dans cet exemple, il y a les RL qui compliquent le problème... sinon on peut se servir de ce système pour compter les espaces (ici colonne 2)

Super ! Merci beaucoup

J'ai adapté le code comme suit :

    lran = an.Cells(Rows.count, 1).End(xlUp).Row
    lcan = an.Cells(1, an.Columns.count).End(xlToLeft).Column

Dim b%
With an
    For i = 2 To lran
        b = UBound(Split(.Cells(i, 2)))
            If b < 3 Then
                .Cells(i, 2).EntireRow.Delete
            End If
    Next i
End With

Et tout semble s'exécuter correctement pour le moment.

Bonne soirée