Partager via


Méthode Global.DDERequest (Word)

Utilise un canal d'échange dynamique de données (DDE) pour requérir des informations provenant de l'application destinataire, et renvoie ces informations sous la forme d'une chaîne.

Syntaxe

expression. DDERequest( _Channel_ , _Item_ )

Expression Variable qui représente un objet « Global ». 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 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 de Microsoft Excel, puis 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

Objet global

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.