Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1052to1056
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
1052to1056
1052to1056
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Fonststyle

Fonststyle
21.02.2009 15:48:00
Peter
Hallo,
ich sehe wahrscheinlich vor lauter Bäumen den Wald nicht mehr.
Bei der Anweisung Font.Fontstyle bekommen ich immer eine Fehlermeldung
Sub labelBlink()
Dim a As Integer
For a = 1 To 6
If a Mod 2 = 1 Then
With frmHeader.Controls(x)
.ForeColor = &HFF& 'Blinkfarbe = RGB(255, 0, 0)
.Font.Size = 10
.Font.FontStyle = "Standard" 'hier wird der Fehler angezeigt was ist falsch?
End With
Else
.........
Kann mir jemand helfen und mir den richtigen Befehl mitteilen?
Dank an den Helfer im voraus.
Peter

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Fonststyle
21.02.2009 15:59:21
Hajo_Zi
Hallo Peter,
ich vermute Du mußt bei Schriftschnitt jede einzelne Eigenschaft seperat zuweise.

AW: Fonststyle
21.02.2009 16:02:25
Peter
Hallo Hajo,
Danke für den Hinweis.
Ich werde es ausprobieren. Wenn ich nicht zurechtkommen, melde ich mich noch einmal.
Schönen Samstag
Peter
AW: Fonststyle
21.02.2009 18:30:23
Lothar
Hi,
die Eigenschaft .Font.FontStyle existiert nicht in Userforms.
mfg Lothar
AW: Fonststyle
21.02.2009 18:58:16
Peter
Hallo Lothar,
danke für den Hinweis, mit dem Tipp von Hajo war ich nach einigen Versuchen nicht viel weiter gekommen. Wenn es die Eigenschaft nicht gibt, dann erübrigt es sich ja, weiter nach einer Lösung zu suchen.
Grüße
Peter
Anzeige
AW: Fonststyle
21.02.2009 19:17:50
Hajo_Zi
Hallo Peter,
der Makrorecorder hilft da schon.

Sub Makro3()
' Makro3 Makro
Selection.Font.Bold = True
Selection.Font.Bold = False
Selection.Font.Underline = xlUnderlineStyleSingle
Selection.Font.Italic = True
Selection.Font.Italic = False
Selection.Font.Underline = xlUnderlineStyleNone
End Sub


Gruß Hajo

AW: Fonststyle
21.02.2009 22:16:50
Peter
Hallo Hajo,
so funktioniert es.
Ich hatte es immer mit frmHeader.Controls(x).Font.Fontstyle = "Bold" oder ähnlichen Varianten versucht
aber, wie Du geschrieben hast
frmHeader.Controls(x).Font.Bold = True
ist die richtige Lösung
Danke (schön das es ein Forum gibt)
Schönes Wochenende
Peter
Anzeige

Links zu Excel-Dialogen

Label UserForm

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige