Guten Tag,
ich möchte gerne meine Befehlsschaltflächen in Excel mit eigenen Icons versehen.
Wie kann ich das machen und welches Malprogramm steht mir dazu zur Verfügung?
es grüßt euch
Nikodemo
Wie kann ich das machen und welches Malprogramm steht mir dazu
zur Verfügung?
nur das, das Excel mitliefert…
rechte Maustaste auf die Symbolleiste -> anpassen
rechte Maustaste auf das entsprechende Symbol -> Schaltflächensymbol bearbeiten
Grüße
Munich
Hallo
Falls man Icons in eigenen per VBA erzeugten Symbolleisten verwendet, hat man die Auswahl aus einigen 100 Icons.
Auszug aus der Online-Hilfe:
…Verwenden Sie die Add-Methode, um der CommandBarControls-Auflistung ein neues Befehlsleisten-Steuerelement hinzuzufügen. In diesem Beispiel wird der Befehlsleiste „Benutzerdefiniert“ eine neue, leere Schaltfläche hinzugefügt.
Set meineLeereSchaltfläche = CommandBars(„Benutzerdefiniert“).Controls.Add
.FaceId = 247 wäre dann z.B. ein aufgeschlagenes Buch
Das Thema „eigene Symbolleiste“ per VBA ist etwas umfangreicher, ein fertiges Makro findest Du aber z.B. unter www.excelbeispiele.de, dort unter „Beispieldateien“ die Nr 23
mfg
Guten Tag,
Wie kann ich das machen und welches Malprogramm steht mir dazu
zur Verfügung?nur das, das Excel mitliefert…
rechte Maustaste auf die Symbolleiste -> anpassen
rechte Maustaste auf das entsprechende Symbol ->
Schaltflächensymbol bearbeiten
hi, munichfreak,
das kenn ich ja auch, aber das meine ich nicht.
ich möchte in VBA einen Commandbutton (Befehlsschaltfläche) mit einem Icon versehen.
Dort kann man zwar ein Bild einfügen, aber keine Icon - Datei. Also muß ich zuerst ein *.bmp erstellen um es einzufügen.
und dazu suche ich ein entsprechendes Programm.
trotzdem danke für deine Mühe.
gruß
Nikodemo
Grüße
Munich
DonSenilo, ich grüße dich.
Ich komme im Moment nicht weiter.
Ich will nicht in einen Commandbar, sondern in einen Commandbutton (for example: >, Propertys usw…)ein Icon einfügen. das gelingt mir einfach nicht, weil ich dazu eine *.bmp Datei brauche.
danke für deine Mühe.
Nikodemo
'tschuldigung, hatte ich falsch verstanden
vielleicht hilft dies zum Erstellen weiter:
Sub SchaltflächeMitBildEinfügen()
Dim cmd As CommandButton
Set cmd = ActiveSheet.OLEObjects.Add(ClassType:=„Forms.CommandButton.1“, _
Left:=80, Top:=33, Width:=100, Height:=50).Object
cmd.Caption = „Hier klicken“
cmd.BackColor = RGB(256, 256, 256)
cmd.AutoSize = True
cmd.Picture = LoadPicture(„c:\Windows\wickie1.ico“)
Set cmd = Nothing
End Sub
Pfad und Bilddateiname müssen angepasst werden.
Danach im Entwurfsmodus „EINBETTEN“ Formel löschen, dann passen die Farben wieder.
mfg
Hallo,
um ein paar Pixel zu malen, reicht doch das gute alte Paint.
Musst zuerst wissen wieviel Pixel, und dann so zeichnen.
Alternativ irgendeine Grafik finden (google Bildersuche), und deren Groesse auf die Pixelzahl reduzieren, dann als bmp abspeichern, das kann IrfanView.
Gruss Helmut
hi, helmut, das war gut, werd`ich mal so machen
danke
dein Nikodemo
donsenilo, das ist gut, das werd’ ich mal so ausprobieren.
bis dann…
Nikodemo