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

Combinaison de touches

3 réponses
Avatar
RV
Bonsoir,
Pour appeler la fenêtre "Enregistrer sous" dans la feuille ThisWorkbook avec
la procédure Workbook_Open, j'ai mis:
Application.OnKey "^{s}" et il ne se passe rien pourquoi? La combinaison de
touche fait suite à une MsgBox.
Merci de vos réponses.
Cordialement
Hervé

3 réponses

Avatar
RV
Re-bonsoir,
Je crois que j'ai trouvé mon erreur :
Application.Dialogs(xlDialogSaveAs).Show est la solution et me permet
d'obtenir ce que je souhaite.
Désolé du dérangement.
Cordialement
Hervé

"RV" a écrit dans le message de news:
%
Bonsoir,
Pour appeler la fenêtre "Enregistrer sous" dans la feuille ThisWorkbook
avec la procédure Workbook_Open, j'ai mis:
Application.OnKey "^{s}" et il ne se passe rien pourquoi? La combinaison
de touche fait suite à une MsgBox.
Merci de vos réponses.
Cordialement
Hervé



Avatar
Jacky
Bonsoir

Bien que Application.OnKey "^{s}" enregistre aussi ,mais directement, sans
passer par 'enregistrer sous'

Salutations
JJ

"RV" a écrit dans le message de
news:OkcLj%
Re-bonsoir,
Je crois que j'ai trouvé mon erreur :
Application.Dialogs(xlDialogSaveAs).Show est la solution et me permet
d'obtenir ce que je souhaite.
Désolé du dérangement.
Cordialement
Hervé

"RV" a écrit dans le message de news:
%
Bonsoir,
Pour appeler la fenêtre "Enregistrer sous" dans la feuille ThisWorkbook
avec la procédure Workbook_Open, j'ai mis:
Application.OnKey "^{s}" et il ne se passe rien pourquoi? La
combinaison


de touche fait suite à une MsgBox.
Merci de vos réponses.
Cordialement
Hervé







Avatar
RV
Bonsoir Jacky,
Merci pour cette précision
Cordialement
Hervé

"Jacky" a écrit dans le message de news:
e$
Bonsoir

Bien que Application.OnKey "^{s}" enregistre aussi ,mais directement, sans
passer par 'enregistrer sous'

Salutations
JJ

"RV" a écrit dans le message de
news:OkcLj%
Re-bonsoir,
Je crois que j'ai trouvé mon erreur :
Application.Dialogs(xlDialogSaveAs).Show est la solution et me permet
d'obtenir ce que je souhaite.
Désolé du dérangement.
Cordialement
Hervé

"RV" a écrit dans le message de news:
%
Bonsoir,
Pour appeler la fenêtre "Enregistrer sous" dans la feuille ThisWorkbook
avec la procédure Workbook_Open, j'ai mis:
Application.OnKey "^{s}" et il ne se passe rien pourquoi? La
combinaison


de touche fait suite à une MsgBox.
Merci de vos réponses.
Cordialement
Hervé