Bonjour le Forum,
J'ai un soucis avec une macro.
Je cherche à sélectionner pour attribuer une macro (Synt), la même image contenue dans mes feuilles de classeur après la neuvième. (Bouton retour)
Mon code me sélectionne toutes les images, y compris celles des feuilles 1 à 8.
Comment pourrai-je l'écrire, afin que seul mes images (identiques) de F 9 à X soient sélectionnées pour y attribuer ma macro "Synt".
on code :
Sub Image()
Dim Wks As Worksheet, C As Picture
For Each Wks In Worksheets
For Each C In Wks.Pictures
For i = Sheets.Count To 9 Step -1
If Sheets(i).Index = i Then C.OnAction = "Synt"
Next
Next
Next
End Sub
Merci pour votre aide
Bien cordialement
Joël
J'ai un soucis avec une macro.
Je cherche à sélectionner pour attribuer une macro (Synt), la même image contenue dans mes feuilles de classeur après la neuvième. (Bouton retour)
Mon code me sélectionne toutes les images, y compris celles des feuilles 1 à 8.
Comment pourrai-je l'écrire, afin que seul mes images (identiques) de F 9 à X soient sélectionnées pour y attribuer ma macro "Synt".
on code :
Sub Image()
Dim Wks As Worksheet, C As Picture
For Each Wks In Worksheets
For Each C In Wks.Pictures
For i = Sheets.Count To 9 Step -1
If Sheets(i).Index = i Then C.OnAction = "Synt"
Next
Next
Next
End Sub
Merci pour votre aide
Bien cordialement
Joël