Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Kommentar einer Zelle über VBA bearbeiten

Kommentar einer Zelle über VBA bearbeiten
21.06.2006 13:40:13
andre
Hallo,
wiedereinmal stehe ich vor einer für mich unlösbaren Aufgabe!
Also:
Ich habe eine Spalte in der manchen Zellen Kommentare haben. (Keinen Inhalt sondern die gelben Kommentarfelder.
Bin auch soweit, mir diese über eine Userform in einem Label anzeigen zu lassen. Das klappt wunderbar
So:
Text = Worksheets("Datenbank").Cells(rng.Row, 15).NoteText
UserForm11.Label1 = Text
Jetzt würde ich aber gerne diesen Text bearbeiten. Am liebsten über eine Textbox der selben größe.
Da liegt das Problem!!!
Worksheets("Datenbank").Cells(rng.Row, 15).NoteText = Text
Da funktioniert leider nicht.
Ich weiß auch nicht wie ich einer leeren Zelle einen Text zuordnen kann (Über userform)
Hoffe es ist verständlich geworden?
Über Hilfe wäre ich sehr dankbar!!
Mfg
Andre
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kommentar einer Zelle über VBA bearbeiten
21.06.2006 13:47:51
harry
Hallo Andre,
es ist keine Schande mal den Makrorecorder zu verwenden
cells(x,y).AddComment
cells(x,y).Comment.Visible = False
cells(x,y).Comment.Text Text:=userform1.textbox1.value
damit kommst Du sicher weiter
Gruß
Harry
AW: Kommentar einer Zelle über VBA bearbeiten
21.06.2006 14:05:50
andre
Hi Harry,
tatsächlich. Da denke ich echt viel zu selten dran. Gute idde danke.
Mfg
andre
Anzeige
Worksheets("Sheet1").Range("A1").NoteText "blabla"
21.06.2006 13:57:52
Christoph
...erzählt die Hilfe zu "NoteText"
also ohne Gleichheitszeichen.
Gruß
Christoph

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Infobox / Tutorial

Kommentar einer Zelle über VBA bearbeiten


Schritt-für-Schritt-Anleitung

  1. Zelle auswählen: Bestimme, welche Zelle du bearbeiten möchtest. Zum Beispiel:

    Dim rng As Range
    Set rng = Worksheets("Datenbank").Cells(1, 1) ' A1
  2. Kommentar hinzufügen: Falls die Zelle bereits einen Kommentar hat, kannst du diesen wie folgt bearbeiten:

    If Not rng.Comment Is Nothing Then
       rng.Comment.Text Text:=UserForm1.TextBox1.Value
    Else
       rng.AddComment
       rng.Comment.Text Text:=UserForm1.TextBox1.Value
    End If
  3. Komponenten der UserForm: Stelle sicher, dass deine UserForm eine TextBox hat, um den neuen Kommentartext einzugeben.

  4. Speichern: Die Änderungen werden automatisch gespeichert, wenn du den Kommentar aktualisierst.


Häufige Fehler und Lösungen

  • „excel notiz bearbeiten funktioniert nicht“: Stelle sicher, dass die Zelle tatsächlich einen Kommentar hat. Du kannst dies mit einer If-Abfrage überprüfen.

  • „excel gleichzeichen ohne formel“: Beachte, dass beim Zuweisen des NoteText kein Gleichheitszeichen verwendet wird. Der korrekte Befehl lautet:

    Worksheets("Datenbank").Cells(rng.Row, 15).NoteText "Neuer Text"

Alternative Methoden

Eine andere Möglichkeit, einen Kommentar in Excel zu bearbeiten, ist die Verwendung des Makrorekorders. Hierbei wird der VBA-Code automatisch generiert, wenn du die Schritte in Excel machst:

  1. Makro aufzeichnen: Starte den Makrorekorder und füge einen Kommentar manuell hinzu.
  2. Code anpassen: Überprüfe den generierten Code und passe ihn an deine Bedürfnisse an.

Praktische Beispiele

  • Beispiel 1: Kommentar hinzufügen:

    Worksheets("Datenbank").Cells(1, 1).AddComment "Das ist ein Kommentar"
  • Beispiel 2: Kommentar bearbeiten:

    Worksheets("Datenbank").Cells(1, 1).Comment.Text Text:="Neuer Kommentartext"
  • Beispiel 3: Kommentar löschen:

    Worksheets("Datenbank").Cells(1, 1).Comment.Delete

Tipps für Profis

  • Nutze vba comment.text für eine präzisere Bearbeitung des Kommentars.
  • Experimentiere mit der UserForm und binde verschiedene Steuerelemente wie ComboBoxen ein, um die Benutzererfahrung zu verbessern.
  • Verwende Application.ScreenUpdating = False am Anfang deines Codes, um die Performance bei umfangreichen Änderungen zu erhöhen.

FAQ: Häufige Fragen

1. Wie füge ich einen neuen Kommentar in eine leere Zelle ein? Verwende den Befehl AddComment, um einen neuen Kommentar zu erstellen, bevor du den Text hinzufügst.

2. Kann ich einen Kommentar aus einer Zelle löschen? Ja, du kannst einen Kommentar löschen, indem du Comment.Delete verwendest.

3. Was mache ich, wenn die TextBox in der UserForm leer ist? Stelle sicher, dass du eine Validierung einfügst, die überprüft, ob die TextBox leer ist, bevor du den Kommentar aktualisierst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige