Declaration d'un array grace a UBound

Question

Bonjour !

J'ai un array de string d'une certaine taille, et j'aimerai declarer un array d'entier de la meme taille

cptmot est mon array d'entier a declarer
tabmot est mon tableau de string deja declare

cptmot=tabmot va me typer cptmot en string, ce que je ne veux pas, je fais donc 
cptmot(UBound(tabmot))
sauf que j'ai une erreur, UBound ne retourne pas un entier ;ais un subscript (index?) apparemment.

Comment puis-je le convertir en int ? ou si vous avez une autre solution ...

Merci d'avance, et desole pour certaines fautes probables, je suis sur un qwerty ...

cs_JMO · Answer

Bonsoir,

En utilisant l'instruction ReDim.




Dim arrStr, arrInt()
arrString = Array("123,45","678","4,125")
ReDim arrInt(UBound(arrString))

For i=0 To UBound(arrString)
    MsgBox TypeName(arrString(i)) & vbCrLf & arrString(i),,"arrString " & i
    arrInt(i) = CDbl(arrString(i))
    MsgBox TypeName(arrInt(i)) & vbCrLf & arrInt(i),,"arrDouble " & i
Next



jean-marc

Declaration d'un array grace a UBound

1 réponse

Votre réponse

Discussions similaires