Comment creer un msgbox?

Bonjour,

J'aimerais creer un msgbox me rapportant toutes les onglets commencant par "Er - "

Merci d'avance
Configuration: Windows 2000
Internet Explorer 6.0

13 réponses

  1. bonjour
    peut tu mieux expliquer ton probleme stp?
    quand tu parle d'onglets tu veux dire quoi?
    1. Bonjour,

      quand je parle d'onglet se sont les nom des feuilles excel d'un document excel.

      Merci
      1. Bonjour,

        personne n'a d'idée?

        Sinon existe t il un code pouvant m'indiquer toutes les feuilles commencant par "Er -"???

        Merci merci merci...
        1. Bonjour,

          personne n'a d'idée?

          Sinon existe t il un code pouvant m'indiquer toutes les feuilles commencant par "Er -"???

          Merci merci merci...
          1. je ne connais pas trop excel mais je sais qu'il est possible d'effectuer des requete sous celui ci alors essai de faire une requete qui ira chercher toute t page commencant par ER
            1. crées un objet Workbook. celui contient les Worksheets (les onglets si tu veux). puis

              for each ws in Workbook.Worksheets
              msgbox ws.name
              next
              1. Bonjour,

                Désolé phil232 mais je n'ai pas très bien compris ce que tu m'as dis.. je suis un peu nivice en VB :)
                1. F1 peut faire des miracles

                  Private Sub Workbook_Open()
                  
                  Dim WS As Worksheet
                  
                  For Each WS In ActiveWorkbook.Worksheets
                      MsgBox WS.Name
                  Next
                  
                  End Sub
                  1. Super, ca marche!!!

                    encore une toute petite chose j'aimerai avoir la même fonction mais juste pour les feuilles commencant par "ER"

                    C'est possible???
                    1. J'aimes bien les personnes comme toi
                      débrouilles toi même... c'est sur si je savais faire je ne serais pas venu ici....
                      Si je demande c'est que la prog ce n'est pas mon truc malgrés l'aide dans F1!!..

                      Donc je prefere que tu ne répondes rien plutôt de dire "debrouille toi même...."

                      Cordialement
                      1. j suis nul en vb excel mais j te conseil de regarder comment on effectue des requete avec excel sur internet, il doit y avoir d tutoriaux excel qui explique sa , et apres tu pourra creer une requete que cherche toute t feuille excel commencant pas er sous access sa donnerai sa
                        select namefeuille from feuille where namefeuille="Er%"
                        % indiquant qu il peut y avoir plusieur caractere derrier ER
                        1. ce qu'il cherche c'est qu'on écrit à sa place car la soluce n'est pas difficile

                          If Left(WS.Name, 2) = "ER" Then MsgBox WS.Name