Classe Dialog (Excel VBA)

Cet objet représente une boîte de dialogue Microsoft Excel intégrée.

Set

Pour utiliser une variable de classe Dialog, elle doit d'abord être instanciée, par exemple

Dim dlg as Dialog
Set dlg = Application.Dialogs(Index:=1)

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe Dialog : Dialogs.Item et Application.Dialogs

For Each

Voici un exemple de traitement des éléments Dialog dans une collection

Dim dlg As Dialog
For Each dlg In Application.Dialogs
	
Next dlg

Parent

Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Show

Affiche la boîte de dialogue intégrée, attend la saisie de l'utilisateur et renvoie une valeur booléenne qui représente la réponse de l'utilisateur.

Vous pouvez utiliser une seule boîte de dialogue pour modifier de nombreuses propriétés en même temps. Par exemple, vous pouvez utiliser la boîte de dialogue format de cellule pour modifier toutes les propriétés de l'objet font . Pour certaines boîtes de dialogue prédéfinies (la boîte de dialogue ouvrir , par exemple), vous pouvez définir des valeurs initiales à l'aide de Arg1, Arg2,..., Arg30. Pour trouver les arguments à définir, placez la constante de la boîte de dialogue correspondante dans les listes d’arguments de boîte de dialogue intégrée. Par exemple, cherchez la constante xlDialogOpen pour trouver les arguments de la boîte de dialogue Ouvrir. Pour plus d'informations sur les boîtes de dialogue prédéfinies , reportez-vous à la collection Dialogs.

Syntaxe : expression.Show (Arg1, Arg2, Arg3, Arg4, Arg5, Arg6, Arg7, Arg8, Arg9, Arg10, Arg11, Arg12, Arg13, Arg14, Arg15, Arg16, Arg17, Arg18, Arg19, Arg20, Arg21, Arg22, Arg23, Arg24, Arg25, Arg26, Arg27, Arg28, Arg29, Arg30)

Application.Dialogs(xlDialogOpen).Show

Arguments

Les arguments suivants sont facultatifs

Arg1

Arg2

Arg3

Arg4

Arg5

Arg6

Arg7

Arg8

Arg9

Arg10

Arg11

Arg12

Arg13

Arg14

Arg15

Arg16

Arg17

Arg18

Arg19

Arg20

Arg21

Arg22

Arg23

Arg24

Arg25

Arg26

Arg27

Arg28

Arg29

Arg30

Dialogs.Count

Cette propriété renvoie une valeur de type Long qui représente le nombre d’objets de la collection.

Dim lngCount As Long
lngCount = Application.Dialogs.Count

Dialogs.Item

Cette méthode renvoie un seul objet d'une collection.

Syntaxe : expression.Item (Index)

Index: Nom ou numéro d'index de l'objet.

Application.Dialogs.Item(xlDialogOpen).Show arg3:=True

Dialogs.Parent

Renvoie l’objet parent pour l’objet spécifié. En lecture seule.