Herbers Excel-Forum - das Archiv

feststellen, ob worksheets selektiert?

Bild

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

Bild

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
Bild

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
 Bild
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