Bonsoir
Question que je me pose avec le split?

Montablo(1,1)="17-5-3-8-9-65-10-23"
Maintenant j'aimerai sortir les 4 premieres valeurs comme cela "17-5-3-8"

J'ai pas trouver plus simple....

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
Sub test
Dim Tablo()
dim TxtRecup5premier as string
 
Redim Tablo(1,10,1 to 10)
Tablo(1,1)="17-5-3-8-9-65-10-23"
TxtRecup5premier=Split(Tablo(1, 1), "-")(0) & "-" & Split(Tablo(1, 1), "-")(1) & "-" & Split(Tablo(1, 2), "-")(1) & "-" & Split(Tablo(1, 1), "-")(3) 
 
end sub
Merci pour votre aide