Mit VB ein Excel-Kommentar erzeugen II

Computer: Software & Programmierung Visual Basic
#1

Hallo Leute

ich poste hier mal meinen bisherigen Code.

com = Sheets(„Statistik“).Cells(ze, 8).Value
Range(Sheets(AktBl).Cells(Row, i), Sheets(AktBl).Cells(Row, i)).AddComment
Range(Sheets(AktBl).Cells(Row, i), Sheets(AktBl).Cells(Row, i)).comment.Visible = False
Range(Sheets(AktBl).Cells(Row, i), Sheets(AktBl).Cells(Row, i)).comment.Text Text = (com)

Die Letzte Zeile enthält einen Fehler, aber wie schreibe ich das richtig, dass in das Bemerkungsfeld der Wert der Variablen „com“ eingefügt wird?

Wäre super, wenn mir jemand helfen könnte.

Danke im voraus!

#2

hallo bigeyeblue,

Range(Sheets(AktBl).Cells(Row, i), Sheets(AktBl).Cells(Row,i)).comment.Text text := com

??? so vielleicht? :smile:

Cells(3, 1).AddComment
Cells(3, 1).Comment.Visible = False
Cells(3, 1).Comment.Text Text:=„Hallo“

hoffe es hilft

gruß

rasta

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

#3

Hallo Rasta

es funktioniert immernoch nicht. Er erstellt zwar ein Kommentarfeld aber übernimmt nicht den Wert in der Variablen in das Kommentarfeld.

Wenn ich „Hallo“ hineinschreibe, dann funktioniert es. Irgendwie hat er Probleme mit Variablen.

Muß ich vielleicht die Zelle anders ansteuern???

Bisher: com = Sheets(„Statistik“).Cells(ze, 8).Value

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

#4

Ich hab die Lösung gefunden.

Meine Deklaration von der Variablen „com“ war Long. Das ist Falsch, es muß natürlich String sein.

Trotzdem Danke Rasta!!!

Gruß

Big