Probleme macro "copie dans un autre fichier"

[ironangel]

Bonjour,
j'utilise actuellement une macro qui quand je l'éxécute à partir de mon fichier "pere" me copie des infos dans un autre fichier.
Probleme, je me suis rendu compte que les infos sont également copiées dans mon fichier pere du coup cela me pose de gros probleme.

Pour infos la macro que je souhaite modifier avec une ligne du genre" copier les infos sauf dans le thisworkbook depuis lequel j'éxécute la macro":

Sub OuvFic()
coded = ActiveCell.Offset(0, 1).Value
packaging = ActiveCell.Offset(0, -8).Value
nom = ActiveCell.Offset(0, -8) & " " & ActiveCell.Offset(0, -7) & " " & ActiveCell.Offset(0, -6) & " " & ActiveCell.Offset(0, -5) & " " & ActiveCell.Offset(0, -1).Value
contenance = ActiveCell.Offset(0, -7).Value
axe = ActiveCell.Offset(0, -3).Value

Application.Dialogs(xlDialogOpen).Show "http://192.6.37.137/Documents"
Range("L2").Value = coded
Range("C5").Value = nom
Range("D9").Value = packaging
Range("G9").Value = contenance
Range("D3").Value = axe


End Sub

Merci d'avance
Amicalement

 

[ironangel]

Re : Probleme macro "copie dans un autre fichier"

Bonjour le forum,

quelqun pourrait me venir en aide?
Merci d'avance à vous

amicalement

 

[job75]

Re : Probleme macro "copie dans un autre fichier"

Bonjour ironangel,

Application.Dialogs(xlDialogOpen).Show "http://192.6.37.137/Documents"
If ActiveWorkbook.Name = ThisWorkbook.Name Then Exit Sub

A+