Les boîtes de dialogue prédéfinies
Boîtes de dialogue:prédéfinies1. La fonction InputBox
InputBox:fonctionElle affiche une invite et renvoie le texte tapé par l’utilisateur.
InputBox(prompt,title,default,xpos,ypos,helpfile,context) |
prompt |
Chaîne qui sera affichée comme message. |
|
title |
Chaîne affichée dans la barre de titre. |
|
default |
Valeur proposée par défaut. |
|
xpos |
Position horizontale de la boîte de dialogue (valeur exprimée en twips). |
|
ypos |
Position verticale de la boîte de dialogue (valeur exprimée en twips). |
|
helpfile |
Nom du fichier d’aide contextuelle. |
|
context |
Numéro de contexte dans l’aide. |
Exemple
Affichage d’une boîte de dialogue demandant le nom des cellules à effacer (les cellules sont nommées avec des noms de mois).
Sub Effacement_Cellules_Nommées()
Dim sChoix As String
' Demande de saisir le mois à effacer
' Si le mois est reconnu, effacement des cellules nommées
' Sinon, envoi d'un message d'erreur
sChoix = InputBox( _
Prompt:="Quel mois effacer ?", _
Title:="Effacement de cellules")
On Error GoTo Err
Application.Goto reference:=sChoix
Selection.Clear
Exit Sub ...
Conditions générales d'utilisationCopyright - © Editions ENI ||Politique de protection des données du groupe ENI