- Vezetékes FEJhallgatók
- Androidos tablet topic
- AMD Navi Radeon™ RX 6xxx sorozat
- AMD Navi Radeon™ RX 9xxx sorozat
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Fejhallgató erősítő és DAC topik
- Milyen házat vegyek?
- Projektor topic
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Milyen billentyűzetet vegyek?
-
PROHARDVER!
Ú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!
- HP 200W (19.5V 10.3A) kis kék, kerek, 4.5x3.0mm töltők + tápkábel, 928429-002
- HIBÁTLAN iPhone 13 mini 128GB Green -1 ÉV GARANCIA - Kártyafüggetlen, MS3294
- Eladó szép állapotban levő Lenovo Tab M8HD 3/32GB / 12 hó jótállással / gyári tartozékokkal
- Bomba ár! Microsoft Surface Pro 3 Tablet - i5-4GEN I 8GB I 256GB SSD I W10 I Cam I Garancia!
- Logitech MX Anywhere 3 egér
Állásajánlatok
Cég: CAMERA-PRO Hungary Kft.
Város: Budapest