Problème de macro

[JB]

Bonjour,

Lorsque mon fichier 'chemin2' est ouvert ma macro ne passe pas à la macro 'Copicolle1'. Par contre lorsque le fichier 'Chemin2' est fermer je n'ai aucun problème.
Pouvez vous me dépanner.
Merci


'Active le chemin d'accès à la base de fusion des lots
Worksheets('chemin').Select
Dim chemin2 As String
chemin2 = Range('chemin!a6')

'Test si le fichier est déjà ouvert...

On Error Resume Next

Workbooks(chemin2).Activate
If Err = 0 Then
Call copicolle1
Exit Sub

Else:
Workbooks.Open Filename:=chemin2
Call copicolle1
Exit Sub
End If
End Sub
Private Sub copicolle1()

'selectionne la feuil1
Worksheets('feuil1').Select

 

[Creepy]

Hello le Forum, JB,

Peux tu mettre un exemple STP, parce que j'ai une idée mais je voudrais vérifier.

Je pense que c'est parce que dans tes call il faudrait mettre le nom du fichier devant la procédure

@+

Creepy

 

[jb]

Salut Creepy,

Merci de t'interesser à ma question. voici mon fichier.La macro est lancé par le bouton import de la base de données lbs.

Cordialement