Zelle Namen zuweisen
16.09.2020 09:54:03
Herr
ich möchte durch VBA Zellen automatisch Namen zuweisen. Der Name soll sich aus "Komponente" und einer Nummer zusammensetzen, die immer um 1 erhöht wird, aber je nach Daten einen unterschiedlichen Startwert hat. Leider bekomme ich immer die Fehlermeldung "unzulässige Eigenschaft". Wie kann ich zuweisen, dass der Name der Zelle x angesprochen wird?
Sub NamenVergeben()
Dim nme As Name
Dim Komponente As Integer
Dim i As Integer
With ActiceWorksheet
Komponente = Cells(2, 3).Value
For i = 6 To 24
nme = Cells(42, i) ' --> unzulässige Eigenschaft
nme.Name = "Komponente_" & Komponente
Komponente = Komponente + 1
Next
End With
End Sub
Danke :)