Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Chercher une feuille dans un classeur Excel via une inputbox

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion beegees
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
B

beegees

XLDnaute Occasionnel
Bonjour tout le monde,

J'aimerais lancer une macro au démarrage d'une feuille Excel.

Cette macro devrait :

Lancer une inputbox
Demander un nombre de six chiffres
et rechercher la feuille nommée par le chiffre entré

J'ai commencé un bout de code mais ça ne fonctionne pas :

Public Sub Workbook_Open()
Dim matricule
matricule = InputBox("Veuillez indiquez le numéro de matircule", "Numéro de matricule")

MsgBox (matriucle)
End Sub

Msgbox (matricule) devrait me montrer le numéro de matricule que j'ai entré mais il n'affiche rien.

Je mets donc le numéro de matricule dans une variable nommée matricule et j'aimerais que la feuille portant le numéro contenu dans la variable soit affichée.

Est-ce possible avec VBA ?

Merci d'avance.

beegees
 
Trier par date Trier par votes
Re : Chercher une feuille dans un classeur Excel via une inputbox

bonjour beegees


Public Sub Workbook_Open()
Dim matricule
matricule = InputBox("Veuillez indiquez le numéro de matircule", "Numéro de matricule")

MsgBox (matriucle)
End Sub

tu l'as mis dans workbook_open, ta macro ne se lancera que lorque tu ouvriras le classeur

mets la dans worksheet (la bonne feuille)

sub worksheet_activate
 
Vote positif 0 Vote négatif
Re : Chercher une feuille dans un classeur Excel via une inputbox

Mais oui, Beegees, c'est possible !

Beaucoup de choses sont possibles en VBA 😉

