Pblème sélection d'onglet
Bonjour tout le monde,
Je viens vers vous pour un problème qui ne devrait pas en être un mais ....
Je cherche à ouvrir un classeur à l'aide d'une macro et à selectionner un onglet de ce classeur. Seulement lorsque la commande s'execute on me retourne l'erreur d'indice 9 et j'ai beau chercher je ne vois pas pourquoi. Voici mon bout de code :
Sub RechercheV_FSA()
Dim NumeroRCT As Range
Dim Valeur As String
Valeur = Range("E7")
chemin1 = ThisWorkbook.Path & "\01 - DOSSIER VERS SERVICE ACHAT\RCT+WEP\"
Workbooks.Open(chemin1 + "RCT + WEP-N° ECC-Item.xlsm").Activate
Worksheets("Data Saving-Rev0").Activate -----------------------------------------------------------------------> ICI
Set NumeroRCT = Range("BO15:BO156").Find(Valeur, lookat:=xlWhole)
If celluletrouvee Is Nothing Then
MsgBox ("Révision et date RCT non trouvées")
Else
ligne = NumeroRCT.Row
End If
End Sub
Bonjour
Sans toutes les infos pas faciles
Vérifies l'orthographe de ta page "Data Saving-Rev0"
Dans quel classeur est-elle située ?
A part ça il y a un truc qui me parait bizarre, t’initialises une variable et tu vérifies une autre
Set NumeroRCT= Range("BO15:BO156").Find(Valeur, lookat:=xlWhole)
If celluletrouveeIs Nothing ThenOui dsl c'est bien la variable NumeroRCT plutot.
Par contre l'orthographe de l'onglet est bon c'est ça que je ne comprends pas :s
Problème résolu, il y avait un espace dans le nom de l'onglet évidemment "Data Saving-Rev0 "
Affaire classée et merci encore.
bonjour Banzai
Workbooks.Open(chemin1 + "RCT + WEP-N° ECC-Item.xlsm")
activeworkbook.Worksheets("Data Saving-Rev0").selecta+
Papou