Copier des données de classeurs Excel fermés vers un classeur ouvert

Copier des données de classeurs Excel fermés vers un classeur ouvert - VB/VBA/VBS - Programmation

Marsh Posté le 10-03-2008 à 13:02:50    

Bonjour,
 
Je débute sous VBA Excel et je rencontre quelques difficultés
 
Je cherche à faire une macro qui me permette de prendre d'aller chercher dans un classeur fermé une plage de données pour la copier dans le classeur à partir duquel j'exécute ma macro.
Pour ce faire, j'ai fait :
 

Code :
  1. Sub copieTCL_BD(nomFichier As String, i As Integer)
  2.     'Classeur fermé
  3.     Windows(nomFicher).Activate
  4.     Application.CutCopyMode = False
  5.     Sheets("BD" ).Range("C2:EP2" ).Copy
  6.     'Classeur ouvert
  7.     Windows("TBD_ConsolidationTotale.xls" ).Activate
  8.     Sheets("BD" ).Range("D" & i).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
  9.         :=False, Transpose:=False
  10.    
  11. End Sub


 
Mais cela ne fonctionne pas
 
Le Windows().Activate ne fonctionne pas faut-il que mon fichier soit ouvert? Faut-il obligatoirement reprendre le nom du fichier complet (avec nom du chemin
Le nomFichier ressemble à "TBD_TLC_Prenom-Nom_DateJour.xls"
 
Je sais que ce sujet a déjà été abordé, mais je n'ai pas tout saisi, et surtout je cherche une solution la plus simple possible
 
Merci par avance de votre aide

Reply

Marsh Posté le 10-03-2008 à 13:02:50   

Reply

Marsh Posté le 10-03-2008 à 16:41:53    

Jour Bon, consulter http://support.microsoft.com/kb/257819
ainsi que http://silkyroad.developpez.com/VBA/ClasseursFermes/


Message édité par kiki29 le 10-03-2008 à 16:45:22
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed