A voir également:
- [VB 6]copier coller ligne excel
- Historique copier coller - Guide
- Copier-coller - Accueil - Informatique
- Liste déroulante excel - Guide
- Copier coller pdf - Guide
- Aller à la ligne excel - Guide
1 réponse
Voici peut-être un réponse à ton besoin :
Le principe est d'appeler cette fonction en lui passant comme paramètre le nom d'un fichier et une référence de cellule où la ligne doit être copiée
Sub ReCopier(FichierSource As String, LigneXlsDestination As Range)
On Error GoTo ErreurOpen
Workbooks.Open FichierSource, False, True, AddToMru:=False
On Error Resume Next
ActiveSheet.Rows("1:1").Copy
LigneXlsDestination.EntireRow.PasteSpecial
Application.CutCopyMode = False
ActiveWorkbook.Close False
Exit Sub
ErreurOpen:
MsgBox "Erreur lors de l'ouverture du fichier :" & vbNewLine _
& Error(Err), vbCritical, "Erreur n°" & Err
End Sub
Le principe est d'appeler cette fonction en lui passant comme paramètre le nom d'un fichier et une référence de cellule où la ligne doit être copiée
