Rendre un classeur actif via VBA

Bonjour à tous,

Je souhaiterai trouver une solution à mon pb, pour cela je vous explique l'idée :

Je lance la macro d'un autre classeur que Excel ouvre (jusqu'ici tout va bien et fonctionne parfaitement), j'aimerais ensuite via macro, rendre actif le classeur que je viens d'ouvrir, puis se rend automatiquement à l'onglet "historique des bons d'intervent" et supprime la ligne 1 à 3 puis colonne z.

Voici mon code :

Dim MonApplication As Object
Set MonApplication = CreateObject("Shell.Application")

MonFichier = "C:\Users\gvolturno\Downloads\workorder.xlsx"
MonApplication.Open (MonFichier)


MsgBox "Le nom du classeur actif : " & ActiveWorkbook.Name (c'était pour connaître quel classeur excel était actif lors de l'éxécution de la macro)

'Rows("1:3").Select
'Selection.Delete Shift:=xlUp
'Columns("Z:Z").Select
'Selection.Delete Shift:=xlToLeft

J'ai essayé différente méthode mais rien ne fonctionne

Merci à vous

Bonjour,

Edit: essaie avec ceci

Sub Ouvrir_fichier()
    Dim Wb As Workbook
    On Error Resume Next
    Set Wb = Workbooks.Open("C:\Users\gvolturno\Downloads\workorder.xlsx")
    With ActiveWorkbook.Worksheets("feuil1")  'nom de la feuille à adapter
        .Range("1:3").Delete
        .Range("Z:Z").Delete
    End With
End Sub