Copie redondante d'une feuille à une autre [Résolu]

Messages postés
2
Date d'inscription
jeudi 6 juin 2019
Statut
Membre
Dernière intervention
6 juin 2019
- - Dernière réponse : vb95
Messages postés
1946
Date d'inscription
samedi 11 janvier 2014
Statut
Contributeur
Dernière intervention
6 octobre 2019
- 6 juin 2019 à 15:49
Bonjour,

Je suis en train de construire une macro permettant de mettre en forme un fichier d'import de données. Les données sources sont sur la feuille "MATRICE" et elle doivent être importées dans la feuille "FICHIER".
J'arrive à faire cette opération en mettant l'adresse des cellules "en dur" mais lorsque je tente d'automatiser cela pour l'inclure dans une boucle "FOR", cela ne fonctionne pas... Pourtant j'ai déjà utiliser ce genre de manipulation dans d'autres macro...

Voici mon code :

Sub Generation_Import()
Dim i As Integer
Dim j As Integer

For i = 2 To 10
If Worksheets("MATRICE").Range(A & i).Value <> "" Then
For j = 17 To 50
Worksheets("FICHIER").Range(A & j).Value = "VV"
Worksheets("FICHIER").Range(B & j).Value = "EMBAUCHE"
Worksheets("FICHIER").Range(C & j).Value = ""
Worksheets("FICHIER").Range(D & j).Value = Worksheets("MATRICE").Range(B & i).Value
Worksheets("FICHIER").Range(E & j).Value = "?"
Next
End If
Next

End Sub


Apparemment ce serait les expressions du type "Range(A & i).Value" qui ne lui plaisent pas... si je mets par exemple "Range("A2").Value" cela fonctionne...

Pourriez-vous m'aider ?

Cordialement,
Casado
Afficher la suite 

2 réponses

Messages postés
2
Date d'inscription
jeudi 6 juin 2019
Statut
Membre
Dernière intervention
6 juin 2019
0
Merci
Salut,

Bon je m'auto-réponds... j'avais oublié les guillemets encadrant les lettres A,B,C,D...

Quel boulet... :)

@+
Commenter la réponse de casado86
Messages postés
1946
Date d'inscription
samedi 11 janvier 2014
Statut
Contributeur
Dernière intervention
6 octobre 2019
68
0
Merci
Bonjour
Tu n'es pas le seul à avoir fait des erreurs de ce genre rassures-toi
Je me suis permis de mettre ton post en Résolu ( avec la roue dentée en haut à droite de ton premier message )
Penses-y la prochaine fois !
Merci

Commenter la réponse de vb95