https://forge.codesys.com/forge/talk/Deutsch/thread/00c9ed7415/2020-02-28T11:18:05.573000ZRecent posts to Daten von Excel nach CoDeSys via DDE2020-02-28T11:18:05.573000Z2020-02-28T11:18:05.573000ZJoWehttps://forge.codesys.com/u/jowe/https://forge.codesys.com5edf31c5ec243b9d9c9b67fee93e77364eb3f15a

<div class="markdown_content"><p>Hallo,</p> <p>ich hab grade Daten von Excel nach CoDeSys über DDE übertragen, und da es keine gescheite Anleitung dazu gibt (<em>wink</em>), hier ein Codeschnipselchen:</p> <p>Daten lesen ist ganz einfach. In eine Zelle muss rein:</p> <div class="codehilite"><pre><span></span><span class="o">=</span><span class="n">CoDeSys</span><span class="o">|</span><span class="s1">'C:\HOME\MYFIRSTSTEPS.PRO'</span><span class="o">!</span><span class="n">Machine</span><span class="p">.</span><span class="n">X_pos</span> </pre></div> <p>Wichtig ist, daß der Pfad richtig geschrieben ist, sonst kommt eine Fehlermeldung, daß CODESYS.EXE nicht gestartet werden kann.</p> <p>Trickreicher ist das Schreiben von Daten nach CoDeSys. Hier ein VBA-Makro, das das erledigt:</p> <div class="codehilite"><pre><span></span><span class="n">Channel</span> <span class="o">=</span> <span class="n">Application</span><span class="p">.</span><span class="n">DDEInitiate</span><span class="p">(</span><span class="ss">"CODESYS"</span><span class="p">,</span> <span class="ss">"C:\HOME\MYFIRSTSTEPS.PRO"</span><span class="p">)</span> <span class="n">Application</span><span class="p">.</span><span class="n">DDEPoke</span> <span class="n">Channel</span><span class="p">,</span> <span class="ss">"Machine.Counter"</span><span class="p">,</span> <span class="n">Sheets</span><span class="p">(</span><span class="ss">"Blad1"</span><span class="p">).</span><span class="n">Range</span><span class="p">(</span><span class="ss">"F8"</span><span class="p">)</span> <span class="n">Application</span><span class="p">.</span><span class="n">DDETerminate</span> <span class="n">Channel</span> </pre></div> <p>Hier ist unbedingt zu beachten, daß DDEPoke als Wert keine Variablen nimmt, sondern nur mit Ranges (also Zellbezügen) arbeitet. Das ist doof, geht aber nicht anders. Ausserdem werden Daten, die geschrieben werden, nicht wieder über DDE zurückübertragen, das ist auch nicht optimal.</p> <p>Gruß</p> <p>Jochen</p> <p><img alt="IMG: Bild" rel="nofollow" src="http://www.wendebaum.de/avatar88.jpg"/></p></div>