Listenauswahl erzeugt Makro-Abbruch
Rainer
verwende ein Excel-Formular (xlt-Datei), welches ich unter Excel 2003 erstellt habe und funktionierte. Unter Excel 2010 funktioniert die Auswahl über Dropdown (Liste aus Daten-Überprüfung-Gültigkeit) nicht mehr.
Funktion:
Wenn ich im Blatt Formular im Feld C7 über Dropdown ein Produkt auswähle, soll im nebenstehenden Feld C8 die dazugehörige Kostenstelle eingetragen werden.
Die Liste, die C7 befüllt, steht im Blatt Listen, Zellen A30 bis A48. Dazu stehen in diesem Blatt auch die dazugehörigen Kostenstellen in den Zellen B30 bis B48.
Fehlermeldung in Excel 2010, wenn ich aus der Liste ein Produkt auswähle:
Laufzeitfehler 424 Objekt erforderlich
Nun bin ich mit meinen Kenntnissen etwas überfordert. Vielleicht könnt Ihr mir einen Tip geben, der die Funktion wiederherstellt.
Danke und Gruß
Rainer
VBA:
Im Arbeitsblatt:
Private Sub Worksheet_Change(ByVal Target As Range)
Call KostenstelleEintragen
End Sub
Im Modul:
Sub KostenstelleEintragen()
Set ws1 = Worksheets("Formular")
Set ws2 = Worksheets("Listen")
adresse = ActiveCell.Address
wert = ActiveCell.Value
For k = 1 To 18
If wert = ws2.Cells(30 + k, 1).Value Then ActiveCell.Offset(0, 1).Value = ws2.Cells(30 + k, 2).Value
Next k
End Sub