feststellen, ob worksheets selektiert?

• feststellen, ob worksheets selektiert? von Florian vom 28.10.2003 12:40:43
  • AW: feststellen, ob worksheets selektiert? - von ChrisL am 28.10.2003 13:08:46
  • AW: feststellen, ob worksheets selektiert? - von Reinhard am 28.10.2003 13:26:30

Betrifft: feststellen, ob worksheets selektiert?
von: Florian
Geschrieben am: 28.10.2003 12:40:43
Hallo!

Man kann in Excel ja mehrere Sheets auf einmal selektieren.

Wie kann ich in VBA feststellen, ob ein Sheet selektiert ist?

ich würde gerne sowas machen wie

for each ws in selection...

aber das klappt so nicht...

gruß, florian

Betrifft: AW: feststellen, ob worksheets selektiert?
von: ChrisL
Geschrieben am: 28.10.2003 13:08:46
Hi Florian

Option Explicit

Sub t()
Dim i As Integer
For i = 1 To Sheets.Count
If Sheets(i).Select Then MsgBox Sheets(i).Name & " ist selektiert."
Next i
End Sub

Gruss
Chris

Betrifft: AW: feststellen, ob worksheets selektiert?
von: Reinhard
Geschrieben am: 28.10.2003 13:26:30
Hi Florian:

Sub z()
Sheets(Array(1, 3)).Select 'Selektiert Tab1 und tab3
For Each sh In ThisWorkbook.Windows(1).SelectedSheets
MsgBox sh.Name
Next
End Sub

Gruß
Reinhard

Excel-Beispiele zum Thema " feststellen, ob worksheets selektiert?"
Feststellen, ob eine Datei in einem Verzeichnis existiert	Feststellen, ob eine bestimmte Zelle markiert ist
Feststellen, ob eine Schaltfläche mit Shift-Taste gedrückt wurde	Feststellen, welche Datei die ältere ist
In einer ComboBox selektiertes Arbeitsblatt auswählen	Nach Tabellenblatt-ComboBox den vorher selektierte Bereich wählen
Tabellen von selektierten Arbeitsblattnamen löschen	Maximalwerte im selektierten Bereich markieren
Button im selektierten Bereich erstellen und Makro zuweisen	Namen der selektierten Tabellenblätter auslesen