-
Fototrend

Új hozzászólás Aktív témák
-
GuMipOkE
senior tag
válasz
GuMipOkE
#150
üzenetére
A szemléltetés kedvéért (BC++ban):
Variant ExcelApp = CreateOleObject(''Excel.Application'');
ExcelApp.OlePropertySet(''Visible'', false);
Variant WBook = ExcelApp.OlePropertyGet(''Workbooks'').OleFunction(''open'', ''C:\\test.xls'');
Variant WSheet = WBook.OlePropertyGet(''ActiveSheet'');
WSheet.OleProcedure(''Activate'');
adat=WSheet.OlePropertyGet(''Range'', ''D4'');
ShowMessage(''A kért adat: '' + adat);
ExcelApp.OleProcedure(''Quit''); -
JFL
csendes tag
válasz
GuMipOkE
#130
üzenetére
Ezeket a kódokat elég körülményes megtudni. Elindítod az Excelt (vagy az éppen szükséges Office részhalmazt
), majd Eszközök->Makró->Visual Basic, itt pedig View->Object Browser. Itt láthatod az összes használható objektumot és annak mindenféle tulajdonságát. A ''Search Text'' editboxba beírod a keresett osztály nevét (fájlformátumnál pl. azt, hogy xlFileFormat), az alatta lévő ablakban megjelennek az osztály tagjai. A tagokra rákattintgatva alul kiíródik a megfelelő érték (pl. Const xlDBF4 = 11), ezeket kell beabálni a programodba. Ha sok ilyet használsz, akkor érdemes enum-okat létrehozni erre a célra. -
JFL
csendes tag
válasz
GuMipOkE
#128
üzenetére
Pedig stimmelnie kellene, legalábbis nekem VC++ esetén működik.
wbook.SaveAs(COleVariant(m_xlFile), COleVariant(xlDBF4), covOptional, covOptional, covOptional, covOptional, 0, covOptional, covOptional, covOptional, covOptional);
Megfelelő értéket adsz át a fájlformátum helyén? Az xlDBF4 egy short int, aminek értéke 11. Ha nem adod meg ezt a paramétert, akkor az alapértelmezett az xlWorkbookNormal, aminek értéke -4143 (0xFFFFEFD1).
Új hozzászólás Aktív témák
● olvasd el a téma összefoglalót!
- exHWSW - Értünk mindenhez IS
- Honor Magic6 Pro - kör közepén számok
- Méltó folytatás, de önmagában is jó: Planet of Lana II: Children of the Leaf
- Megérkezett az Apple 5K-s, 120 Hz-et biztosító monitora
- Poco F7 – bajnokesélyes
- Lakásfelújítás támogatási program (2021)
- BestBuy topik
- AliExpress tapasztalatok
- Okos Otthon / Smart Home
- Soundbar, soundplate, hangprojektor
- További aktív témák...
- Lenovo ThinkPad X1 Carbon Gen 10 i5-1245U / 16GB RAM / 512GB NVMe SSD / 1920 1200 / EU billentyűzet
- Lenovo ThinkPad X1 Carbon Gen 7 i5-8365U / 8GB RAM / 256GB NVMe SSD / 14" FHD / 12 hónap garancia
- Lenovo ThinkPad X1 Carbon Gen 9 i5-1145G7 / 16GB RAM / 256GB NVMe SSD / 14" WUXGA / 12 hónap garanci
- Gtx 1080/ Intel I7 8700K/ 16GB Ram/ 256GB M2 SSD/ 1TB HDD/ Win11
- Gtx 1050Ti/ Intel I5 7500/ 16GB Ram/ 256GB Sata SSD/ 1.5TB HDD/ Win11
- iking.hu Apple iPhone 14 128GB Midnight használt 100% akku 6 hónap garancia
- Használt Bonsen VS1900 vákuumos fóliahegesztő
- PlayStation 5 FAT Lemezes + kontroller 6 hó garancia, számlával!
- Apple iPhone 17 Pro 256GB Deep Blue használt, karcmentes 100% akku (16 ciklus) Apple garancia
- Gyümölcstartó hibátlan állapotban eladó
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

), majd Eszközök->Makró->Visual Basic, itt pedig View->Object Browser. Itt láthatod az összes használható objektumot és annak mindenféle tulajdonságát. A ''Search Text'' editboxba beírod a keresett osztály nevét (fájlformátumnál pl. azt, hogy xlFileFormat), az alatta lévő ablakban megjelennek az osztály tagjai. A tagokra rákattintgatva alul kiíródik a megfelelő érték (pl. Const xlDBF4 = 11), ezeket kell beabálni a programodba. Ha sok ilyet használsz, akkor érdemes enum-okat létrehozni erre a célra.

![;]](http://cdn.rios.hu/dl/s/v1.gif)
