Hallo Reinhard!
Meine Anwendung ist verdammt hartnäckig!
Jetzt öffnet sie schon mit der zweiten Seite!
Mache ich ev. etwas falsch?
Gruß Paul W.
Meine Anwendung ist verdammt hartnäckig!
Jetzt öffnet sie schon mit der zweiten Seite!
Mache ich ev. etwas falsch?
Hallo Paul,
dann brauche ich deine Datei.
In meiner Testdatei mit 4 Seiten, auch manuell. Seitenwechsel drin
klappte das.
Anonymiere, aus-X-en o.ä. den Textinhalt, lass aber alle Objekte usw.
drin. Hochladen mit dem obersten Link in FAQ:2606
Wo genau steht dein cursor wenn du das Dokument schließst?
In normalem Text, wo genau? Oder in einer Textbox, tabelle oder sonstwas?
Achja, zum Testen brauchst du nicht immer erst Datei schließen dann
öffnen. Positioniere den Cursor wahlweise an/in verschiedenen Stellen
dann jeweils mit Alt+F11 in den Editor wechseln, den dortigen Cursor
in den Code meiner Kleincodes stellen uns F5 drücken.
Danach mit Alt+F11 im Dokument prüfen wo der dortige Cursor hingehüpft ist.
Gruß
Reinhard
Hallo Reinhard!
Wenn ich so handle, wie im letzten Absatz beschrieben, dann springt der Cursor auch an das Ende der letzten Seite. Aber, wenn ich die Datei schließe- Cursor auf der letzten Seite am Textende, dann wird die Seite 2 angezeigt, der Cursor steht auf der ersten Seite am Ende des Textes.
Die Datei kann ich leider nicht weitergeben, sie enthält vertrauliche Patientendaten.
Gruß
Paul W.
Die Datei kann ich leider nicht weitergeben, sie enthält
vertrauliche Patientendaten.
Hallo Paul,
aus-X-en = du machen Kopie von Original. dann du in Kopie
reinschreiben
xxxxxxxx xxxxx xxxxxxxx xxxxxx xxxxx xxxxxxx xxxxxxx xxxxxxxxxxxx
Zeile kopieren.
dann einen Textblock a 10 Zeilen markieren, entfernen und 10mal
Strg+v drücken.
Eine Sache von 2-4 min dann ist deine Datei ausge-X-t.
Ähnliches Vorgehen in Textboxen o.ä.
Gruß
Reinhard
Hallo Reinhard, hier der link:
http://www.file-upload.net/download-4690031/Kopierte…
Mit Gruß
Paul W.
Hallo Paul,
Wenn ich so handle, wie im letzten Absatz beschrieben, dann
springt der Cursor auch an das Ende der letzten Seite.
Die Prozedur „Document_Open“, die du manuell mit F5 startest
wird von Word beim Dokument-Öffnen auch gestartet.
Aber,
wenn ich die Datei schließe- Cursor auf der letzten Seite am
Textende, dann wird die Seite 2 angezeigt, der Cursor steht
auf der ersten Seite am Ende des Textes.
Ich habe es mehrmals mit deiner hochgeladenen mappe probiert.
Bei mir funktioniert es so wie soll.
Gruß
Reinhard
Hallo Reinhard!
Danke für all Deine Mühe, die du mit meinem Problem gehabt hast.
Leider ist es immer noch so, dass es bei mir nicht läuft. Wo dran es liegt, das wissen nur die kleinen PC-Männchen!
Nochmals danke und Gruß von
Paul W.
Hallo Paul,
Leider ist es immer noch so, dass es bei mir nicht läuft. Wo
dran es liegt, das wissen nur die kleinen PC-Männchen!
tja nun, da bin ich an der Grenze meiner Möglichkeiten.
Dir kann da nur helfen daß da durch Zufall dahinterkommst.
Oder ein neues Dokument nehmen und da den Text reinkopieren, also
keine Kopie des Dokuments erstellen denn dann besteht die Gefahr
daß du marode Stellen im alten Dokument mit rübernimmst.
Du hast da Patientendaten? Bist du da in einer Klinik o.ä.?
Dann wirds ja wohl Arbeitskollegen geben die sowieso auch die daten
einsehen können, lass die mal meine Codes testen an deiner Datei.
Ich persönlich, denke bzw. nur so gibt das für mich Sinn,
deine hochgeladene Datei unterscheidet sich von der Originaldatei.
Nein, nicht die reinen Texteinträge, die sind m.E. wurscht.
Ich mein da sowas wie Kopf- Fußzeilen, Endnotes, textboxen oder was
immer da auch Word zu bieten hat, k.A.
Achja, deine hochgeladene Datei hat im Document nur schlappe 9 Seiten Text. Erstaunlich wie lahm da Word 2007 ist um da von Zeile zu Zeile
zu hüpfen. Was macht denn da Word 2007 wenn ich per Code derart
bei einem tausendzeiligen Dokument ans Ende hüpfe?
Da werde ich ja zum Koffein-Junkie wenn ich da immer Kaffee trinken
gehe *grien*
Damit das für dich schneller geht und der Bildschirm nicht so rumzuckt
benutze Application.Screeupdating…
Hier also der neue Code. Er ist auch ergänzt worden. Nicht nur beim
Öffnen sondern auch beim Schließen wird ans Dokumentende gehüpft.
Naja, nach meiner Teorie, bei dir klappts ja leider nicht 
Private Sub Document_Open()
Application.ScreenUpdating = False
Selection.MoveDown wdLine, 10000
Application.ScreenUpdating = True
End Sub
Private Sub Document_Close()
Application.ScreenUpdating = False
Selection.MoveDown wdLine, 10000
Application.ScreenUpdating = True
End Sub
Gruß
Reinhard
Nochmals danke und Gruß von
Paul W.
Hallo Reinhard!
In Kurzfassung:
Neue Datei erstellt, Text seitenweise hineinkopiert, als ‚doc‘-Datei abgespeichert, aufgerufen, Makro eingetragen, abgespeichert, aufgerufen, Sicherheitsmeldung: Makros deaktiviert, sollen sie aktiviert werden? ‚Ja‘ und so hoppelten Cursor und Ansicht bis ans Ende der Datei! Wieder geschlossen und neu aufgerufen und es zeigte wieder den Cursor und die ansicht auf der Seite 2 !!!
Ohne weiteren Kommentar grüßt
Paul W.
Neue Datei erstellt, Text seitenweise hineinkopiert, als
‚doc‘-Datei abgespeichert, aufgerufen, Makro eingetragen,
abgespeichert, aufgerufen, Sicherheitsmeldung: Makros
deaktiviert, sollen sie aktiviert werden? ‚Ja‘ und so
hoppelten Cursor und Ansicht bis ans Ende der Datei! Wieder
geschlossen und neu aufgerufen und es zeigte wieder den Cursor
und die ansicht auf der Seite 2 !!!
Hallo Paul,
sorry, ich kann da nix mehr machen. Mir gelingt es nicht den Fehler
zu (re)produzieren.
Erst dann habe ich eine minimale Chance für eine Lösung.
Gruß
Reinhard
Hallo Reinhard!
Es ist wie es ist!
Google mal nach GIGO!
Freundliche Grüße
Paul W.