[VB 6]copier coller ligne excel

Fermé

mirounet Messages postés 15 Date d'inscription mardi 5 juin 2007 Statut Membre Dernière intervention 6 juillet 2007 - 5 juin 2007 à 17:36
BzhRico - 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

A voir également:

[VB 6]copier coller ligne excel
Aller à la ligne excel - Guide
Liste déroulante excel - Guide
Copier coller pdf - Guide
Formule excel - Guide
Copier une vidéo youtube - Guide

1 réponse

Réponse 1 / 1

BzhRico
6 juin 2007 à 00:13

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

Discussions similaires

Dessiner avec son clavier et avec des lettres

Que veut dire "correspondant occupé" lors d'un appel ?

Statut « en ligne » alors que non

Discussions similaires

Newsletters