Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 10:38:52
Bedingte Formatierung per VBA / MaxPoint
25.04.2024 10:30:04
Suche mit MINWENNS und Rückgabe mehrerer Werte
25.04.2024 09:47:49
Daten aus mehreren Dateien untereinander importieren
25.04.2024 09:31:31
Bild "In Zelle platzieren"
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1476to1480
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
1476to1480
1476to1480
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Dritte Zeile der Zelle fett formatieren

Dritte Zeile der Zelle fett formatieren
22.02.2016 18:49:50
Hannah
Hallo liebes Forum,
ich würde gerne immer nur die dritte Zeile einer Zelle (A1) fett formatieren. Dazu bräuchte ich ganz dringend Hilfe bei einem Makro, da es leider allein über die Formatierung nicht funktioniert und ich die Adressbausteine nicht in einzelne Zellen packen kann. Falls relevant: der Zellinhalt zieht sich aus einem SVERWEIS.
Momentan sieht es so aus:
Max Mustermann
Musterstraße 1
11111 Musterstadt
Deutschland
Ziel ist so:
Max Mustermann
Musterstraße 1
11111 Musterstadt
Deutschland
Ich bin über jegliche Hilfe dankbar!!!
Hannah

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dritte Zeile der Zelle fett formatieren
22.02.2016 19:10:50
Hajo_Zi
Formelergebnisse kann man nicht unterschiedlich formatieren. Nur Text

AW: Dritte Zeile der Zelle fett formatieren
22.02.2016 19:11:52
ransi
Hallo HAnnah,
Tetse mal dies:
' **********************************************************************
' Modul: Tabelle1 Typ: Element der Mappe(Sheet, Workbook, ...)
' **********************************************************************

Option Explicit

Sub machs()
    Dim arr As Variant
    Dim intStart As Integer
    Dim Zelle As Range
    For Each Zelle In Range("A1:A1000")
        arr = Split(Zelle.Text, vbLf)
        If UBound(arr) >= 2 Then
            intStart = InStr(1, Zelle.Text, arr(2))
            Zelle.Characters(intStart, Len(arr(2))).Font.Bold = True
        End If
    Next Zelle
End Sub


ransi

Anzeige
Damit wird sie keinen Erfolg haben, ...
23.02.2016 12:42:01
Luc:-?
…ransi,
denn du hast die entscheidende CodeZeile vergessen … ;-]
Zelle = Zelle.Text
…vor …
Zelle.Characters(intStart, Len(arr(2))).Font.Bold = True
Hajo hatte den Hinweis mit SVERWEIS, also FmlErgebnis in der Zelle, nicht überlesen.
Die Fml ist dann in diesen Fällen aber weg, Hannah;
eine andere Möglichkeit gibt's nicht, außer Rettung der Fml in einen Kommentar bzw Anzeige des bearbeiteten Textes in einem über die FmlZelle gelegten Textfeld. Dazu wurde in der Vergangenheit schon geschrieben, wäre also im Prinzip im Archiv auffindbar.
Gruß, Luc :-?
Besser informiert mit …

Anzeige
AW: Damit wird sie keinen Erfolg haben, ...
23.02.2016 17:07:48
Hannah
Ganz lieben Dank euch zwei! Die dritte Zeile ist nun fett, aber wie ja schon von dir prognostiziert Luc ist nun die Formel weg...ich werde mich also im Archiv auf die Suche machen!

300 Forumthreads zu ähnlichen Themen

Textformatierung in einer Formel
Dieterlem

Hallo Excelfreunde,
ich möchte ein Wort fett innerhalb eines Formelergebnisses fett darstellen. Beispiel:
"WENN(A1="Ja";"Beispieltext soll Fett dargestellt werden";"")
Dabei soll nur das Wort 'Fett', fett formatiert werden.
Ist so etwas möglich?
Gruß
Dieterlem
27.10.2008 19:55:00
Thread-ID: 1019731
3 Beiträge
Anzeige
Statt Zahl "Textausgabe" in 3D Formel
Lorenz

Guten Morgen!
Mit folgender 3D-Formel wird aus mehreren Blättern(In diesem Fall "1."."2."."3.")nach dynamischen Suchkriterien ein Wert "ZAHL" ausgegeben. Funktioniert wunderbar!!!. Leider gelingt es mir nicht einen anderen Wert (den Zellinhalt als "Text") auszugeben
=SUMME(SUMMEWENN(IND...
14.08.2009 07:14:45
Thread-ID: 1095457
2 Beiträge
per VBA Teile einer Zelle formatieren
Steinritz

Hallo!
Ich habe folgendes Problem:
Habe in Excel mit der VERKETTEN Funktion 4 Zellen verkettet.
Im Ergebnis z.B.
Nach Abzug der Gebühr in Höhe von 10,- € ergibt sich ein Gesamtbetrag von 200,- €.
Jetzt möchte ich in dieser Zelle nur den letzen Zahlenwert mit dem Währungssymb...
10.09.2009 18:45:11
Thread-ID: 1101849
3 Beiträge
Anzeige
Formel automatisch in einem Textfeld sichtbar
ropa

Hallo,
ich benutze sehr oft Textfelder um dann eine Formel zu kopieren und mit dem Textfeld als Info sichtbar zu machen.
Gibt es eine Möglichkeit eine Zelle mit einem Textfeld zu verknüpfen, so das automatisch immer die richtige Formel in dem Textfeld sichtbar.
Da ich manchmal Spalt...
13.10.2009 00:26:44
Thread-ID: 1109212
2 Beiträge
Zelle fett formatieren
David

Hallo zusammen,
manchmal verzweifle ich echt an VBA.
Ich möchte in einem bestimmten Bereich alle Zellen, die eine Formel enthalten, fett formatieren.
Folgendes war mein Ansatz:
Sub fett() Dim cell As Range For Each cell In Range("C4:F163") If cell.HasFormula = True Then cell.Fon...
14.10.2009 17:47:27
Thread-ID: 1109656
9 Beiträge
Cells(MyRow, 1).Value = Me.TextBox1.Text
reinhardt

Hallo,
ich habe eine Datei, die mir über eine Userform Daten in verschiedene Tabellenblätter einträgt.
' Werte übertragen
Cells(MyRow, 1).Value = Me.TextBox1.Text 'Datum
Cells(MyRow, 2).Value = Me.ComboBox1.Text 'km
Mein Problem:
Im Tabellenblatt möchte ich Summen...
11.01.2010 13:02:40
Thread-ID: 1128837
2 Beiträge
Textformat in Zelle mit Formel
joerg

Hallo,
Ich hätte gern in einer Zelle in der Kopfzeile eine Mischung aus Text und Werten aus anderen Zellen, etwa so:
A B Total: 1 netto 1234,56 brutto 2345,67 2 Dabei hätte ich gern das Wort "Total" fett und schwarz, die beiden anderen Zeilen klein...
10.02.2010 01:20:13
Thread-ID: 1137218
6 Beiträge
Fettschrift per VBA
Peter

Hallo,
ich möchte eine Zeile mit Text befüllen per
.Cells(x,y).Value = "" Dabei soll nur ein Wort in fett dargestellt werden, z.B. "Produkt A" Gibt es dafür einen Befehl?
LG, Peter
06.04.2010 12:30:13
Thread-ID: 1150324
7 Beiträge
Anzeige

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
2
2
1
2
7
1
8
1
5
6
7
4
17
1
3
9
2
3
3
5
1
6
4
6
2