| |
| |
|
| - Seite 1 - |
|
Stephan
Sonneborn | Hallo zusammen,
ich versuche mit folgendem Code einen Seitenumbruch in eine 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-Datei öffnen:
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 übergeben 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 übergeben 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 könnte 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 übergeben 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 übergeben.
SeeYou
Pascal |
|
| |
| |
| |
|
(507)
Deutsch
English
Français
Español
Italia