- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- iPhone topik
- Szívós, szép és kitartó az új OnePlus óra
- Mi nincs, grafén akku van: itt a Xiaomi 11T és 11T Pro
- Redmi Watch 5 Lite - filléres fitneszfelügyelő
- Megjött a jubileumi Pixel széria
- Magisk
- Google Pixel topik
- Samsung Galaxy S24 FE - később
- Óriáskészülék, kis akksival
Új hozzászólás Aktív témák
-
Cpt. Flint
tag
válasz
#90999040 #1482 üzenetére
Engem igazán az izgatna, hogy változót hogy tudok átadni mondjuk excelből wordbe.
Mert itt a legnagyobb problémánk az volt, hogy a körlevél rekordszám az excelben megfelelő programrésszel meghatározott/szűrt sorok száma kell legyen, de ezt a változót csak az excel tábla egyik cellájából bírtuk kibányászni Wordből indított DDE hívással, ami egy baromi körülményes és vacak megoldásnak tűnik nekem:
lngChannel = DDEInitiate(App:="Excel", Topic:="akarmi.xls")
ig2 = DDERequest(Channel:=lngChannel, Item:="r11c17")
Application.DDETerminateAll
Többek között ez csak a "Munka1" lapról szed, én nem tudtam elérni, hogy más munkalap legyen a forrás, aztán csak a R1C1 stílusú hivatkozás működött; illetve ha nem volt látható a hivatkozott cella (mondjuk el volt rejtve vagy össze volt csukva az adott sor v. oszlop), akkor valami nem jó értéket adott vissza (karakterként négyzet, chr$-ként talán 13?).
Sajnos a DDERequestről eddig nem sikerült normális (a VBA helpnél bővebb) leírást találnom, úgyhogy nem is vagyok tisztában vele, hogy esetleg valami más, értelmesebb, kezelhetőbb formában használható-e.
Új hozzászólás Aktív témák
- BestBuy topik
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- Kerékpárosok, bringások ide!
- Kormányok / autós szimulátorok topikja
- eBay-es kütyük kis pénzért
- LG LCD és LED TV-k
- Robotporszívók
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- iPhone topik
- One otthoni szolgáltatások (TV, internet, telefon)
- További aktív témák...
- Bomba ár! Dell Latitude 5300 - i5-8GEN I 8GB I 256SSD I 13,3" HD I HDMI I Cam I W11 I Gari!
- Samsung Galaxy A50 128GB, Kártyafüggetlen, 1 Év Garanciával
- HP EliteBook 835 G7 AMD Ryzen 5 4650U
- Intel Core i5 3470 confidential Ivy bridge Quad Core
- HUAWEI MateBook 13 2020 - Kijelző nélkül - I7-10510U - 16GB - 512GB SSD - Win11 - MAGYAR
Állásajánlatok
Cég: FOTC
Város: Budapest