Fonction InputBox

Affiche une invite dans une boîte de dialogue permettant à l'utilisateur de saisir du texte. L'entrée est assignée à une variable.

L'instruction InputBox permet de saisir facilement du texte au moyen d'une boîte de dialogue. Pour confirmer l'entrée, cliquez sur OK ou appuyez sur Entrée. L'entrée est renvoyée en tant que valeur de retour de la fonction. Si vous fermez la boîte de dialogue en cliquant sur Annuler, InputBox renvoie une chaîne de longueur zéro ("").

Syntaxe :

InputBox (Msg As String[, Title As String[, Default As String[, x_pos As Integer, y_pos As Integer]]]])

Valeur de retour :

Chaîne de caractères

Paramètre :

Msg : expression au format chaîne de caractères affichée en tant que message dans la boîte de dialogue.

Title: expression au format chaîne de caractères affichée dans la barre de titre de la boîte de dialogue.

Default : expression au format chaîne de caractères affichée dans la zone de texte en tant qu'expression par défaut en l'absence d'autre entrée.

x_pos : expression au format nombre entier spécifiant la position horizontale de la boîte de dialogue. La position est une coordonnée absolue et ne se rapporte pas à la fenêtre de l'application Office.

y_pos : expression au format nombre entier spécifiant la position verticale de la boîte de dialogue. La position est une coordonnée absolue et ne se rapporte pas à la fenêtre de l'application Office.

Si x_pos et y_pos sont omis, la boîte de dialogue est centrée sur l'écran. La position est spécifiée dans twips.

Exemple :

Sub ExampleInputBox

Dim sText As String

    sText = InputBox ("Veuillez entrer une formule : ","Chère utilisatrice, cher utilisateur")

    MsgBox ( sText , 64, "Confirmation de formule")

End Sub