Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
592to596
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
592to596
592to596
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
brauche eine 1. (mit Punkt) über Button!
07.04.2005 21:18:48
WernerH
Hallo, kann mir bitte einer sagen was ich hier falsch mache. Ich möchte über einen Button mit der Schriftart Common Bullets eine 1. (mit Punkt) haben, der Tastatur Buchstabe wäre bei der Schriftart K für eine 1 mit Punkt. Hier der VBA Code.

Private Sub CommandButton18_Click()
'   "1." in die Zelle
ActiveSheet.Unprotect
With ActiveCell.Characters(Start:=1, Length:=2).Font
.Name = "Common_Bullets"
.Size = 14
End With
ActiveCell.Value = "K"
ActiveSheet.Protect
End Sub

Was ist denn hier falsch ? ich bekomme das einfach nicht hin.
Gruss WernerH

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: brauche eine 1. (mit Punkt) über Button!
07.04.2005 21:26:24
Ramses
Hallo
so geht es

Private Sub CommandButton18_Click()
'   "1." in die Zelle
ActiveSheet.Unprotect
With ActiveCell
.Value = "K"
.Characters(Start:=1, Length:=2).Font.Name = "CommonBullets"
.Font.Size = 14
End With
ActiveSheet.Protect
End Sub

Achte auf die Bezeichnung der Schriftart !!
Gruss Rainer
AW: brauche eine 1. (mit Punkt) über Button!
07.04.2005 21:48:31
Werner
Hallo Rainer, besten Dank, es klappt. Ich muss wohl noch sehr viel lernen.
Gruss WernerH
Merci.... o.T.
07.04.2005 21:51:05
Ramses
...
Anzeige

169 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige