Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1132to1136
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
Inhaltsverzeichnis

weitere Parameter in Code - aber wie ?

weitere Parameter in Code - aber wie ?
Karsten

Hallo...
ich möchte, dass sich in A1 in u.s. Code noch Weiteres festgelegt wird, wie:
.Name = "Arial Black"
.Size = 20
.Colorindex = 5
.HorizontalAlignment = xlCenter
Sub ZeitInZelle()
Application.EnableEvents = False
With ThisWorkbook
.Sheets("Lehrbericht").Range("A1") = Format(Now, "hh:mm")
End Sub
Allerdings weiß ich nicht, wie.
Kann mir jemand dabei weiterhelfen? Danke.
Gruß
Karsten

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

Betreff
Benutzer
Anzeige
With .Font -- Gruß owT
28.01.2010 11:07:19
Luc:-?
:-?
AW: With .Font -- Gruß owT
28.01.2010 11:18:17
Karsten
Hallo Luc:-?
danke, ich verstehe zwar nicht, wie alles komplett aussehen müsste, aber habe zwischenzeitlich schon eine andere lösung gefunden.
Gruß
Karsten
So, welche denn außer der von Reinhard,...
28.01.2010 13:43:10
Reinhard,...
...die meine kurze Betreff-Nachricht meinte, Karsten?
Viell können wir ja da noch was von dir lernen... ;->
Gruß Luc :-?
AW: weitere Parameter in Code - aber wie ?
28.01.2010 11:22:24
Reinhard
Hallo Karsten,
Sub ZeitInZelle()
Application.EnableEvents = False
With ThisWorkbook.Sheets("Lehrbericht").Range("A1")
.Value = Format(Now, "hh:mm")
.HorizontalAlignment = xlCenter
With .Font
.Name = "Arial Black"
.Size = 20
.ColorIndex = 5
End With
End With
Application.EnableEvents = True
End Sub

Gruß
Reinhard
Anzeige
AW: weitere Parameter in Code - aber wie ?
28.01.2010 11:25:40
Karsten
Hallo Reinhard,
Danke.
Gruß
Karsten

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige