Zelle Namen zuweisen

Forumthread: Zelle Namen zuweisen

16.09.2020 09:54:03

Herr

Servus,
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 :)

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Zelle Namen zuweisen

16.09.2020 10:21:10

Matthias
AW: Zelle Namen zuweisen

16.09.2020 10:22:23

Rudi
hier der Code

16.09.2020 10:25:06

Matthias

AW: Zelle Namen zuweisen

16.09.2020 10:21:10

Matthias

Hallo,
Der erste fehler müsste eigentlich viel eher kommen!
ActiceWorksheet
Gruß Matthias

AW: Zelle Namen zuweisen

16.09.2020 10:22:23

Rudi

Hallo,

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
Cells(42, i).Name = "Komponente_" & Komponente
Komponente = Komponente + 1
Next
End With
End Sub

Gruß
Rudi

hier der Code

16.09.2020 10:25:06

Matthias


Option Explicit
Sub NamenVergeben()
Dim nme As Object
Dim Komponente As Integer
Dim i As Integer
With ActiveSheet
Komponente = Cells(2, 3).Value
For i = 6 To 24
Set nme = Cells(42, i)
nme.Name = "Komponente_" & Komponente
Komponente = Komponente + 1
Next
End With
End Sub

Infobox / Tutorial

Schritt-für-Schritt-Anleitung

Um Zellen in Excel einen Namen zuzuweisen, kannst du VBA verwenden. Hier ist eine einfache Anleitung, um dies zu erreichen:

Öffne den VBA-Editor:
- Drücke ALT + F11, um den VBA-Editor zu öffnen.
Erstelle ein neues Modul:
- Klicke im Menü auf Einfügen und wähle Modul.

Füge den Code ein:

Kopiere den folgenden Code in das Modul:

Option Explicit
Sub NamenVergeben()
   Dim nme As Object
   Dim Komponente As Integer
   Dim i As Integer
   With ActiveSheet
       Komponente = Cells(2, 3).Value
       For i = 6 To 24
           Set nme = Cells(42, i)
           nme.Name = "Komponente_" & Komponente
           Komponente = Komponente + 1
       Next
   End With
End Sub

Führe das Makro aus:
- Drücke F5 oder gehe zu Run > Run Sub/UserForm, um das Makro auszuführen.
Überprüfe die Namen:
- Sieh dir die benannten Zellen in der Namensbox an, um sicherzustellen, dass alles korrekt funktioniert hat.

Häufige Fehler und Lösungen

Fehler: „unzulässige Eigenschaft“
- Dieser Fehler tritt auf, wenn du versuchst, eine Zelle mit einem Namen zu versehen, bevor sie korrekt referenziert wurde. Stelle sicher, dass du Set nme = Cells(42, i) verwendest.
Fehler: „ActiceWorksheet“
- Achte darauf, dass der Befehl ActiveWorksheet korrekt geschrieben ist, es sollte ActiveSheet sein.

Alternative Methoden

Falls du kein VBA verwenden möchtest, kannst du auch die Funktion "Namen definieren" in Excel nutzen:

Markiere die Zelle, die du benennen möchtest.
Gehe auf die Registerkarte Formeln.
Klicke auf Namen definieren.
Gib den gewünschten Namen ein und bestätige mit OK.

Diese Methode ist jedoch weniger flexibel, wenn du mehrere Zellen dynamisch benennen möchtest.

Praktische Beispiele

Hier sind einige praktische Beispiele, wie du Zellen in Excel Namen zuweisen kannst:

Beispiel 1: Zellen in einer Tabelle für Berichte benennen.
- Wenn du eine Tabelle mit verschiedenen Komponenten hast, kannst du den Code anpassen, um den Namen basierend auf der Spalte zu erstellen.
Beispiel 2: Benennen von Zellen für Diagramme.
- Wenn du Diagramme verwendest, kannst du die Zellen mit spezifischen Namen versehen, damit sie leichter referenziert werden können.

Tipps für Profis

Verwende aussagekräftige Namen: Statt „Komponente_1“ könntest du spezifischere Namen wie „Umsatz_Q1_2023“ verwenden, um die Lesbarkeit zu erhöhen.
Überprüfe die Namenskonventionen: Achte darauf, dass die Namen keine Leerzeichen oder Sonderzeichen enthalten.
Nutze die Namensverwaltung: Unter Formeln > Namensmanager kannst du die erstellten Namen verwalten und bearbeiten.

FAQ: Häufige Fragen

1. Wie kann ich einen bereits vergebenen Namen ändern? Um einen Namen zu ändern, gehe zu Formeln > Namensmanager, wähle den Namen aus und klicke auf Bearbeiten.

2. Was passiert, wenn ich eine Zelle umbenenne, die bereits einen Namen hat? Wenn du eine Zelle umbenennst, die bereits einen Namen hat, wird der alte Name durch den neuen ersetzt.

3. Kann ich auch mehrere Zellen gleichzeitig benennen? Ja, du kannst mehrere Zellen gleichzeitig benennen, indem du sie im VBA-Code in einer Schleife angibst, wie im Beispiel gezeigt.

Beliebteste Forumthreads (12 Monate)