Bonjour à Tous
j'ai un soucis avec un code vba
Code :
Sub test()
Dim wkA As Workbook, wkB As Workbook
Dim chemin As String, fichier As String
'classeur A qui contient la macro
Set wkA = ThisWorkbook
'chemin ou se trouve le fichier B
chemin = "\\Chemin"
'nom du fichier B
fichier = "PLANNING.xlsx"
'ouvre le fichier B
Workbooks.Open chemin & fichier
'met en variable le classeur B
Set wkB = ActiveWorkbook
'copie la feuille "feuil1" du classeur A avant la feuille 1 dans le classeur B
wkA.Sheets("S09").Copy before:=wkB.Sheets("OTI")
MsgBox ("La feuille est maintenant copiée") 'message pour dire que la feuille est copiée.
wkB.Close True 'ferme et enregistre le classeur B
End Sub
==> Le code doit copier les données depuis un Classeur Excel ouvert (en lecture seul) ou fermer un onglet ... vers le classeur cible et l'onglet désigné ... MAIS j'ai un Bug .... qui dit "Erreur 9 : L'incident n'appartient pas à la sélection"
Merci d'avance pour votre aide les AMIS
Cheeers
H²