Herbers Excel-Forum - das Archiv

Range("B3").Select klappt nicht.

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Range("B3").Select klappt nicht.
von: Marco
Geschrieben am: 10.10.2003 10:47:49
Hallo zusammen,

habe folgendes erstellt:

Private Sub ComboBox1_Change()
If ComboBox1.Text = "Tag 1" Then
Worksheets("Days").Select
Range("B3").Select
End If
End Sub


Nach Auswahl in der Combo-Box wird auch nach "Days" gewechselt,aber dann kommt folgende Fehlermeldung:
Die Select-Methode des Range-Objektes konnte nicht ausgeführt werden. Da steht aber leider nicht warum.
Weiß hier jemand Rat?

Gruß Marco
Bild

Betrifft: AW: Range("B3").Select klappt nicht.
von: K.Rola
Geschrieben am: 10.10.2003 10:54:23
Hallo,

schätze mal, die Combobox ist in einer Tabelle?
Private Sub ComboBox1_Change()
If ComboBox1.Text = "Tag 1" Then
[a1].select
Worksheets("Days").Select
Range("B3").Select
End If
End Sub


Gruß K.Rola
Bild

Betrifft: AW: Range("B3").Select klappt nicht.
von: Marco
Geschrieben am: 10.10.2003 11:42:37
Das ging leider auch nicht. Habs jetzt so gemacht:

Private Sub ComboBox1_Change()

Dim ComboBoxText
Set WS = Worksheets("Days")
ComboBoxText = ComboBox1.Text
WS.Activate
Select Case ComboBoxText
Case "Tag 1"
WS.Range("B3").Select
Case "Tag 2"
WS.Range("B17").Select

u.s.w.

Marco
 Bild