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

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Copier-Coller d'une zone d'une fichier Excel vers sa 2e feuille via VB

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Copier-Coller d'une zone d'une fichier Excel vers sa 2e feuille via VB

n°718924
Martin978
Posté le 07-05-2004 à 16:17:45  profilanswer
 

Bonjour!  
 
J'ai un problème au niveau de l'utilisation d'un fichier Excel depuis VB6:  
 
J'aimerai copier une zone d'un fichier Excel vers la 2e feuille de ce même fichier Excel
 
Voici la partie concernée de mon code actuel, mais il ne fonctionne pas:
 
 

Code :
  1. wsExcel.Range(Cells(2, 15), Cells(NbLigneCopy, 28)).Copy
  2. Set wsExcel = wbExcel.Sheets(2)
  3. wsExcel.Activate
  4.      
  5. wsExcel.Range(Cells(1, 1), Cells(Ligne2, 13)).Select
  6. ActiveSheet.Paste

 
 
La partie "copier" fonctionne puisque lorsque j'ouvre mon fichier Excel pour contrôler le résultat, je vois que le collage n'a pas fonctionné mais si je fais un "Ctrl-V" mes cellules se collent...  :sleep:  :pt1cable:  
Je sais pas si le problème vient de l'activation de la 2e feuille Excel ou bien du collage lui-même... :??:  
 
Si qqun a une idée pour me dépatouiller...
Merci d'avance!
Martin

mood
Publicité
Posté le 07-05-2004 à 16:17:45  profilanswer
 


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

  Copier-Coller d'une zone d'une fichier Excel vers sa 2e feuille via VB

 

Sujets relatifs
[Excel]Range et variables[PHP][EXCEL]Ecrire en vietnamiens
[excel] nbre de jours ouverts (samedi inclus) ds un moisenvoit fichier reseau
fabriquer un fichier xlsColler du texte dans des signets défins dans un doc WORD
PB fontion VBA lors de l'ajout ou suppression de feuilleremplacer tous les accents d'un fichier donné
[ASP.NET][C#]ecriture d'un fichier xmlPb de recherche dans un fichier
Plus de sujets relatifs à : Copier-Coller d'une zone d'une fichier Excel vers sa 2e feuille via VB


Copyright © 1997-2025 Groupe LDLC (Signaler un contenu illicite / Données personnelles)