Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:58:59
Daten einfügen aus anderem Sheet
19.04.2024 12:23:24
Wenn-Formel anpassen
19.04.2024 12:09:19
Unique (Application.WorksheetFunction.Unique)
19.04.2024 11:51:37
Nächsten identischen Treffer suchen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
796to800
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
796to800
796to800
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Exel Botton

Exel Botton
30.08.2006 09:39:38
Kowalski
hallo,
ich möchte einen Button erstellen der mir, bei einem Mausklick, Felder farbig ausfüllt und, oder mit einem häkchen markiert.
Kann mir einer dabei helfen?
mfg
j.k.

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

Betreff
Datum
Anwender
Anzeige
AW: Exel Botton
30.08.2006 12:22:55
Klaus
Hi J.
Zieh Button aus der Toolbox in die Tabelle, doppelclick drauf und schreib diesen Code ab:

Private Sub CommandButton1_Click()
With ActiveCell
.Activate                       'oder die "GetFocusOnClick" Eigenschaft des Buttons auf FALSE setzen und diese Zeile löschen
.Interior.ColorIndex = 36       'Farbe 36 färbt die Zelle hellgelb, Makrorecorder oder ausprobieren um deine Wunschfarbe zu erhalten
.Value = "ü"                    'ÜBERSCHREIBT die aktive Zelle mit dem Buchstaben "ü", Vorsicht!
.Font.Name = "Wingdings"        'setzt die Schriftart auf Windings, so wird aus dem ü ein Haken
End With
End Sub

Wechsel jetzt wieder nach Excel und drück den Button mit dem Geodreieck und dem Bleistift drauf. Dein Häckchen-Button ist jetzt einsatzbereit.
Gruß,
Klaus M.vdT.
Anzeige
AW: Exel Botton
30.08.2006 14:26:16
Kowalski
Vielen Dank Klaus,
kann man den Code noch erweitern so dass ich mehrere Felder markiere und sie dann mit dem erstellten Button gleich formatiere? Nicht jedes Feld einzeln.
AW: Exel Botton
30.08.2006 14:31:11
Klaus
Gern geschehen.
Ungetestet:
(unbedingt die GetFocusOnClick Eigenschaft des Buttons auf FALSE setzen)

Private Sub CommandButton1_Click()
With Selection
.Interior.ColorIndex = 34
.Value = "ü
.Font.Name = "Wingdings"
End With
End Sub

Gruß,
Klaus M.vdT.
AW: Exel Botton
30.08.2006 15:09:00
Kowalski
Vielen Dank Klaus,
kann man den Code noch erweitern so dass ich mehrere Felder markiere und sie dann mit dem erstellten Button gleich formatiere? Nicht jedes Feld einzeln.
Anzeige

Links zu Excel-Dialogen

CommandButton

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige