Copier données d'une feuille dans un classeur donné.

Copier données d'une feuille dans un classeur donné. - VB/VBA/VBS - Programmation

Marsh Posté le 22-07-2009 à 10:06:33    

Bonjour,  
 
Je souhaite inserer (copier coller) par bouton macro et uniquement par un bouton, les données contenues dans un classeur "mono onglet" (que je nomme "FichierACopier", dans une feuille d'un fichier (que j'apelle "FichierDestinataire" ).  
 
Remarque le collage doit se faire à partir de la cellulle A10 !  
 
Cf. Code développé dans la pièce jointe s'il vous plait.  
 
En fait, excel me copie toujours les donnée du fichier ouvert (celui où j'execute la macro)  
 
Je n'arrive pas à lui dire de copier les données du fichier "fichier à copier". voir les pièce jointe s'il vous plait.  
 
http://cjoint.com/?hwkhupasbt
 
 
J'y suis presque j'ai juste un bug que je n'arrive pas à resoudre !!  
 
Merci à vous mille et une fois  
 
@+


Message édité par shmider le 22-07-2009 à 10:07:44
Reply

Marsh Posté le 22-07-2009 à 10:06:33   

Reply

Marsh Posté le 22-07-2009 à 15:13:08    

Bonjour
 
Une piece jointe comme ca, a mon avis on va pas etre bcp a l'ouvrir... En tout cas, moi non.
 
Il serait plus judicieux de mettre ton code qui foire ici...
 
Sinon pour atteindre l'autre fichier, ouvert, il faut passer par :
WorkBooks("NomDeTonFichier" ).WorkSheets("NomDeTaFeuille" ) etc.
 
Cordialement


Message édité par SuppotDeSaTante le 22-07-2009 à 15:15:31

---------------
Soyez malin, louez entre voisins !
Reply

Marsh Posté le 24-07-2009 à 14:25:47    

Bonjour,
 
shmider a raison, tu devrais copier ton code directement.
Essaye ceci, en esperant que ça t'aidera... J'ai mis "A1:Z255" car j'ignore quelle est la plage de cellule que tu veux copier...
 

Code :
  1. private sub TonBouton_click()
  2. workbooks("FichierACopier.xls" ).sheets("nom_de_la_feuille" ).range("A1:Z255" ).copy ( workbooks("FichierDestinataire.xls" ).sheets("nom_de_la_feuille" ).range("A10" )
  3. end sub


---------------
Si Le Travail C'est La Santé, Donnez Le Mien A Quelqu'un De Malade
Reply

Marsh Posté le 24-07-2009 à 17:35:50    

Bonjour à vous ;)  
 
 Merci beaucoup pour vos réponses pertinentes.  
 
 C'est bon c'est résolu ;)  
 
 @+

Reply

Sujets relatifs:

Leave a Replay

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