Tout est dans le titre, ou presque.
Je recupere des données de 4 fichiers que je souhaite regrouper dans un seul fichier, afin de sortir un indicateur valable.
Qu'est ce qui ne va pas dans mon langage vba suivant?
'
Range("A1").Select
ActiveSheet.Paste
Range("A17").Select
ActiveSheet.Paste
Range("I1").Select
End Sub
(dans ce cas mon vba ne s'applique qu'à 2 fichier, c etait pour faire un test).
Les fichiers vont se nommer 1- Manu.xls 2- Henry.xls 3-Alex.xls etc...
En fait, quand je fais tourner ma macro, elle fonctionne, mais elle me copie 2 fois les memes données, au lieu de 2 fois des données differentes...
Re : macro pour copier/coller des données depuis plusieurs classeurs vers un seul cla
Bonjour Manu,
En fait dans ta macro avant copie des cellules il vaut mieux specifier la feuille du classeur d'origine et du classeur destination.
Admettons que tu appelle la macro à partir du classeur destination nommé
Code:
dim shDest as Worksheet.Sheets(1)
set shDest=ThisWorkbook
set WK2= Worbooks("Manu.xls")
WK2.Sheets("LeNomDeLaFeuille").Range(LaPlage).Copy Destination:=ShDest.Range(laPlageDestination)
Et voilà le tour est joué sans avoir à sélectionner les différentes feuilles et plage de cellules.
En fait dans ta macro avant copie des cellules il vaut mieux specifier la feuille du classeur d'origine et du classeur destination.
Admettons que tu appelle la macro à partir du classeur destination nommé
Code:
dim shDest=Worksheet
set shDest=ThisWorkbook
set WK2= Worbooks("Manu.xls")
WK2.Sheets("LeNomDeLaFeuille").Range(LaPlage).Copy Destination:=ShDest.Range(laPlageDestination)
Et voilà le tour est joué sans avoir à sélectionner les différentes feuilles et plage de cellules.
Re : macro pour copier/coller des données depuis plusieurs classeurs vers un seul cla
Re bonjour,
Excuses moi j'ai supposé que tu connaissait un peu VBA.
Pour pouvoir t'aider alors, il faudrait plus d'informations sur les données à copier: dans quelles cellules elles sont et où les coller ( dans quelles cellules)
Re : macro pour copier/coller des données depuis plusieurs classeurs vers un seul cla
Je vais tester cela
Si je veux le faire poru 4 fichiers excel, je recopie la meme ligne 4 fois, en changeant les noms n'est ce pas?
En fait je pensais connaitre un minimum le vba, mais je me rends compte que vraiment le strict minimum, mais pas assez pour etre à l'aise et autonome.
J ai regardé la formation sur boisgontier jacques.free.fr, j'ai trouvé qq infos, existe t'il un site vraiment top pour apprendre le vba d'une bonne maniere?
Re : macro pour copier/coller des données depuis plusieurs classeurs vers un seul cla
Re bonjour,
Le site de boisgontier est un excellent site. Tu trouveras en faisant une recherche sur google différents site d'apprentissage qui offrent chacun des spécificités particulières. Pour avoir un bon debut de programmation VBA sur excel je ne saurais que trop te conseiller l'excellent livre:
Excel 2002 et VBA 'le guide du développeur'
de John Walkenback chez OEM
Sinon pour ta question c'est oui, il suffit de changer les noms du classeur des destination et la cellule de destination "A1" >> "A2" >>"A3" etc....
Où NomDeLaFeuille est le nom de la feuille qui contient les données à copier.
Dans la hiérarchie des Objets VBA on parle:
1- du Classeur
2- de la feuille
3- de la cellule
Et ceci pour l'origine de la copie et la destination si la destination est dans un autre classeur.
Si c'est dans le même classeur on passe l'étape WorkBooks("Machin")
Si c'est sur la même feuille on passe aussi l'étape Sheets("Truc")
Re : macro pour copier/coller des données depuis plusieurs classeurs vers un seul cla
J'ai le message d'erreur :
Erreur de compilation "Attendu séparateur de liste ou )"
sur le code :
Sub Macro3()
'
' Macro3 Macro
' Manu
'
WorkBooks("Philippe.xls").Sheets("saisie P").Range("B2:C16).Copy Destination:= Workbooks("Suivi.xls").Sheets("Feuil1").Range("A1")
'
Range("C11").Select
End Sub
Je cherche à coté à quoi correspond ce code erreur.
Merci encore