Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zeilenumbruch im Kommentar

Zeilenumbruch im Kommentar
04.08.2008 20:17:45
Stefan
Hallo zusammen!
ich möchte per Userform einen Kommentar an die aktive Zelle anfügen.
Soweit funktioniert auch alles ganz gut, es bleibt nur ein kleiner Schönheitsfehler. Sobald ich im Kommentar einen Zeilenumbruch habe, dann erscheint im Kommentar der Zelle ein quadratischen Kästchen.
Unter Office2007 erscheint das Kästchen nicht!
Im Anhang findet Ihr meine Datei.
und hier der Code:

Private Sub cmdOK_Click()
txtKommentar.Text = Replace(txtKommentar.Text, Chr$(13), "")
'Sheets(aktuelles_Blatt).Cells(1, 16).Value = Replace(Text_Bemerkungen, vbCrLf, vbLf)
Selection.ClearComments
ActiveCell.AddComment
ActiveCell.Comment.Visible = False
ActiveCell.Comment.Shape.TextFrame.AutoSize = True
ActiveCell.Comment.Text Text:= _
"eingerichtet am: " & TextBox2 & Chr(10) & "" & Chr(10) & "eingerichtet von: " &  _
ComboBox1 & Chr(10) & "" & Chr(10) & "Kommentar: " & Chr(10) & txtKommentar & Chr(10) & "" & Chr(10) & ""
With Selection.Interior
.ColorIndex = 4
.Pattern = xlSolid
End With
' With Sheets("Tabelle3").Range("B15")
'    .Value = txtKommentar.Value
'   .Replace What:=Chr$(13), Replacement:=""
'End With
Unload Me
End Sub


1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilenumbruch im Kommentar
04.08.2008 22:19:21
Ramses
Hallo
da ich mit dem gleichen Code unter E2003 Kommentare mit Zeilenumbruch OHNE Kästchen erstelle, ist mir das schleierhaft.
Probier den Code mal in einer neuen !!! Datei unter E2003 aus ob er funktioniert.
Wenn es funktioniert ist es OK.
Öffne anschliessend die Datei in E2007, Speichern und schliesen und anschliessend wieder in E2003 öffnen.
Wenn es dann nicht mehr funktioniert, gibt es da wohl eine Inkompatibilät.
Gruss Rainer
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige