Sujet Précédent Sujet Suivant

VBA : Inserer un entier dans un string

Résolu/Fermé
bn37 Messages postés 4 Date d'inscription mercredi 10 juin 2009 Statut Membre Dernière intervention 16 juin 2009 - 16 juin 2009 à 10:17
bn37 Messages postés 4 Date d'inscription mercredi 10 juin 2009 Statut Membre Dernière intervention 16 juin 2009 - 16 juin 2009 à 10:29
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

4 réponses

Réponse 1 / 4
le père
16 juin 2009 à 10:26
Bonjour

Il manquait quelques espaces :
DataString(k) = "file://OPTI/geom" & k & ".xls"
1
Réponse 2 / 4
chossette9 Messages postés 4239 Date d'inscription lundi 20 avril 2009 Statut Contributeur Dernière intervention 12 septembre 2014 1 306
16 juin 2009 à 10:19
Bonjour,

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


Voilà.

Cordialement.
0
Réponse 3 / 4
bn37 Messages postés 4 Date d'inscription mercredi 10 juin 2009 Statut Membre Dernière intervention 16 juin 2009
16 juin 2009 à 10:23
Apparament VBA me dit que ce n'est pas la bonne syntaxe. As tu une autre idée ?
0
Réponse 4 / 4
bn37 Messages postés 4 Date d'inscription mercredi 10 juin 2009 Statut Membre Dernière intervention 16 juin 2009
16 juin 2009 à 10:29
effectivement la ca marche.
Merci beaucoup !
0

Discussions similaires

"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses
VBA : Range avec références variables..
Antoine -
MIKE59 -

7 réponses
VBA erreur 1004
séverine -
Floroan -

9 réponses
ouverture d'un fichier excel à partir d'un code VBA
TraderAS -
pijaku -

3 réponses
Méthode find dans VBA - Recherche de données sous Excel
baissaoui -
baissaoui -

0 réponse