InputBox "Exemple 1" & Chr(13) & "Exemple 2" & Chr(13) & Chr(10) & "Exemple 3"

Inputbox( "Exemple 1" & Chr(13) & "Exemple 2" & Chr(13) & Chr(10) & "Exemple 3")

MsgBox( "Exemple 1" & Chr(13) & "Exemple 2" & Chr(13) & Chr(10) & "Exemple 3")

MsgBox "Exemple 1" & Chr(13) & "Exemple 2" & Chr(13) & Chr(10) & "Exemple 3"

établir automatiquement une table des variables utilisées dans les macros.

détecter et corriger les erreurs d'écriture dans les macro commandes

générer automatiquement des fonctions

générer automatiquement des macros-commandes simples

Rep = Inputbox ("Confirmez la suppression de la

base de données", "Attention",VbExclamation)

Rep = Inputbox ("Confirmez la suppression de la

base de données", vbExclamation, "Attention")

Rep = MsgBox("Confirmez la suppression de la base

de données", vbExclamation, "Attention")

Rep = MsgBox("Confirmez la suppression de la base

de données", "Attention", VbExclamation)

Sub effacer_B2()

If MsgBox("Etes-vous certain de vouloir supprimer

le contenu de B2 ?", vbYesNo, "Demande de confirmation") = vbYes

Then

Range("B2").ClearContents

MsgBox "Le contenu de B2 a été effacé !"

End If

End Sub

Sub effacer_B2()

If

MsgBox"Etes-vous certain de vouloir supprimer le contenu de B2?",

"Demande de confirmation" = vbYes Then

Range("B2").ClearContents

End If

End Sub

Sub effacer_B2()

If InputBox "Etes-vous certain de vouloir supprimer le contenu de B2 vbYesNo,

"Demande de confirmation" = vbYes Then

Range("B2").ClearContents

MsgBox "Le

contenu de B2 a été effacé !"

End If

End Sub

Sub effacer_B2()

If InputBox("Etes-vous

certain de vouloir supprimer le contenu de B2 ?", vbYesNo, "Demande

de confirmation") = vbYes Then

Range("B2").ClearContents

End If

End Sub

DIM nom, prénom, civilité as STRING

DIM nom AS STRING, DIM prénom AS STRING, DIM civilité AS STRING

DIM (nom, prénom, civilité) AS STRING

DIM nom AS STRING, prénom AS STRING, civilité AS STRING