jamespatagueul
XLDnaute Occasionnel
Bonjour,
je souhaite rechercher une feuille dans un classeur excel à l'aide de VBA.
Les feuilles sont nommées : "x - y" , ... sur N feuilles
Cependant, j'ai besoin de chercher la feuille, sans me soucier de x ou y.
voici la code fonctionnel actuel :
Sub cherche()
Dim sh As Worksheet
Dim Name As String
Name = Feuil1.Range("$F$2")
For Each sh In Worksheets
If sh.Name = Feuil1.Range("$F$2").Value Then
MsgBox "L'onglet" & " " & Name & " " & "existe." & Chr(13) & "Vous allez être redirigé vers cet onglet."
Feuil1.Range("$F$2").Value = ""
Sheets(Name).Activate
Exit For
End If
Next sh
End Sub
les onglets sont créer automatiquement apres renseignement dans feuil1 col A et B
Merci d'avance pour vos réponses
je souhaite rechercher une feuille dans un classeur excel à l'aide de VBA.
Les feuilles sont nommées : "x - y" , ... sur N feuilles
Cependant, j'ai besoin de chercher la feuille, sans me soucier de x ou y.
voici la code fonctionnel actuel :
Sub cherche()
Dim sh As Worksheet
Dim Name As String
Name = Feuil1.Range("$F$2")
For Each sh In Worksheets
If sh.Name = Feuil1.Range("$F$2").Value Then
MsgBox "L'onglet" & " " & Name & " " & "existe." & Chr(13) & "Vous allez être redirigé vers cet onglet."
Feuil1.Range("$F$2").Value = ""
Sheets(Name).Activate
Exit For
End If
Next sh
End Sub
les onglets sont créer automatiquement apres renseignement dans feuil1 col A et B
Merci d'avance pour vos réponses