Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1453 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [Résolu]Copie d'une cellule d'un fichier à l'autre

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[Résolu]Copie d'une cellule d'un fichier à l'autre

n°2130404
StefaNouF
Posté le 08-03-2012 à 17:38:24  profilanswer
 

Bonjour  :hello:  
 
J'ai fait pas mal de recherche, j'ai trouvé plein d'explication sur la marche à suivre pour cette simple opération, mais toujours pas moyen de trouver la solution (Je suis même passer par le "enregistrer macro" ).
 
J'essaye tout simplement de copier une cellule d'un fichier excel vers un autre.
 

Code :
  1. Dim Chemin, FichierS, FichierC
  2.  
  3.     Chemin = "C:\Blabla"
  4.     FileCopy (Chemin & "\Template.xls" ), (Chemin & "\FichierCible.xls" )
  5.     FichierC = Chemin & "\FichierCible.xls"
  6.     FichierS = Chemin & "\Données.xls"
  7.  
  8.     Workbooks.Open FichierC
  9.     Workbooks.Open FichierS
  10.  
  11.     Workbooks(FichierS).Range("A3" ).Select
  12.     Selection.Copy
  13.     Workbooks(FichierC).Range("C5" ).Select
  14.     ActiveSheet.Paste
  15.     'J'ai essayé ça aussi mais ça marche po non plus
  16.     'Workbooks(FichierC).Sheets(1).Range("C5" ).Value = Workbooks(FichierS).Sheets(1).Range("A3" ).Value
  17.     'Workbooks(FichierC).Sheets(1).Cells(5, 2).Value = Workbooks(FichierS).Sheets(1).Cells(3, 1).Value


 
Mon fichier est créé correctement, les fichiers excels sont bien ouverts, mais le copie de cellule ne se fait pas.
Si quelqu'un a une idée, merci d'avance.


Message édité par StefaNouF le 09-03-2012 à 17:01:46
mood
Publicité
Posté le 08-03-2012 à 17:38:24  profilanswer
 

n°2130559
SuppotDeSa​Tante
Aka dje69r
Posté le 09-03-2012 à 10:57:59  profilanswer
 

De mémoire Workbooks utilise le nom court, donc pas avec le chemin d'acces.
 
De plus, dans ton code, ligne 8 et 9 tu ouvres deux fois le meme fichier, difficile donc d'atteindre le second fichier.


---------------
Soyez malin, louez entre voisins !
n°2130628
StefaNouF
Posté le 09-03-2012 à 17:01:31  profilanswer
 

La ligne 8 et 9 était une erreur de recopie, je ne l'avais pas dans le code original.

 

Effectivement j'utilise dorénavant le nom court pour Workbooks ça marche mieux merci.

 

Mon problème venait du fait que la Sheet 1 était masqué  dans mon FichierC, je n'écrivais donc pas au bon endroit et je ne voyais pas ce que j'écrivais ^^


Message édité par StefaNouF le 09-03-2012 à 17:02:09
n°2130640
SuppotDeSa​Tante
Aka dje69r
Posté le 09-03-2012 à 20:18:50  profilanswer
 

Merci du retour.
:jap:


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

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [Résolu]Copie d'une cellule d'un fichier à l'autre

 

Sujets relatifs
Aide VBA - verrouillage code et cellule[Résolu] Quote Execute + Find pour le listing de fichier
Rechercher un fichier texte puis copier le contenu dans Excelpb liste chainée et lecture de fichier C
Mise a jour automatique fichier exceldeveloppement application partage fichier avec metadata en java
php: Gestion de fichier txt a la base mysqlgestionnaire de dossier et fichier
Compilation parser XML pour intégration à un code Ccopie de cellule d'un fichier excel sans l'ouvrir VBA
Plus de sujets relatifs à : [Résolu]Copie d'une cellule d'un fichier à l'autre


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR