IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Problème séléction feuille


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Inscrit en
    Mai 2007
    Messages
    192
    Détails du profil
    Informations forums :
    Inscription : Mai 2007
    Messages : 192
    Par défaut Problème séléction feuille
    Bonjour à tous!

    Voici le bout de mon code, je m'explique après:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    For Each f In ThisWorkbook.Sheets 'cherche une feuille qui contient semester et la séléctionne
    If f.Name Like "*Semester*" Then
    f.Select
    End If
    Next
    J'ai effectivement une feuille qui s'appelle "Zelda - Semester 1 2006" mais il ne l'a trouve pas. J'a essayé plein de variantes du genre "* Semester # 200#" pareil ça marche pas

  2. #2
    Membre confirmé
    Inscrit en
    Avril 2007
    Messages
    86
    Détails du profil
    Informations personnelles :
    Âge : 37

    Informations forums :
    Inscription : Avril 2007
    Messages : 86
    Par défaut
    A mon avis tu dervrait récupérer le nom exact de chaque onglet, et de rechercher dans ce que tu a trouvé l'orthographe exact.

  3. #3
    Inactif  
    Profil pro
    Inscrit en
    Juin 2007
    Messages
    2 054
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Juin 2007
    Messages : 2 054
    Par défaut
    Essaye avec ceci..

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    For Each f In ThisWorkbook.Sheets 'cherche une feuille qui contient semester et la séléctionne
        If InStr(1, f.Name, "Semester") Then
        f.Select
        End If
    Next
    A+

  4. #4
    Membre éclairé
    Profil pro
    Inscrit en
    Décembre 2006
    Messages
    95
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France, Oise (Picardie)

    Informations forums :
    Inscription : Décembre 2006
    Messages : 95
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    For f = 1 To Sheets.Count  'cherche une feuille qui contient semester et la séléctionne
        If Sheets(f).Name Like "*semester*" Then
            Sheets(f).Select
        End If
    Next f

  5. #5
    Membre confirmé
    Inscrit en
    Mai 2007
    Messages
    192
    Détails du profil
    Informations forums :
    Inscription : Mai 2007
    Messages : 192
    Par défaut
    Merci les gars! en fait c'est une erreur qui m'est completement amputable puisque j'execute ce code à partir d'un fichier central, et ensuite il ouvre chaque fichier dans un répertoire. Le problème c'est qu'en utilisant thisworkbook je reste sur le fichier central, qui lui-c'est sûr-ne contient pas une telle feuille.

Discussions similaires

  1. Problème rafraichissement feuille excel
    Par xav30 dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 02/12/2007, 16h58
  2. [GWT] Problème de feuille de style
    Par Invité dans le forum GWT et Vaadin
    Réponses: 1
    Dernier message: 28/09/2007, 11h08
  3. Problème avec feuille template
    Par pierre.coudert dans le forum Mise en page CSS
    Réponses: 3
    Dernier message: 19/01/2007, 10h00
  4. Problème attachement feuille externe
    Par finalfx dans le forum Balisage (X)HTML et validation W3C
    Réponses: 10
    Dernier message: 15/04/2006, 19h43
  5. [VBA-A]Problème de feuille de donnée access
    Par acidstrike dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 10/04/2006, 11h02

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo