Connexion entre 2 fichiers (export/import de données)

Salut GMB,

Merci beaucoup c'est ce que je cherchais,

J'ai juste modifié cette partie là :

  'On copie la cellule c9 (Poids) du Excel FichePièce
  fDep.Range("C8").Copy
  'On colle dans la nomenclature
  MySheet.Cells(ln, col + 1).PasteSpecial xlPasteValues 'en supposant que le champs ''Poids'' est à coté de celui de la densité
  MySheet.Cells(ln, col + 1).PasteSpecial xlPasteFormats

Grâce à la méthode que tu ma montré, je demande à ma macro de chercher la colonne Poids dans ma "Nomenclature" pour y coller le poids. Comme ça peut importe la place de l'onglet Poids...

  'Recherche dans quelle colonne se trouve "Poids"
   Set cell1 = Rows("3:3").Find("Poids", lookat:=xlWhole)
  If Not cell1 Is Nothing Then
  colpoids = cell1.Column
  Else
  MsgBox "Il n'y a pas de champ ''Densité sur la nomenclature", 16
  End
  End If
 'On colle dans la nomenclature
   MySheet.Cells(ln, colpoids).PasteSpecial xlPasteValues 

Encore une fois, je tenais à vous remercier pour votre aide et le temps que vous m'avez accordé !!

Fehmous

Bye !

Bonjour

Bravo ! Tu as tout compris !

Juste un détail : n'oublie pas de changer l'instruction du MsgBox qui suit, il ne s'agit plus de densité mais de poids !

Bye !

Merci je n'avais pas fait attention !

Je suis pas du tout expert en programmation,

Mais j'apprend petit à petit de mes différentes applications et grâce à l'aide de contributeurs comme vous.

Donc merci encore pour l'aide

A bientôt

Bye

Merci je n'avais pas fait attention !

Je suis pas du tout expert en programmation,

Mais j'apprend petit à petit de mes différentes applications et grâce à l'aide de contributeurs comme vous.

Donc merci encore pour l'aide

A bientôt

Bye

Rechercher des sujets similaires à "connexion entre fichiers export import donnees"