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

Problème sur fonction

  • Initiateur de la discussion hoob91
  • Date de début
H

hoob91

Guest
Bonjour à tous,
je cherche à réaliser une macro ( sous Word ) qui teste la fonction "enregistrer sous ".
je m'explique :
* si clic sur Annuler, rien ne se passe, je retourne sur le document ou je me situe
* si clic sur Enregistrer --> action à réaliser

merci de votre aide
 
P

pyrof

Guest
bonjour,

Tu vas dans macro et tu selectionne commande word au lieu de normal.

là tu as toutes les commandes de word

tu as donc fichierenregistrer. Il suffit de créer une macro qui porte ce nom pour contourner la commande word
 
P

pyrof

Guest
Bonjour,

Là, je ne sais pas. Mais avec toutes les fonction du vba on peut faire.

pour exepmle la commande enregistrersous fait filesaveas avec les options.

bon courrage
 
H

hoob91

Guest
Ce que je souhaite réaliser, c'est à l'ouverture de la boite de dialogue Enregistrer Sous, faite un test sur la réponse donnée par exemple
si Enregistrer alors .....
si Annuler alors Message
la difficulté est le test ????

If Selection = False Then '--- analyse réponse de la boite de dialogue ------- MsgBox ("Annuler")

End If

Else

End If
' MyString = "Non"
MsgBox ("Enregistrement Annuler")

Merci de votre aide
 
P

pyrof

Guest
Bonjour,

Voila :

Sub fichierenregistrersous()
dlgAnswer = Dialogs(wdDialogFileSaveAs).Show
If dlgAnswer = o Then
MsgBox "le document n'est pas enregistre"
End If
End Sub
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…