Discussion :

[johannj]

Bonjour à tous,

J'utilise un fonction Split pour "découper" le nom d'un fichier. Cette fonction renvoie un tableau à une dimension. J'aimerai savoir comment connaitre le nombre de colonne du tableau retourné: en effet, le tableau peut comporter 3 ou 4 colonnes en fonction du nom du fichier, et j'ai besoin du mettre une condition "if" si le tableau à 4 colonnes.

Si je ne suis pas très clair, merci de me le dire.

Johann

[laetitia]

bonjour johannj le forum tu peus zipper un exemple
si ton tableau demarre en a1 en cherchant la derniere colomns non vide peut etre !!!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Option Explicit
Sub test()
Dim c As Byte
c = Cells.Find("*", , , , , xlPrevious).Column
If c = 4 Then MsgBox "ton code" Else MsgBox "autre code"
End Sub

salutations

[ouskel'n'or]

Tablo = Split(LaPhrase, " ")
Nb = Ubound(Tablo) donne le nombre d'indices de ton tableau moins 1
Dans cet exemple, si ta phrase ne comporte pas d'espace avant le premier mot, alors ce mot aura l'incice 0 et le nombre de mots dans ta phrase sera de Nb + 1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sib test()
Dim Laphrase$, i%, Tablo As Variant
    Laphrase = "C:\Documents and Settings\User\Mes documents\Mes images\Album photos\Egypte\Karnak"
    Tablo = split(Laphrase, "\")
    for i = 0 To Ubound(Tablo)
        msgbox Tablo(i)
    next
End sub

Bonne journée

Edit
Tu ne dois pas être très clair dans ton explication puisque laetitia et moi n'avons pas compris la même chose.
Donne un exemple de nom de fichier.

[johannj]

Merci à tous les deux,

Je viens de découvrir "UBound" et l'ai déjà appliqué avec succès.
Peut etre dois je un peu plus "fouiner" avant de poser des questions...

Merci de votre aide,

Johann