Hirdetés
- Poco F7 Pro - jó, de az amatőr sem rossz
- Honor Magic7 Pro - kifinomult, költséges képalkotás
- Google Pixel topik
- Milyen okostelefont vegyek?
- One mobilszolgáltatások
- Vivo X200 FE – fenséges méret
- MIUI / HyperOS topik
- Ez lehet az Apple hajlítható telefonjának formája, mérete
- Huawei P40 Pro - kilökték a célegyenesben
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
Ú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
- Mit tud egy nagy név? Teszten az Acer Predator Orion 5000 PC
- Synology NAS
- ThinkPad (NEM IdeaPad)
- A foltozásra fókuszált az új GeForce driver
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Abarth, Alfa Romeo, Fiat, Lancia topik
- League of Legends
- Okos Otthon / Smart Home
- Kamionok, fuvarozás, logisztika topik
- Milyen autót vegyek?
- További aktív témák...
- PS4 FAT (1216A 12.02 GOLDHEN)
- FÉLÁRON SZINTE ÚJ HP HyperX Cloud Stinger Bolti ár:25k INGYEN FOXPOST
- Bomba ár! Fujitsu Lifebook T936: i5-6G I 8GB I 256SSD I 13,3" FHD Touch I Cam I W10 I Gari!
- Bomba ár! HP ProBook 640 G2 - i3-6GEN I 4GB I 128GB SSD I 14" FHD I Cam I W11 I Garancia!
- több db DELL P2417 full HD 1920x1080 IPS monitor HDMI - gari + számla
- Saeco Talea Giro Automata kávégép 6 hónap Garancia Beszámítás Házhozszállítás
- HP ProDesk 600 G4 i5-8100 16GB 512GB 1 év garancia
- ÁRGARANCIA!Épített KomPhone i5 14600KF 32/64GB RAM RX 9070 16GB GAMER PC termékbeszámítással
- VeryBig! Akciós! Dell Precision 7760 i7-11850H 32GB 512GB SSD RTX A5000 16GB 17" FHD 1 év garancia
- MacBook Pro 13, 14, 15, 16, MacBook Air M1, M2 M3 M4 bill magyarosítás lézerrel / sapkacserével
Állásajánlatok
Cég: Laptopszaki Kft.
Város: Budapest
Cég: ATW Internet Kft.
Város: Budapest



