Sommaire DDE - VB/VBA/VBS - Programmation
Marsh Posté le 27-02-2006 à 18:01:00
ReBonjour,
J' ai commancé à programmé avec les DDE, cependant, mes premier essaie ne sont pas au point, pourriez vous me faire une correction avec explication sur celui -ci :
dmd = InputBox("Saisir le nom du disque ou se situe le dossier : " ) 'Recherche du dossier PowerPoint
With Application.FileSearch
.LookIn = dmd & ":\"
.Filename = "Economie_Chx"
.SearchSubFolders = True
.FileType = msoFileTypePowerPointPresentations
.Execute
For i = 1 To .FoundFiles.Count
A = .FoundFiles(i)
Next
End With
Dim appdiapo As PowerPoint.Application
Set appdiapo = CreateObject("powerpoint.application" )
With appdiapo
.Activate
.Presentations.Open Filename:=A 'ouverture du dossier powerpoint
.Presentations.Application.ActivePresentation.SlideShowSettings.Run 'Lancement de la diapo
End With
Dim canal As Variant
canal = DDEInitiate(app:="WINPOWER", topic:=appdiapo.Presentations.Application.ActivePresentation) ' L' erreur se situe ici
DDERequest canal, Label1 'Demande les information contenu par Label1 ?
MsgBox Label1 ,affiche les information du Label1 Powerpoint
Merci
Marsh Posté le 02-03-2006 à 21:39:42
Bonjour,
(Petite parenthèse), il semblerait que les DDE ne sont pas disponibles sous PowerPoinint, y aurait il en moyen de donner des informations de PowerPoint vers Excel, dans le même style que les DDE.
Merci
Marsh Posté le 03-03-2006 à 10:00:54
DDE est obsolète depuis des lustres et si tu peux faire un CreateObject("powerpoint.application" ), au minimum il faut utiliser OLE Automation.
Tu programmes dans quel contexte ? VBA pour Excel, VBScript, ... ?
Personnellement je ne connais pas powerpoint, donc je ne te serai pas d'un grand secours
Marsh Posté le 03-03-2006 à 16:27:32
Salut,
Merci tegu, mais je me suis déjà familiariser avec la technologie OLE, je voulais donc essayer un autre moyen d' ouvrir une "discussion" entre application. Si tu pourvais m' en dire en peux plus sur la question...
NB : Programme avec VBA Excel
Marsh Posté le 18-03-2006 à 23:40:08
Bonjour,
J' aimerais avoir tout de même une réponse à mon problème, ou tout de moin un petit résume comme demander précédement sur les DDE.
Merci
Marsh Posté le 20-03-2006 à 22:02:02
salut
DDE C'est vraiment un truc de martien. Je ne me souviens que de galère...
As tu essayé simplement d'ouvrir un canal avec une application déjà fermé. Je crois que 'application doit absolument être fermée pour que la communication soit ouverte. Hors tu faits un ceate object !!!
J'ai relu l'aide et voilà ce que j'ai trouvé
If the application isn't already running or if it's running but doesn't recognize the topic argument or doesn't support DDE, the DDEInitiate function returns a run-time error.
Essaye avec un pps existant et powerpoint fermé.
A+
Marsh Posté le 21-03-2006 à 20:10:27
... Rectification grossière erreur : Il faut bien que la session soit ouverte pour que la canal DDE fonctionnne...Mail il n'en faut qu'une !
Avec power point, j 'obtiens une erreur 282 comme quoi il est impossible d'ouvrir le canal DDE. et ce indépendamement de la méthode d'ouverture de l'application objet/shell
Raison : toutes les applications ne sont pas compatibles DDE
Outre les pb entre les versions françaises et anglaises de la suite office sur VBA y pas franchement beaucoup de possibilité mise à part pokedde, pokemon... c'est la mort.
Marsh Posté le 24-03-2006 à 23:47:50
Bonjour,
Merci beaucoup maddraf, ton explication pourrait aussi expliquer l' abscense de programmation en DDE sur ppt.
Mis à part ça, j' ai découvert l' existence d' une DDEExcute.
Y a t- il quelque chos ede pariculier à dire sur cette commande ?
Merci
Marsh Posté le 24-02-2006 à 19:06:06
Bonjour,
Voilà, le pasage de mon bouquin sur les DDE est, de mon point de vue, assez pauvre. Serait -il possible que vous me fassiez un résumé sur ?
Merci