Office: Scrollen verhindern

Hallo Forum,

Mit folgendem Code versuche ich das Scrollen auf meinem Tabellenblatt zu verhindern.

Private Sub Workbook_Open()
Sheets("INDEX").ScrollArea = "A1:P36"
Sheets("INDEX").EnableSelection = xlNoSelection
End Sub

Jedoch funktioniert das nicht wie gewünscht. Ich kann weiterhin nach unten scrollen.???

Kann mir jemand von den VBA-Experten einen Rat geben?

Vielen Dank schon mal

Der Mampfred

 

Hi,

also ich kann nicht weiter scrollen.

Du weißt schon, dass der Befehl EnableSelection = xlNoSelection nur reagiert, wenn das Blatt geschützt ist?

---

 

Hi Beverly,

Danke für deine Antwort.
Ja, ich weiß, dass das Blatt geschützt sein muss.
Was mich umtreibt, ist die Tatsache, dass ich trotz des offensichtlich richtigen Codes mit der Maus weiterhin nach unten scrollen kann.

Woran kann das liegen?

Einen schönen Tag noch

Der Mampfred

 

bei Blatt schutz geht es.

 

Hi Hajo_Zi,
,
danke für deine Antwort.

Das Tabellenblatt ist gechützt.

Ich kann damit leben, ist aber irgendwie unschön.

Bis demnächst

Der Mampfred

 

nur wenige schauen auf Deinen Rechner und sehen die Datei.
Ich möchte gerne den Fehler im Original sehen.

Ich baue keine Datei nach. Die Zeit hat schon jemand investiert.

Ein Nachbau sieht meist anders aus als das Original. <B>Darum sollte das Original verlinkt werden.</b>

Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten
Hinweis - Anonymisierung und Pseudonymisierung von Beispielmappen - MS-Office-Forum
änderrn.
Der Name einer hochgeladenen Mappe wird im Beitrag automatisch angezeigt, sodass es bei Verwendung von aussagekräftigen Namen leichter fällt, sie später im Ablageordner wiederzufinden und sie gedanklich einem bestimmten Thema zuzuordnen. Namen wie Muster*, Test*, Mappe*, Beispiel*, Fehler*, Kalender* usw. sind so allgemein, dass eine Zuordnung zu einem Thema unmöglich gemacht wird.
Es sollte ein aussagekräftiger Name sein.

Benutze hier im Forum die Funktion zum hochladen. Falls Du die nicht benutzen möchtest beachte, von unsicheren Servern wie z.B. www.file-upload.net lade ich keine Datei runter. (lt. Einschätzung meines Virenprogramms)3

Bilder lade ich mir nicht runter, da Excel damit nichts anfangen kann.

Bilder statt Datei | Excel ist sexy!

Hochgeladene Bilder können zwar als solche in Excel importiert werden, sind jedoch bei der Lösung von Problemen nicht sehr hilfreich, da man die eigentlichen Daten nicht ohne große und zeitraubende Umwege direkt in die Tabelle übertragen kann.

Das ist nur meine Meinung zu dem Thema.

Gruß Hajo

 

Hallo HaJo,
anbei eine Testdatei. Hier ist der gleiche Code wie in meiner Originaldatei. Der Blattschutz ist hier aufgehoben.
Komischerweise funktioniert hier das Scrollen verhindern, jedoch in meiner Originaldatei nicht.

Viele Grüße

Der Mampfred

 

ich bin dann raus, da meine Beitrag nicht komplett gelesen wurde.
Das wird schon seinen Grund haben.
Ich schreibe nicht für den Papierkorn. Ich bin dann raus.
Viel Erfolg noch.

Gruß Hajo

 

Hi,

eine Datei, in der es das Problem nicht gibt, brauchst du nicht hochzuladen...

Da niemand deine Originaldatei mit dem Problem kennt kann man dir nur folgenden Ratschlag geben: erstelle eine neue Datei mit denselben Inhalten wie die Originaldatei. Wenn dort das Problem auch auftritt, kann es nur daran liegen, dass du irgendeinen Code in der Mappe hast, der die Scrollbeschränkung aufhebt (möglicherweise im Codemodul des betreffenden Tabellenblattes).

---

 

Hi Beverly,
danke für deine investierte Arbeit. ich werdee alles nochmal durchforsten.

Viele liebe Grüße

der Mampfred