Code: 
Public Sub Workbook_Open()
Dim Matricule
Matricule = InputBox("Veuillez indiquez le numéro de matircule", "Numéro de matricule")
[B][COLOR=blue]MsgBox (matricule)[/COLOR][/B]
[COLOR=blue][COLOR=black]' Et non MsgBox[/COLOR][COLOR=#000000] (matri[B]ucle[/B])[/COLOR][/COLOR]
' Sans tester si la feuille existe
On error resume next
[COLOR=blue][COLOR=#000000]Sheets(Matricule).Activate[/COLOR][/COLOR]
[COLOR=blue][COLOR=#000000]On error goto 0[/COLOR]
[/COLOR]End Sub

Voilà 🙂
 
Vote positif 0 Vote négatif
Re : Chercher une feuille dans un classeur Excel via une inputbox

Bonjour,

Une solution :

Public Sub Workbook_Open()
matricule = InputBox("Veuillez indiquez le numéro de matircule", "Numéro de matricule")
Sheets(matricule).Activate
End Sub


Voir fichier joint
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Chercher une feuille dans un classeur Excel via une inputbox

Bonjour Wilfried et Bruno,

Une question : que ferais-je sans vous ?

C'est top, ça a l'air de fonctionner nikel !

Je fait encore des tests mais je pense que c'est ok.

Merci pour tout !!!

beegees
 
Vote positif 0 Vote négatif
Re : Chercher une feuille dans un classeur Excel via une inputbox

Catrice à dit:
Bonjour,

Une solution :

Public Sub Workbook_Open()
matricule = InputBox("Veuillez indiquez le numéro de matircule", "Numéro de matricule")
Sheets(matricule).Activate
End Sub


Voir fichier joint
Cliquez pour agrandir...

Bonjour Catrice,

C'est super comme solution, simple et efficace.

Merci beaucoup.

beegees
 
Vote positif 0 Vote négatif
Re : Chercher une feuille dans un classeur Excel via une inputbox

Re,

y'aurait-il moyen d'obliger les utilisateurs à rentrer 6 chiffres ?

y'aurait-il aussi moyen de dire "numéro de matricule inexistant" si le numéro n'existe pas ? à la limite laisser l'oportunité à l'utilisateur de réessayer ?

Merci pour votre grande aide.

beegees
 
Vote positif 0 Vote négatif
Re : Chercher une feuille dans un classeur Excel via une inputbox

beegees à dit:
Re,
y'aurait-il moyen d'obliger les utilisateurs à rentrer 6 chiffres ?
Cliquez pour agrandir...
Oui, tout à fait.

y'aurait-il aussi moyen de dire "numéro de matricule inexistant" si le numéro n'existe pas ? à la limite laisser l'oportunité à l'utilisateur de réessayer ?
Cliquez pour agrandir...
Oui également.

Catrice va te faire ça 🙄
 
Vote positif 0 Vote négatif
Re : Chercher une feuille dans un classeur Excel via une inputbox

Re,re,

Ci-joints :
Classeur1.xls, corrigé car le bouton "Annuler" n'était pas pris en compte.
Classeur2.xls, avec une variante plus "sûre" en terme de choix
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Chercher une feuille dans un classeur Excel via une inputbox

Re Catrice,

Franchement, c'est du bon boulot, merci sincèrement.

Je vais anlayser ton code, pour apprendre, y'a pas mieux.

La solution 2 me semble plus "sécurisée" comme tu l'as dit, je vous sans doute donc utiliser cette solution.

T'es super !

Merci encore.

beegees
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

E
  • Résolu(e)
XL 2019 chercher une date dans une colonne vba
Réponses
12
Affichages
893
sylvanu
S
  • Question Question
XL 2013 enregistrer une feuille excel converti en pdf dans un répertoire selon la valeur d'une cellule
Réponses
5
Affichages
684
Phil69970
G
  • Question Question
Microsoft 365 Avoir des classeurs maitres et les procédures dans un autre classeur.
2
Réponses
19
Affichages
2 K
GClaire
G
L
  • Question Question
XL 2010 Chercher dans une colonne une donnée d'une inputbox et renvoyer une ligne
2
Réponses
17
Affichages
2 K
gbinforme
G
A
  • Question Question
XL 2019 Ajouter ou supprimer une ligne selon un mot trouvé dans une autre feuille
Réponses
1
Affichages
560
Oneida
B
  • Question Question
XL 2013 Comment trier les nom des feuilles et fusionner leur tableaux dans une une autre feuille ?
Réponses
10
Affichages
1 K
Compte Supprimé 979
C
C
  • Question Question
Microsoft 365 Impression PDF d'un Word via une macro Excel
Réponses
11
Affichages
2 K
job75
P
  • Résolu(e)
XL 2019 VBA - Stocker une valeur
Réponses
6
Affichages
628
Pierre111
P
XLS : Modèle pour ouvrir un classeur sur une nouvelle Session Excel
Réponses
0
Affichages
738
Lu76Fer
  • Question Question
XL 2019 Ouverture fichier xlsx dans dossier nom variable.
2
Réponses
16
Affichages
2 K
steph59940
6
  • Résolu(e)
XL 2019 Copier-coller tableau dans une feuille de calcul via VBA
Réponses
11
Affichages
1 K
job75
M
  • Résolu(e)
Microsoft 365 Image stockée dans une feuille à l'initialisation du userform
2
Réponses
20
Affichages
2 K
meyscal
M
H
  • Question Question
XL 2019 Trouver le nom d’une colonne et reporter les erreurs dans un tableau de bord
Réponses
7
Affichages
918
Homero18
H
M
  • Question Question
Microsoft 365 Une macro dans un fichier qui crée une macro event dans un autre fichier
Réponses
13
Affichages
1 K
TooFatBoy
J
  • Question Question
Microsoft 365 Importer via vba les données et la mise en forme d'une feuille dans un autre classeur
Réponses
9
Affichages
952
sylvanu
L
  • Résolu(e)
Microsoft 365 Récupérer la variable d'un Inputbox
2
Réponses
17
Affichages
3 K
sylvanu
E
  • Résolu(e)
Microsoft 365 Problème d'organisation des colonnes dans une ListBox en VBA Excel
Réponses
2
Affichages
1 K
eCHO
E
F
  • Résolu(e)
XL 2019 Exporter une feuille dans un classeur (ouvert ou fermé)
Réponses
2
Affichages
1 K
farid
F
F
  • Résolu(e)
XL 2019 Enregistrer sous la feuille active dans répertoire du fichier père en vba
2
Réponses
23
Affichages
2 K
Fabrice16ct
F
G
  • Résolu(e)
XL 2016 Définir Boucle pour afficher plusieurs tableaux dans des textbox sur une userform (ou sur une feuille Excel)
Réponses
6
Affichages
2 K
gaby.jvx
G
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…