Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

DisplayHeadings = True für 3 Arbeitsblätter

Forumthread: DisplayHeadings = True für 3 Arbeitsblätter

DisplayHeadings = True für 3 Arbeitsblätter
04.02.2008 11:43:00
Klaus
Hallo Forum,
kann ich in einem Makro bei 3 Arbeitsblättern gleichzeitig die horizontalen und vertikalen Bildlaufleisten ein- bzw. ausblenden? Bisher habe ich nur Beispiele mit ActiveSheet gefunden. Versucht habe ich …
Dim wks1 As Worksheet
Dim wks2 As Worksheet
Dim wks3 As Worksheet
Set wks1 = Worksheets("A")
Set wks2 = Worksheets("B")
Set wks3 = Worksheets("C")
Windows(wks1.Parent.Name).DisplayHeadings = True
Windows(wks2.Parent.Name).DisplayHeadings = True
Windows(wks3.Parent.Name).DisplayHeadings = True
… hat mir aber auch nur im aktiven Sheet das richtige Ergebnis gebracht.
Für Antworten Danke im vorraus
Klaus

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: DisplayHeadings = True für 3 Arbeitsblätter
04.02.2008 12:51:28
Mag
Hi,
? Zeilen- und Spaltenköpfe im aktiven Fenster nicht mehr anzeigen:

Option Explicit
Sub ttt()
Dim wks As Worksheet
For Each wks In Worksheets
wks.Activate
wks.DisplayHeadings = True
Next
End Sub


Gruss

AW: DisplayHeadings = True für 3 Arbeitsblätter
04.02.2008 12:57:00
Renee
Hi Klaus,
Diesen Code in DieseArbeitsmappe:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Const thisSheets = "A,B,C"
If InStr(thisSheets, Sh.Name) > 0 Then ActiveWindow.DisplayHeadings = False
End Sub


GreetZ Renée

Anzeige
Vielen Dank Mag & Renée ... o.T.
04.02.2008 13:53:00
Klaus
ein Dankeschön Euch Beiden ...
Gruß
Klaus
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige