.RowSource muss eine Adresse sein und nicht eine Liste von Werten.
z.B. "Blat1!A1:A50"
oder besser so:
dim arr