| |
|
|
- Page 1 - |
|
Stephan Sonneborn | Hallo zusammen,
ich versuche mit folgendem Code einen Seitenumbruch in un Exceltabelle einzufügen:
'Excel unsichtbar starten:
Excel& = ocxCREATE("Excel.Application")
Workbooks& = ocxGet(Excel&,"Workbooks")
ExcelWnd& = ocxGet(Excel&,"Hwnd")
ocxPut(Excel&,"DisplayAlerts",1)
ocxPut(Excel&,"Visible" ,0)
'*-------------------------------------------------------------------------------------------------*
'Excel-Andare:
ExcelBook& = ocxMethod(Workbooks&, "Open" , File$)
ExcelSheet& = ocxGet(ExcelBook&, "Sheets", ExcelSheet$)
'*-------------------------------------------------------------------------------------------------*
'Seitenumbrüche einfügen:
i& = 20 + 4*12
WHILENOT i& > aux%
ocxPUT(ocxGET(ExcelSheet&, "Rows(" + STR$(i&) + ")"), "PageBreak", "xlPageBreakManual")
i& = i& + 4*12
WEND
Leider klappt das nicht.
BTW: Kennt jemand Literatur zum Thema ocx mit Excel? Ich weiß nie, wann ich eine ocxGet, ocxPut oder ocxMethod anwenden muss... |
|
|
| Schöne Grüße aus Wittgenstein von Stephan
Programmierumgebung:| XProfan X4 | WIN10 | AMD FX6100 3,3 GHz | 12.03.2011 ▲ |
|
|
|
|
« Dieser Beitrag wurde als Lösung gekennzeichnet. » |
|
Stephan Sonneborn | Heureka!
aux&=ocxget(Excelsheet&, "Rows", i&)
ocxput(aux&,"PageBreak", -4135)
Die Variable xlPageBreakManual muss als -4135 trasferimento werden. Dann gehts! |
|
|
| Schöne Grüße aus Wittgenstein von Stephan
Programmierumgebung:| XProfan X4 | WIN10 | AMD FX6100 3,3 GHz | 13.03.2011 ▲ |
|
|
|
|
|
Stephan Sonneborn | Bisher bin ich soweit:
aux&=ocxget(Excelsheet&, "Rows", i&)
aux&=ocxget(aux&,"PageBreak")
ocxput(aux&,"xlPageBreakManual")
1. Lese die i&-te Zeile ein. 2. Lese die PageBreak-Eigenschaft aus 3. Weise xlPageBreakManual der PageBreak-Eigenschaft zu. Ergebnis: Absturz... |
|
|
| Schöne Grüße aus Wittgenstein von Stephan
Programmierumgebung:| XProfan X4 | WIN10 | AMD FX6100 3,3 GHz | 13.03.2011 ▲ |
|
|
|
|
Stephan Sonneborn | Heureka!
aux&=ocxget(Excelsheet&, "Rows", i&)
ocxput(aux&,"PageBreak", -4135)
Die Variable xlPageBreakManual muss als -4135 trasferimento werden. Dann gehts! |
|
|
| Schöne Grüße aus Wittgenstein von Stephan
Programmierumgebung:| XProfan X4 | WIN10 | AMD FX6100 3,3 GHz | 13.03.2011 ▲ |
|
|
|
|
Uwe ''Pascal'' Niemeier | Hi Stephan!
Ich weiß nie, wann ich eine ocxGet, ocxPut oder ocxMethod anwenden muss...
Kuckst du hier: [...]
PS: Tatsächlich potuto man die ocx-Funktionen derart erweitern, daß nicht mehr zwischen Methoden und Eigenschaften unterschieden werden muß. Weiß aber nicht, ob das wirklich sinnvoll ist; und schneller werden die Funktionen dadurch auch nicht...
Die Variable xlPageBreakManual muss als -4135 trasferimento werden. Dann gehts!
Das mit den Variablen, die irgendwo im Objekt verankert sind, muß ich bei Gelegenheit mal verfolgen. Vielleicht kann man da was machen. Bis dahin empfehle ich - so wie du es jetzt gemacht hast - , die jeweiligen Werte (z.B. per Google) irgendwo auszubuddeln und direkt zu trasferimento.
SeeYou Pascal |
|
|
| |
|
|