Namen Gültigkeitsliste
20.06.2005 08:15:59
GeorgK
ich versuche mit nachfolgendem Makro den Namen für eine Gültigkeitsliste zu vergeben. Der Name steht jeweils in A1 und wird von Tabelle1 bezogen.
Der Name wird aber immer mit den Anführungszeichen vergeben. Wenn ich die händisch lösche, klappts.
Was muß ich aber machen, damit der Name per Makro richtig vergeben wird?
Sub NamenAnpat1()
Application.ScreenUpdating = False
Sheets("Pat").Select
Range("A1:A101").Select
Selection.CreateNames Top:=True, Left:=False, Bottom:=False, Right:=False
ActiveWorkbook.Names.Add Name:=Range("Tabelle1!C7").Text, RefersToR1C1:="Pat!R2C1:R102C1"
Range("A1").Select
End Sub
Vielen Dank und Grüße
Georg