Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
312to316
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
312to316
312to316
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

ScrollArea

ScrollArea
24.09.2003 07:49:00
Detlef
Hallo Profis,

mit dem Befehl:
Worksheets(1).ScrollArea = "a1:am33"
begrenze ich beim öffnen einer Arbeitsmappe
den Scrollbereich. Nun wird in dieser Mappe
die Tabelle 1 kopiert und erhält einen neuen
Tabellennamen. Es können auch mehrere Tabellen-
blätter sein. Wie kann ich den Scrollbereich
"a1:am33" trotzdem auf alle Tabellenblätter mit
begrenzen ?
Hat jemand eine Idee ?

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ScrollArea
24.09.2003 08:39:12
WernerB.
Hallo Detlef,

kopiere diese beiden Makros in das Modul von "DieseArbeitsmappe":

Option Explicit

Private Sub Workbook_Open()
ActiveSheet.ScrollArea = "A1:AM33"
End Sub


Private Sub Workbook_SheetActivate(ByVal Sh As Object)
ActiveSheet.ScrollArea = "A1:AM33"
End Sub

Viel Erfolg wünscht
WernerB.

P.S.: Das Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter (siehe Forums-FAQ).
AW: ScrollArea
24.09.2003 08:46:56
Detlef
Hallo Werner,
funktioniert !
Besten Dank.
Gruss Detlef
Anzeige
AW: ScrollArea
24.09.2003 08:48:25
BerndE
Moin Detlef,

ergänzend zu der Antwort von Werner kannst Du hiermit nur kopierte Blätter eingrenzen:


Private Sub Worksheet_Deactivate()
If Right(ActiveSheet.Name, 3) = "(2)" Then
MsgBox ("Kopie !!!")
Rem *** hier dann ScrollArea einrichten ***
End If
End Sub


Den Code musst Du in Deinem Beispiel in Tabelle1 (!!!) eintragen.

Gruß
Bernd

www.bernds.page.de.vu

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige