Bonjour à tous

J'ai récupérer un fichier Excel avec une macro qui coince, mais ça fait longtemps je l'avoue que je n'ai pas touché à VBA.

L'erreur est du type :

Erreur d’exécution 9 : l'indice n'appartient pas à la sélection
Après avoir parcouru le code, il semblerait que la problème se pose dans cette partie du code :


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Set WkForm = Worksheets("ressources_complete")
 
    Selection.Clear
    Sheets("ressources_complete").Activate
    Application.CutCopyMode = False
    Rows("9:9").Select
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
    WkForm.Rows("5:5").Select
    Selection.Copy
    WkForm.Rows("9:9").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
Avez-vous une petite idée d'où pourrait venir l'erreur ?

Merci d'avance pour tous vos conseils !!!