Méthode Application.DDERequest (Word)
Utilise un canal d'échange dynamique de données exchange (DDE) pour requérir des informations provenant de l'application destinataire et renvoie ces informations sous forme de chaîne.
Syntaxe
expression. DDERequest( _Channel_ , _Item_ )
expression Variable qui représente un objet « Application ». Facultatif.
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Canal | Obligatoire | Entier long | Numéro de canal renvoyé par la méthode DDEInitiate. |
| Item | Obligatoire | String | Élément à requérir. |
Remarques
Lorsque vous demandez des informations provenant d'une rubrique de l'application serveur, vous devez spécifier l'élément de cette rubrique dont vous demandez le contenu. Dans Microsoft Office Excel, par exemple, les cellules sont des éléments valides et vous pouvez y faire référence soit en utilisant le format « R1C1 », soit au moyen de plages nommées.
Microsoft Excel et les autres applications qui prennent en charge DDE reconnaissent une rubrique nommée « Système ». Trois éléments standard de la rubrique Système sont décrits dans le tableau suivant. Vous pouvez obtenir une liste des autres éléments de la rubrique Système à l'aide de l'élément SysItems.
| Élément de la rubrique Système | Effet |
|---|---|
| SysItems | Renvoie la liste de tous les éléments de la rubrique Système. |
| Topics | Renvoie la liste de toutes les rubriques disponibles. |
| Formats | Renvoie la liste de tous les formats Presse-papiers gérés par Word. |
Exemple
Cet exemple montre comment ouvrir le classeur Microsoft Excel Book1.xls et extraire le contenu de la cellule R1C1.
Dim lngChannel As Long
lngChannel = DDEInitiate(App:="Excel", Topic:="System")
DDEExecute Channel:=lngChannel, Command:="[OPEN(" & Chr(34) _
& "C:\Documents\Book1.xls" & Chr(34) & ")]"
DDETerminate Channel:=lngChannel
lngChannel = DDEInitiate(App:="Excel", Topic:="Book1.xls")
MsgBox DDERequest(Channel:=lngChannel, Item:="R1C1")
DDETerminateAll
Cet exemple montre comment ouvrir un canal vers la rubrique System d'Excel et utiliser l'élément Topics pour renvoyer la liste des rubriques disponibles. La liste de rubriques, qui comprend tous les classeurs ouverts, est ensuite insérée après la sélection.
Dim lngChannel As Long
Dim strTopicList As String
lngChannel = DDEInitiate(App:="Excel", Topic:="System")
strTopicList = DDERequest(Channel:=lngChannel, Item:="Topics")
Selection.InsertAfter strTopicList
DDETerminate Channel:=lngChannel
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.