Hirdetés
- ThinkPad (NEM IdeaPad)
- Ne várj sokat a vásárlással: drágulás a láthatáron
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Gigantikus fordulatot vett a GeForce RTX 50 Super sorozat törlése
- Milyen processzort vegyek?
- Amlogic S905, S912 processzoros készülékek
- SSD kibeszélő
- Valami baja van a tápomnak
- AMD K6-III, és minden ami RETRO - Oldschool tuning
Ú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
- Google Pixel topik
- GL.iNet Flint 2 (GL-MT6000) router
- ThinkPad (NEM IdeaPad)
- Xiaomi 15T - reakció nélkül nincs egyensúly
- A fociról könnyedén, egy baráti társaságban
- Xbox tulajok OFF topicja
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- Építő/felújító topik
- sziku69: Fűzzük össze a szavakat :)
- Samsung Gear S3 - második kör
- További aktív témák...
- BESZÁMÍTÁS! Asus B150-Pro i5 6500 8GB DDR4 250GB SSD 1TB HDD GTX 1050Ti 4GB Rampage SHIVA 450W
- ÁRGARANCIA!Épített KomPhone i5 14600KF 32/64GB DDR5 RAM RTX 5070Ti 16GB GAMER PC termékbeszámítással
- Ravpower 6000 mAh-s mégis pici powerbank eladó
- Tablet felvásárlás!! Samsung Galaxy Tab A8, Samsung Galaxy Tab A9, Samsung Galaxy Tab S6 Lite
- GYÖNYÖRŰ iPhone 12 mini 64GB White -1 ÉV GARANCIA - Kártyafüggetlen, MS3849, 100% Akksi
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest



