Twitter iPhone pliant OnePlus 12 PS5 Disney+ Orange Livebox Windows 11 ChatGPT

creer un raccourci

2 réponses
Avatar
Gui.
Bonjour à tous
Comment faire pour creer un raccourci :
En chacun des mes userofrms possede un nom bien spécifique, qui apparait.
pour des raisons de rapidité, je voudrai que l'utilisateur puisse ouvrir
directement le userofm qu'il utilise le plus.
Ainsi le nom de ce dernier ssrait mis dans une cellule 'excel (ici
"TABLE!O13") suivant son choix. Et ce bouton pourait ouvrir n'imprte quel
feuille, des que la cellule possede un nom.


Private Sub cbRACCOURCI_Click()
Unload Me
fic$ = Range("TABLE!O13").Value
fic$.Show
End Sub

2 réponses

Avatar
Gui.
Merci Bcp
Mais j'ai un message d'erreur : "Argument non facultatif"
Pour info Nom du premierUserForm : ufAccueil
Nom défini en O13 pour exemple, mais qui peux changer : ufETIQUETTES
Pkoi il y a ce message ??

"isabelle" a écrit dans le message news:

bonjour Gui,

Private Sub cbRACCOURCI_Click()
fic$ = Sheets("TABLE").Range("O13").Value
Load.fic$
fic$.Show
Unload NomDuPremierUserform
End Sub

isabelle


Bonjour à tous
Comment faire pour creer un raccourci :
En chacun des mes userofrms possede un nom bien spécifique, qui apparait.
pour des raisons de rapidité, je voudrai que l'utilisateur puisse ouvrir
directement le userofm qu'il utilise le plus.
Ainsi le nom de ce dernier ssrait mis dans une cellule 'excel (ici
"TABLE!O13") suivant son choix. Et ce bouton pourait ouvrir n'imprte quel
feuille, des que la cellule possede un nom.

Private Sub cbRACCOURCI_Click()
Unload Me
fic$ = Range("TABLE!O13").Value
fic$.Show
End Sub


Avatar
isabelle
ha oui, le bouton cbRACCOURCI étant sur le premier userform remplace
cette ligne par Unload Me

isabelle


Merci Bcp
Mais j'ai un message d'erreur : "Argument non facultatif"
Pour info Nom du premierUserForm : ufAccueil
Nom défini en O13 pour exemple, mais qui peux changer : ufETIQUETTES
Pkoi il y a ce message ??

"isabelle" a écrit dans le message news:

bonjour Gui,

Private Sub cbRACCOURCI_Click()
fic$ = Sheets("TABLE").Range("O13").Value
Load.fic$
fic$.Show
Unload NomDuPremierUserform
End Sub

isabelle


Bonjour à tous
Comment faire pour creer un raccourci :
En chacun des mes userofrms possede un nom bien spécifique, qui app arait.
pour des raisons de rapidité, je voudrai que l'utilisateur puisse o uvrir
directement le userofm qu'il utilise le plus.
Ainsi le nom de ce dernier ssrait mis dans une cellule 'excel (ici
"TABLE!O13") suivant son choix. Et ce bouton pourait ouvrir n'imprte quel
feuille, des que la cellule possede un nom.

Private Sub cbRACCOURCI_Click()
Unload Me
fic$ = Range("TABLE!O13").Value
fic$.Show
End Sub