VBA : Inserer un entier dans un string

Résolu
bn37 Messages postés 5 Statut Membre -  
bn37 Messages postés 5 Statut Membre -
Bonjour,
je cherche à créer 200 fichiers portant les noms geom1.xls geom2.xls ect...
Mais, je ne sais pas comment intégrer à ma chaine de caractère un entier provenant de ma boucle.

Voici ma boucle :
For k = 0 To 200
Dim DataString(200) As String
DataString(k) = "file://OPTI/geomk.xls"
Next k

Merci d'avance
Configuration: Windows XP Internet Explorer 7.0

4 réponses

  1. le père
     
    Bonjour

    Il manquait quelques espaces :
    DataString(k) = "file://OPTI/geom" & k & ".xls"
    1
  2. chossette9 Messages postés 6855 Date d'inscription   Statut Contributeur Dernière intervention   1 313
     
    Bonjour,

    tu devrais remplacer
    DataString(k) = "file://OPTI/geomk.xls" 
    par :
    DataString(k) = "file://OPTI/geom"&k&".xls"


    Voilà.

    Cordialement.
    0
  3. bn37 Messages postés 5 Statut Membre
     
    Apparament VBA me dit que ce n'est pas la bonne syntaxe. As tu une autre idée ?
    0
  4. bn37 Messages postés 5 Statut Membre
     
    effectivement la ca marche.
    Merci beaucoup !
    0