fonction split inconnue ? [vba] - VB/VBA/VBS - Programmation
Marsh Posté le 19-06-2004 à 19:47:51
ben si tu défini tabl() comme un tableau et qu'ensuite tu assignes ton Split(chaine, ":" ) à tabl tout court ça doit pas marcher.
T'as essayé de virer les () dans ta déclaration de tabl ou alors de faire tabl(0) = Split(chaine, ":" ) ?
Marsh Posté le 19-06-2004 à 20:09:25
Glod 2 a écrit : ben si tu défini tabl() comme un tableau et qu'ensuite tu assignes ton Split(chaine, ":" ) à tabl tout court ça doit pas marcher. |
j'ai essayer, c'est comme si le compilateur ne reconnait pas la fonction split.
voici un exemple complet qui ne marche PAS
Private Sub CommandButton1_Click()
Dim chn As String
chn = " mixed:colsed"
Dim tabl As String
tabl = Split(ch, ":" )
MsgBox (tabl(0))
End Sub
Marsh Posté le 19-06-2004 à 20:42:50
je me demande si j'ai pas un problème de bibliotheque ...
même cet exemple tiré du site de microsoft ne fonctionne pas :
Private Sub CommandButton2_Click()
Dim MyString, MyArray, Msg
MyString = "VBScriptXisXfun!"
MyArray = Split(MyString, "x", -1, 1)
Msg = MyArray(0) & " " & MyArray(1)
Msg = Msg & " " & MyArray(2)
MsgBox Msg
End Sub
ça cale à chaque fois sur la fonction split (inconue)
Marsh Posté le 19-06-2004 à 20:59:33
c'est pas plutôt le paramètre qui ne contiendrait pas ce que Split attend? (une chaîne)
Split est une fonction standard donc la question de sa disponibilité ne se pose pas.
Marsh Posté le 19-06-2004 à 21:09:03
drasche a écrit : c'est pas plutôt le paramètre qui ne contiendrait pas ce que Split attend? (une chaîne) |
moi je veux bien mais quand je prends l'expmple texto du tutorial microsoft :
Private Sub CommandButton2_Click()
Dim MyString, MyArray, Msg
MyString = "VBScriptXisXfun!"
MyArray = Split(MyString, "x", -1, 1)
Msg = MyArray(0) & " " & MyArray(1)
Msg = Msg & " " & MyArray(2)
MsgBox Msg
End Sub
et que j'ai le même message d'erreur je me pose des quetions
Marsh Posté le 21-06-2004 à 02:14:52
tu bosses sous office 95 ?
Marsh Posté le 21-06-2004 à 10:49:34
Regarde ici http://forum.hardware.fr/forum2.ph [...] subcat=396
J'ai mis un exemple d'utilisation de split
Cette fonction n'existe pas sous Office97 et antérieur
Marsh Posté le 21-06-2004 à 10:58:08
tegu à écrit "Cette fonction n'existe pas sous Office97 et antérieur"
y'a t'il moyen de la rajouter sur office 97
Marsh Posté le 21-06-2004 à 11:35:01
Il te reste à regarder ici où j'ai donné à la fin le code pour simuler la fonction Split()
http://forum.hardware.fr/forum2.ph [...] =0&subcat=
Marsh Posté le 21-06-2004 à 11:42:55
startx25 a écrit : tegu à écrit "Cette fonction n'existe pas sous Office97 et antérieur" |
tu peux la programmer toi même en utilisant les fonctions mid et InStr (quoi que je ne sais pas si ça existe sous office97)
Marsh Posté le 19-06-2004 à 19:35:27
voilà un code simple :
j'ai une erreur sur la deuxième ligne "erreur de compilation sub ou fonction non défini) pourtant la fonction split existe !!!
Dim tabl() As String
tabl = Split(chaine, ":" )
MsgBox (tabl(0))