Création
d'entreprise
Posez votre question Signaler

[VB 6]copier coller ligne excel

mirounet 15Messages postés 5 juin 2007Date d'inscription - Dernière réponse le 6 juin 2007 à 00:13
Bonjour,
je cherche les commandes en vb qui me permettent:
1- d'ouvrir un fichier excel
2- de copier la premiere ligne de ce fichier
3- de la coller dans un autre fichier excel
merci
Lire la suite 

[VB 6]copier coller ligne excel »

1 réponses
Réponse
+0
moins plus
Voici peut-être un réponse à ton besoin :
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
Ajouter un commentaire
Ce document intitulé « [VB 6]copier coller ligne excel » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
Passage au tout numérique : quel coût pour les particuliers ?