Excel: Druckseiten als 'Buch' lesen

Hallo Interessierte,

im Word-Brett wollte jmd. seine Seiten seines Word-Dokuments am Bildschirm ähnlich wie in einem Buch lesen können am Bildschirm.
Also links Seite 1, rechts Seite 2.
Durch Klick kann man blättern und sieht dann links Seite 3 und rechts Seite 4, usw.

Ich meine diese Beitragsfolge:
http://www.wer-weiss-was.de/article/6513065

Da kann man auch eine Demo-Datei von mir runterladen.

Besteht jetzt hier Interesse daß ich das für Excel umschreibe?
So daß man auch in Excel durch alle Druckseiten wie in einem Buch durchblättern kann?

Gruß
Reinhard

Grüezi Reinhard
Das würde mich interessieren!
Aber ich möchte nicht schuld sein, wenn Du bei diesem Wetter einen Hitzeschlag kriegst vor lauter hirnen!
Viele Grüsse
Niclaus

Das würde mich interessieren!

Hallo Niclaus,

die Datei in Word habe ich schon paar Tage fertig aber da der Anfrager im Wordbrett Null Interesse zeigt, naja, wer nicht will der hat schon.
Bei Interesse kann ich die hochladen.

Word und Excel (in Vba) sind unterschiedlich aber in einem ziehen sie in die gleiche Richtung, leider.
Bei beiden ist es (unterschiedlich) schwierig auf eine spätere Druckseite zu referenziern.

Im Sinne von diesem Pseudocode:

With Thisdocument.PrintPages(5)
.Copy
end with

bzw.

With Activesheet.PrintPages(5)
.Copy
end with

Aber egal, das kriege ich hin. Kann nur sein daß dies inmitten meiner sonstigen unerledigten Exceldinger untergeht, du darfst aber gerne in paar Tagen mich anmailen und nachfragen :smile:

Gruß
Reinhard

Grüezie Niclaus,

Das würde mich interessieren!

sehr schön *freu*, immerhin fast 10% derer die sich die Mappe heruntergeladen haben zeigen Interesse.
Das ist für hier und die träge Masse hier schon sehr viel *find*

Aber ich möchte nicht schuld sein, wenn Du bei diesem Wetter
einen Hitzeschlag kriegst vor lauter hirnen!

Danke dir für die Fürsorge :smile:

Hier ist was für Excel, getestet mit XL 2000:
http://www.file-upload.net/download-3572190/Drucksei…

Im Wesentlichen besteht die Uf aus zwei Image (-Boxen), dort sollen dann später die jeweiligen Druckseiten angezeigt werden, als 1 und, 3 und 4 usw.
Wenn die Druckseitenanzahl ungerade ist dann logischerweise „rechts“ das Bild leer wenn links die größte Druckseite angezeigt wird.

Der Code wäre schon lange fertig aber ich hänge schwer an „HPageBreak“ in Vba fest :frowning:
Wie ein Vba-Guru mal sagte, HPageBreak ist Teufelswerk, wie wahr.
Und dieses HPageBreak brauche ich um zu ermitteln welchen Zellbereich Druckseite 27 umfasst.
(Wer HPageBreak nicht kennt, das ist der horizontale Seitenumbruch)

Wenn das gelöst ist und ich habe deshalb andernorts nachgefragt und es sieht gut aus für eine Lösung, muß es erst noch testen, entwickle ich die Mappe weiter.

Du könntest mir helfen um mir Tests abzunehmen, lad die mappe runter und checke, teste, was weiß ich.
Wenn du dich nicht meldest gehe ich davon aus alles klappt, bis auf die eigentliche Seitendarstellung.

Und ja, auch die feste Pixel oder sind das Punkte? Vorgabe für die UF muß noch angepasst werden. Aber das hat erstmal keine Priorität.

Und falls es hier jmdn. interessiert warum ich an „HPageBreak“ „Festhänge“, hier kommt Fehler 9 (Index außerhalb…) bei der For-Zeile, das Zählen in der zeile davor klappt problemlos:

Sub dd()
Dim HP As HPageBreak
ThisWorkbook.Worksheets("Tabelle1").Activate
MsgBox ThisWorkbook.Worksheets("Tabelle1").HPageBreaks.Count
For Each HP In ThisWorkbook.Worksheets("Tabelle1").HPageBreaks
 MsgBox HP.Location.Address
Next HP
End Sub

Netterweise wurde mir dann dieser link (u.a., auch Code) genannt:
http://support.microsoft.com/kb/210663
Das erklärt vieles auf was man als Anwender nie kommen kann :frowning:
Muß es aber erstmal gründlich durchlesen, habs eben nur überflogen.

Gruß
Reinhard

Das würde mich interessieren!

Grüezie Niclaus,

in der beigefügten Mappe bzw. dort tabelle1 funktioniert der Code bei Kurztests in XL2000.

http://www.file-upload.net/download-3573959/Drucksei…

Insgesamt ist der Code noch Baustelle also noch einiges aufzuräumen, zu tun, mal schauen ob ich dazu Lust habe :smile:

Gruß
Reinhard