auf. Ich habe den Code zur Sicherheit von Deiner Nachricht kopiert und
bei mir eingefügt.
Viele Grüße
Matthias
On 14 Mai, 12:58, "Wolfgang Habernoll"
online.de> wrote:
> Hallo Matthias
>
>>Snip<
>>wenn ich den Code so eingebe,
>>Private Sub ComboBox1_Change()
>> Â Select Case (ComboBox1.Text)
>> Â Â Case Is = "A"
>> Â Userform1.ComboBox2.RowSource = "Tabelle2!A2:A16"
>> Â Â Â Case Is = "B"
>> Â Â Â Â Userform1.ComboBox2.RowSource = "Tabelle2!B2:B3"
>> Â End Select
>>End Sub
>>bekomme ich die Fehlermeldung "Laufzeitfehler 438"
>>Was mach ich falsch?
>
> zur Sicherheit habe ich es kurz nachgestellt (Userform1 mit ComboBox1 +2). Der
> Code läuft bei mir einwandfrei.
> In welche Zeile tritt bei dir der Fehler auf ?
> welche XL-Version hast du ?
>
> --
> mfG
> Wolfgang Habernoll
>
> [ Win XP Home SP-2 , Â XL2002 ]
