Comment rechercher une chaîne dans une sheetname?

Je suis en train de rechercher une chaîne de caractères dans tous les noms de feuille de calcul d'un classeur à l'aide Pour chaque boucle comme suit:

 For Each Sheet In ActiveWorkbook.Sheets
  Name = ActiveSheet.Name
  Next Sheet

Mais je ne suis pas en mesure d'obtenir tous les noms de feuille de calcul à l'aide de code ci-dessus comme il est coincé qu'un seul nom de la feuille.

Après le nom de la feuille je veux de recherche une chaîne de caractères dans le nom de la feuille de Sorte qu'il serait excellent si quelqu'un peut m'aider dans la recherche d'une chaîne dans toutes les feuilles.

  • comment voulez-vous à la liste de résultats de recherche ?
InformationsquelleAutor Suman | 2011-07-28
  1. 3
    For Each sheet In ActiveWorkbook.Sheets
    If sheet.Name Like "*" & strSearch & "*" Then
        Debug.Print "Found! " & sheet.Name
    End If
Next

    Vous itérer sur toutes les feuilles, mais vous utilisez toujours ActiveSheet.Name dans votre boucle.
    À la recherche d'un modèle, vous pouvez utiliser Like avec le * générique.

    InformationsquelleAutor Jacob
  2. 3

    Vous pouvez utiliser le InStr fonction... ou peut-être que je n'ai pas votre question correctement.

    Sub CheckSheets()        
    Dim oSheet As Excel.Worksheet
            For Each oSheet In ActiveWorkbook.Sheets           
        If InStr(UCase(oSheet.Name), UCase("Sheet")) Then                
            Debug.Print oSheet.Name                
        End If            
    Next oSheet        
End Sub
    • Ce droit de réponse ici est ce que nous avons besoin d'études supérieures jusqu'à. Thanxs
    • Une réponse appropriée en termes de logique. De ne pas être absent toute la feuille, si le cas est différent. @Suman vous devriez être en ce marquage comme une réponse
    InformationsquelleAutor Tiago Cardoso
  3. 0

    Consultez ces liens:

    • habituellement, nous suggérons d'ajouter aussi (au moins partiellement) le contenu du lien que les questions de la question, donc nous allons avoir votre publication valide même dans le cas d'un lien externe est cassé.
    InformationsquelleAutor JK0124