Copier coller feuille d'un classeur vers un autre classeur
Résolu
GermPeru
Messages postés
172
Date d'inscription
Statut
Membre
Dernière intervention
-
GermPeru Messages postés 172 Date d'inscription Statut Membre Dernière intervention -
GermPeru Messages postés 172 Date d'inscription Statut Membre Dernière intervention -
Bonjour a tous,
Je sais quíl y a plusieuurs discution sur le sujet mais la je bloque.
Je cherche a copier les données d´une feuille dún classeur vers une autre feuille dún autre classeur. Mon code bloque sur le copier coller, j´ai essayé de differentes facon mais fonctionne pas...
Je lance ma maccro depuis le fichier GuardarComo (path: "C:\Users\user\Desktop\Dispesacion\alamacén\GuardarComo.xlsm", Password:="Germain").
Merci de l´aide.
Je sais quíl y a plusieuurs discution sur le sujet mais la je bloque.
Je cherche a copier les données d´une feuille dún classeur vers une autre feuille dún autre classeur. Mon code bloque sur le copier coller, j´ai essayé de differentes facon mais fonctionne pas...
Je lance ma maccro depuis le fichier GuardarComo (path: "C:\Users\user\Desktop\Dispesacion\alamacén\GuardarComo.xlsm", Password:="Germain").
Sub Abrir()
Dim MaRep As String, Chemin As String
Chemin = "C:\Users\user\Desktop\lotes\"
On Error GoTo NoExiste
MaRep = InputBox("Introduzca N° de lote:", "Impresión etiqueta de dispensación")
' ouverture du fichier ac mdp
Workbooks.Open Chemin & MaRep & ".xls", Password:="Dispensacion"
'on ne rend pas visible le fichier alors ouvert
ActiveWindow.Visible = False
'on copie les données de la feuille "marep" du fichier "marep" pour les coller dans classeur "guardarcomo" ds la feuille "Impet"
Workbooks(Chemin & MaRep & ".xls").Sheets(MaRep).Cells.Copy ThisWorkbook.Sheets("ImpEt").Range("A1").Paste ' On colle les données
Workbooks(Chemin & MaRep & ".xls").Close False ' Ferme le fichier source sans le sauvegardé
Exit Sub
NoExiste:
MsgBox "El N° de lote introducido no existe", vbCritical
End Sub
Merci de l´aide.
A voir également:
- Copier une feuille excel dans un autre classeur avec liaison
- Vba copier une feuille dans un autre classeur sans ouvrir - Meilleures réponses
- Copier coller feuille excel dans un autre classeur - Meilleures réponses
- Feuille de score belote excel - Forum Excel
- Liste déroulante excel - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Déplacer une colonne excel - Guide
- Comment copier une vidéo youtube - Guide
2 réponses
Bjr
Si j'ai bien compris:
-Les deux classeurs étant ouvert
-faite un clique droit sur la feuille à copié,
-cliquer sur Déplacer ou copier dans le menu qui s'affiche,
-dans la fenêtre qui s'ouvre sélectionner le nom du classeur de réception dans la liste déroulante,
-Cocher la case Créer une copie.
-puis OK.
Si j'ai bien compris:
-Les deux classeurs étant ouvert
-faite un clique droit sur la feuille à copié,
-cliquer sur Déplacer ou copier dans le menu qui s'affiche,
-dans la fenêtre qui s'ouvre sélectionner le nom du classeur de réception dans la liste déroulante,
-Cocher la case Créer une copie.
-puis OK.
Je voudrais automatiser par vba cette action car je souhaiterais faire d'autres actions avec les données copiées.
Je lance la maccro depuis le classeur "gaurdarcomo", j'ai une input box qui me permet d´ouvrir le deuxieme fichier "MaRep". Le nom de la feuille de ce 2ieme fichier est le meme que le nom du fichier, parametré dans le meme fichier via code vba. Copier les données de la feuille du classeur alors ouvert les collées dans la feuille nommée "ImpEt" puis fermé le classeur "MaRep".
Merci