Macro-commandes+word
Lea
-
Utilisateur anonyme -
Utilisateur anonyme -
Bonsoir,
Je suis en train de réaliser une macro sous Word(je ne m'y connais pas du tout en macros), j'ai donc commencer par l'enregistrer, en la renommant comme cela est indiqué, je lui ai attribué un raccourci clavier Alt+i, c'est ensuite que tout ce complique pour moi: lorsque j'enregistre ma macro, que dois exactement mettre dans mon document word? voici un des exemples de macros que je dois créer:
Sub calculer.longueur.mot ()
DIM mot As String
DIM longueur As Integer
mot = Inputbox(« Entrez un mot de plus de 4 lettres »)
longueur = len(mot)
If longueur >4 Then
Msgbox (« Ok , votre mot contient » & longueur & « lettres »)
Else
Msgbox(« Erreur »)
End If
End Sub
Est que lors de l'enregistrement de ma macro je dois rentrer la totalité des codes ci-dessus?
Merci d'avance,
Je suis en train de réaliser une macro sous Word(je ne m'y connais pas du tout en macros), j'ai donc commencer par l'enregistrer, en la renommant comme cela est indiqué, je lui ai attribué un raccourci clavier Alt+i, c'est ensuite que tout ce complique pour moi: lorsque j'enregistre ma macro, que dois exactement mettre dans mon document word? voici un des exemples de macros que je dois créer:
Sub calculer.longueur.mot ()
DIM mot As String
DIM longueur As Integer
mot = Inputbox(« Entrez un mot de plus de 4 lettres »)
longueur = len(mot)
If longueur >4 Then
Msgbox (« Ok , votre mot contient » & longueur & « lettres »)
Else
Msgbox(« Erreur »)
End If
End Sub
Est que lors de l'enregistrement de ma macro je dois rentrer la totalité des codes ci-dessus?
Merci d'avance,
A voir également:
- Macro-commandes+word
- Word 2013 - Télécharger - Traitement de texte
- Tableau word - Guide
- Word et excel gratuit - Guide
- Espace insécable word - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
2 réponses
bonsoir
quelques petites erreurs me semble t'il (j'ai Word 2003)
et tout ce code doit être saisi dans l'editeur VBA
bonne suite
quelques petites erreurs me semble t'il (j'ai Word 2003)
Sub calculer.longueur.mot () Dim mot As String Dim longueur As Integer Dim a as string mot = InputBox(" Entrez un mot de plus de 4 lettres ") longueur = Len(mot) If longueur > 4 Then a = MsgBox(" Ok , votre mot contient " & longueur & " lettres ") Else a = MsgBox(" Erreur ") End If End Sub
et tout ce code doit être saisi dans l'editeur VBA
bonne suite
Bonjour léa et ccm81
Affecter la message box dans la variable a ne sert à rien à part renvoyer la valeur 1.
Le nom de la macro devrait être calculer_longueur_mot.
Les points sont réservés pour séparer des classes, des objets ou des proriétés.
Il faut effectivement comme le dit ccm81 mettre le code dans VBA. Pour cela on l'insère dans un module de la fenêtre projet.
Cordialement
agi67
Affecter la message box dans la variable a ne sert à rien à part renvoyer la valeur 1.
Le nom de la macro devrait être calculer_longueur_mot.
Les points sont réservés pour séparer des classes, des objets ou des proriétés.
Il faut effectivement comme le dit ccm81 mettre le code dans VBA. Pour cela on l'insère dans un module de la fenêtre projet.
Cordialement
agi67