InCellDropdown erstellen

[excl50]

Hallo zusammen,

mein Dropdown funktioniert nicht wenn ich für den Bereich bei Formula1 eine Variable, anstelle einer Zahl einfügen möchte.

Das Makro:

Dim ZeilennummerDropdown As Integer
ZeilennummerDropdown = Tabelle9.Cells(Rows.Count, 1).End(xlUp).Row
 
Tabelle8.Range("J4").Select
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="='Dropdown-Menü'!$A$2:$A$& ZeilennummerDropdown"
        .IgnoreBlank = True
        .InCellDropdown = True



Vielen Dank für die Hilfe

[BoskoBiati]

Hi,

ungetestet:

Code:

Formula1:="='Dropdown-Menü'!$A$2:$A$[b]" & ZeilennummerDropdown[/b]

[excl50]

Das klappt leider nicht. Es kommt die Fehlermeldung: Syntaxfehler

[RPP63]

Moin!
Das klappt schon, wenn Du die Format-Tags herausnimmst.
Formula1:="='Dropdown-Menü'!$A$2:$A$" & ZeilennummerDropdown
Warum überhaupt VBA?
Google mal nach dynamische Datenüberüfung Dropdown
Dann erhältst Du so etwas:
https://www.tabellenexperte.de/dynamisch...en-teil-1/

Gruß Ralf

[excl50]

Danke, jetzt funktioniert es.