Range("B3").Select klappt nicht.

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

Beiträge aus den Excel-Beispielen zum Thema " SAP-Download nach Excel kann keine Umlaute"