Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 07:35:33
Matrix auslesen und in Liste umwandeln
17.04.2024 21:55:37
Preiserhöhung über mehrere Jahre berechnen
17.04.2024 20:19:32
Endzeitpunkt berechnen aus d:hh:mm errechnen
17.04.2024 18:57:33
Errinnerungsfunktion
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
860to864
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
860to864
860to864
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

860to864: Zeilenumbruch in Zellenkommentar

Zeilenumbruch in Zellenkommentar
07.04.2007 16:18:42
Mathias
Hallo,
wenn ich in einem neuen Tabellenblatt einen Kommentar eingebe, dann wird der Text in am Fensterrand ja automatisch umgebrochen.
Ich würde nun gern mit einem Makro Kommentartexte in eine Zelle schreiben und das Fenster auf eine *bestimmte Breite* setzen und den Text mit einem *automatischen Zeilenumbruch* ausgeben.
Wie also kann ich ein Kommentarfenster mit einer bestimmten Breite und automatischem zeilenumbruch erzeugen? Gibt es bestimmte Formatierungsanweisungen für Kommentarfenster? Vielen Dank.
Freundliche Grüße
Mathias Willmes

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilenumbruch in Zellenkommentar
07.04.2007 16:44:08
Horst
Hi,
Kommentare haben eine Height- und eine Width-Eigenschaft.
mfg Horst
AW: Zeilenumbruch in Zellenkommentar
07.04.2007 16:55:31
Mathias
Danke für den Tipp. Ich versuche die Breite wie folgt zu setzen:
With Selection
.Comment.Shape.TextFrame.Width = 100
End With
Hab verschiedene Werte ausprobiert, doch das Fenster bleibt immer gleich groß. Was mache ich da falsch?
Gibt`s evtl. auch eine Eigenschaft für automatischen Zeilenumbruch?
Viele Grüße
Mathias Willmes
AW: Zeilenumbruch in Zellenkommentar
07.04.2007 17:03:00
Sonnenpeter
Hallo,
bin da auch nicht so fit.
Probiermal: .Comment.ShapeRange.ScaleWidth 1.18, msoFalse, msoScaleFromTopLeft
Gruß Sonnenpeter
AW: Zeilenumbruch in Zellenkommentar
07.04.2007 17:27:00
Mathias
Das klappt leider auch nicht. Die Fenster bleiben unverändert. Mein kompletter Code sieht wie folgt aus:

Sub KommentarErgänzen()
Dim sNeu As String
sNeu = InputBox _
("Bitte geben Sie einen Kommentar zur gerade markierten Zelle ein.", "Teamplaner -  _
Kommentareingabe")
If sNeu = "" Then Exit Sub
With Selection
On Error Resume Next
ActiveSheet.Unprotect ""
.Comment.Text sNeu
.Comment.ShapeRange.ScaleWidth 1.18, msoFalse, msoScaleFromTopLeft
'.Comment.Shape.TextFrame.Width = 1000
' .Comment.Shape.TextFrame.Height = 1000
' .Comment.Shape.TextFrame.AutoSize = True
.Comment.Shape.TextFrame.Characters.Font.Name = "Verdana"
.Comment.Shape.TextFrame.Characters.Font.Size = 10
ActiveSheet.Protect ""
End With
End Sub

Anzeige
AW: Zeilenumbruch in Zellenkommentar
07.04.2007 17:06:38
Horst
Hi,
nicht Textframe, Shape
.Comment.Shape.Width = 100
mfg Horst
AW: Zeilenumbruch in Zellenkommentar
07.04.2007 17:44:00
Mathias
Hi Horst,
danke für den Hinweis. Mit der Fensterbreite funktioniert das jetzt.
Ideal wäre jetzt noch "automatischer Zeilenumbruch" und vielleicht sogar noch "automatische Fensterhöhe".
Viele Grüße
Mathias Willmes
AW: Zeilenumbruch in Zellenkommentar
07.04.2007 17:54:00
Sonnenpeter
Hallo Mathias,
schmeiß doch einfach mal den Makrorcorder an.
Gruß Sonnenpeter
AW: Zeilenumbruch in Zellenkommentar
08.04.2007 20:13:18
Mathias
Hallo Sonnenpeter,
Der Makrorwekorder spukt nur folgendes aus:
Range("B4").Select
Range("B4").AddComment
Range("B4").Comment.Visible = False
Range("B4").Comment.Text Text:="xp1:" & Chr(10) & "dfsdfsdfsdf" & Chr(10) & ""
Ändert bei mir letztendlich auch nix.
Ich denke ich werde den string einfach "manuell" per Makro umbrechen. Falls da schon jemand etwas in der Art programmiert hat, wäre ich für Hinweise dankbar...
Viele Grüße
Mathias Willmes
Anzeige

318 Forumthreads zu ähnlichen Themen

VBA - Zelle kopieren bis Wert einer Zelle null ist
Schulze

Halli Hallo,
ich bin ziemlicher Neuling in VBA. Daher würde ich euch bitten mir bei meiner Fragestellung zu helfen und zwar wie folgt: Ich möchte aus einer Tabelle aller Zellen kopieren, bis der Wert einer Zelle 0 annimmt. Diesen bestimten Bereich möchte ich in einer neuen Datei abspeichern...
19.08.2008 08:39:35
Thread-ID: 1002782
17 Beiträge
Anzeige
Zelleninhalt mit VBA suchen
Tom

Hallo
zum Feierabend noch mal fix ne Frage
ich möchte in einem anderen sheet, in einer anderen Tabelle etwas suchen und danach 4 Zellen nach links gehen und den Wert kopieren...
Dim strActiveCell As String
Dim rFound As Range
Tabellenname = ActiveSheet.Name
Tabellenname...
04.09.2008 16:41:17
Thread-ID: 1007457
4 Beiträge
erzwungener zeilenumbruch in Zelle
Lars

Hallo,
obwohl ich schon viel mit Excel gemacht habe, tauchen doch immer wieder Fragen auf:
Gibt es eine Möglichkeit, in einer Zelle einen Zeilenumbruch manuell einzufügen, ohne dass man bereits am Zellenende ist?
Ich denke, dass ist eine eher dumme Frage, aber ich habe derzeit keine...
02.10.2008 15:40:00
Thread-ID: 1013906
4 Beiträge
Anzeige
Leere Zelle suchen, Wert eintragen VBA
andreas

Hallo zusammen,
habe ein kleines Formular mit zwei "Command-Button".
Bei drücken von "Zufügen" soll die nächst leere Zelle im Bereich "F3:J3500" gesucht werden und ein "x" eingetragen werden.
Bei drücken von "Entfernen" suche im selben Bereich die letzte ausgefüllte Zelle und diese...
19.11.2008 11:57:07
Thread-ID: 1025960
2 Beiträge
Zeilensprung in Textbox mit Enter
uli

Hallo Experten,
habe folgenden Code in einem Klassenmodul:
Private Sub clTextBox_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) If KeyCode = 13 Or KeyCode = 9 Then If clTextBox.Tag = 95 Then 'Hier vielleicht Anweisung für Zeilensprung!!!! Exit Sub End If If Is...
20.11.2008 11:26:40
Thread-ID: 1026350
3 Beiträge
Zeilenumbruch bei Formel in VBA Code
Waven

Hallo Zusammen
Ist es irgendwie möglich im VBA Code innerhalb einer Formel einen Zeilenumbruch zu machen?
Als Beispiel:
aus
Range("A1").Formula = "=SUMPRODUCT((B23:B40=1)*(Q23:Q40=1)*(O23:O40))+SUMPRODUCT((B23:B40=1)*(Q23:Q401)*(R23:R40=1)*(O23:O40))"
soll sowas wie
Ran...
25.11.2008 12:08:00
Thread-ID: 1027662
3 Beiträge
VBA-Code in einem String erzeugen und dann ausführ
Dirk

Hallo!
Gibt es eine Möglichkeit, VBA-Code auszuführen, der in einer String-Variablen vorliegt, die zuvor dynamisch erzeugt wurde? Sprich: Ich möchte VBA-Code dynamisch erzeugen und anschließend ausführen. Geht das irgendwie?
Ich hoffe, das ist so verständlich.
Vielen Dank,
Dirk<...
20.01.2009 20:08:36
Thread-ID: 1041981
4 Beiträge
VBA: Bestimmte Zeichenfolge in Zelle finden
gega

Hallo ich bins nochmals,
ich finde einfach keine Möglichkeit zwei Teile aus dem String herauszulösen, da nur "Käufer: " und "[ Kontakt mit Käufer aufnehmen ]" fest am Anfang und Ende des Strings sind und der Käufername hier "leu_bw_cen" unterschiedlich lang ist und auch die EMail-Adr. zw. d...
23.01.2009 11:52:00
Thread-ID: 1042917
3 Beiträge
Anzeige

Links zu Excel-Dialogen

Frame InputBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
16
5
3
3
2
1
2
2
3
2
5
2
4
2
18
4
4
4
5
2
2
2
13
11
2