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

Kommentare ergänzen/bearbeiten

Forumthread: Kommentare ergänzen/bearbeiten

Kommentare ergänzen/bearbeiten
24.04.2015 10:42:18
Larissa
Hallo liebe Community,
ich bin dabei folgendes umzusetzen:
Ich möchte zu bestimmten Zellen Kommentarfelder hinzufügen. Das funktioniert auch soweit, aber habe folgendes kleines Problem, das ich mit Google bisher nicht gelöst habe:

rng.AddComment
rng.Comment.Visible = False
'Bisher nur ein Artikel in der Notiz
'muss möglich sein, dass mehrere Artikel abgespeichert werden..
rng.Comment.Text Text:="Artikel:" & ArtX(x)
Ich möchte also Artikelnamen hinzufügen. Da das ganze aber in einer For-Schleife passiert, überschreibt er immer die Kommenate. Ein Comment.Edit Befehl habe ich nicht gefunden.
Habt ihr Ideen? Ich freue mich auf Eure Anregungen!

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
geht es vielleicht mit Auslesen des alten Stands?
24.04.2015 10:48:54
lupo1
rng.AddComment
rng.Comment.Visible = False
'Bisher nur ein Artikel in der Notiz
'muss möglich sein, dass mehrere Artikel abgespeichert werden..
rng.Comment.Text Text:=rng.Comment.Text & vbLf & "Artikel:" & ArtX(x)
ungetestet

Könnte sein, Lupo, aber zumindest früher gab's ...
24.04.2015 10:54:13
Luc:-?
…da mal LängenBeschränkungen, die ab dem 256.Zeichen wohl ein etwas anderes Vorgehen (mit Characters-Methode) erforderten. Aber viell geht's ja jetzt auch so…
Gruß, Luc :-?
Besser informiert mit …

Anzeige
AW: Kommentare ergänzen/bearbeiten
24.04.2015 10:53:17
selli
hallo larissa,
rng.Comment.Text Text:=rng.Comment.Text & "Artikel:" & ArtX(x)
gruß
selli

AW: Kommentare ergänzen/bearbeiten
24.04.2015 11:00:00
Larissa

rng.Comment.Text Text:=rng.Comment.Text & "Artikel:" & ArtX(x) & vbCrLf
Jetzt sogar noch mit Zeilenumbruch! Vielen Dank für die Hilfe!!!

Anzeige
AW: Kommentare ergänzen/bearbeiten
28.04.2015 13:22:58
Larissa
Ich habe noch eine kleine Frage und zwar möchte ich folgendes tun:
rng.Comment.Text Text:=rng.Comment.Text & ArtX(x) & " (" & MenX(x) & ")" & vbCrLf & help & "/1,7" &vBCrLf
Jetzt ist das Ergebnis aber bei mehreren Artikeln folgendes:
Artikel1(384)
0,8111616/1,7
Artikel2(0)
0,8111616/1,7
Ich möchte aber nur ein Verhältnis am Ende stehen haben. Also so ist die Ausgabe gewünscht:
Artikel1(384)
Artikel2(0)
0,8111616/1,7
Was muss ich dafür tun? Habt ihr Anregungen? Vielen lieben Dank!
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige