Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1600to1604
1600to1604
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Schaltflächen-Makro abändern

Forumthread: Schaltflächen-Makro abändern

Schaltflächen-Makro abändern
20.01.2018 09:57:06
mike49
Hallo Leute,
ich habe ein kleines Makro, das bei aktivierter Zelle im Bereich F12:F42 dort den Wert "U" einträgt.
Wie müsste man das Schaltflächen-Makro abändern, dass bei aktivierter Zelle im Bereich B12:B42 der Wert "U" im Bereich F12:F42 eingetragen wird?
Gruß
mike49
Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Schaltflächen-Makro abändern
20.01.2018 10:00:20
mike49
Uups . . .
das Makro vergessen: 
Sub Schaltfläche4_Klicken()
With ActiveCell
If .Column = 6 And .Row > 11 And .Row  "K", "K", "")
'     .Font.Color = vbRed
End If
End With
End Sub

Ich habe die Zeile .Font.Color = vbRed deaktiviert, weil es nicht funktioniert.
Warum das so ist, weiß ich nicht.
Anzeige
AW: Schaltflächen-Makro abändern
20.01.2018 10:01:38
mike49
der Wert soll natürlich "K" sein ;)
AW: Tipp nur zu "Font.Color"
20.01.2018 10:20:13
Dieter(Drummer)
Hallo Mike49,
habe nur Tipp zur Zeile "Font.Color", kannst du so setzen: 
ActiveCell.Font.Color = RGB(255, 0, 0)
'Rot
Gruß, Dieter(DRummer)
AW: Tipp nur zu "Font.Color"
20.01.2018 12:23:01
mike49
Hi Dieter,
danke für den Tipp. Welchen RGB-Wert müsste man für BLAU verwenden?
Gruß
mike49
Anzeige
Auch das ist hilfreich. Danke dir . . .
20.01.2018 12:57:48
mike49
Gruß
mike49
AW: Schaltflächen-Makro abändern
20.01.2018 10:24:57
hary
Moin 
If Not Intersect(ActiveCell, Range("B12:B42")) Is Nothing Then
With ActiveCell.Offset(0, 4)
.Value = "K"
.Font.Color = vbRed '--Schriftfarbe Rot
End With
End If

gruss hary
Anzeige
AW: Schaltflächen-Makro abändern
20.01.2018 12:20:34
mike49
Hallo Harry,
das klappt. Danke
Ich hätte nur noch gerne ergänzt, dass zum Löschen des Eintrages durch erneutes Anklicken der Schaltfläche die Formel =WENN(B12"";"A";"")wieder eingetragen. Das soll für die "K"-Einträge für den Bereich B12:B42 gelten.
Gruß
Michael
AW: Schaltflächen-Makro abändern
20.01.2018 12:41:40
hary
Moin
Versteh deine Beschreibung nicht ganz. 
If Not Intersect(ActiveCell, Range("B12:B42")) Is Nothing Then
With ActiveCell.Offset(0, 4)
If .Value = "" Then '--wenn Zelle in SpalteF leer
.Value = "K"  '--dann K eintargen
.Font.Color = vbRed '-- und Schriftfarbe Rot
ElseIf .Value = "K" Then '--wenn Zelle in SpalteF ein K
.FormulaR1C1 = "=IF(RC[-4]"""",""A"","""")" '--Formel eintargen
.Font.ColorIndex = xlAutomatic  '-- und Schriftfarbe automatisch
End If
End With
End If

gruss hary
Anzeige
Danke dir. Das klappt . . .
20.01.2018 12:55:59
mike49
gruß
mike49
;

Forumthreads zu verwandten Themen

Gesperrte Schaltfläche
Christian

Hallo,
bin absoluter VBA- Anfänger und habe folgende Frage:
Ich möchte gerne eine Schaltfläche zur Ausführung eines Makros erstellen, die beim Öffnen der Datei verfügbar ist. Dies soll jedoch nicht über eine Schaltfläche aus der Sysmbolleiste erfolgen, da diese Schaltfläche in einem ung...
21.06.2009 10:21:58
Thread-ID: 1083195
5 Beiträge
Schaltflächen: Format-Bug
Peter

Hallo Leute,
in mein Programm habe ich diverse Befehlsschaltflächen eingebaut. Leider kommt es hin und wieder vor, dass das Textformat der Schaltfläche (Caption) durch die Schaltflächenbetätigung stetig größer bzw. kleiner wird. Hin und wieder vergrößert bzw. verkleinert sich auch die gesam...
25.06.2009 14:10:20
Thread-ID: 1084338
3 Beiträge
Schaltfläche und Vergrößerungsfaktor
Wolfgang

Hallo liebe Experten,
ich habe zwei Fragen:
1. Früher konnte ich die excel-Schaltflächen selbst zeichnen, heute gelingt mir das nicht mehr. Geht das mit Office 2003 noch?
2. Kann ich den default-Wert der Vergrößerung (in der Symbolleiste: Standard) der auf 100% festliegt ändern? Ich...
26.06.2009 20:26:11
Thread-ID: 1084657
5 Beiträge
Ausrichtung Befehlsschaltfläche
berni

Liebe Excel-lenzen!
Ich hatte einmal den Short-Cut intus, aber leider in der zwischenzeit wieder vergessen.
Also: Wenn ich untereinander verschiedene Schaltflächen aus der Formularsammlung untereinander aufgelistet habe, gab es doch irgendwie eine Möglichkeit, per Shortcut die unteren a...
30.06.2009 19:09:55
Thread-ID: 1085343
3 Beiträge
Gif auf Schaltfläche
ReSt

Guten Morgen
Da hätte ich mal eine Frage. Kann man auf eine Activ X-Schaltfläche eine gif-Animation legen?
Bis jetzt hat sich bei mir noch nichts bewegt.
Gruss Reto
05.07.2009 10:33:28
Thread-ID: 1086448
5 Beiträge
Anzeige
Schaltflächenmakro
Michael

Servus,
ich bin noch blutiger Excel/VBA Anfänger und will mir ein paar kleine Ecxel Makros bauen. Ich habe eine Tabelle mit zwei Schaltflächen. Schalftfläche "Ordner" soll prüfen ob im selben Verzeichnis wie der Excel Datei bereits ein Ordner mit dem Name aus den Spalten A "Artikel" und B "...
07.07.2009 13:09:26
Thread-ID: 1086922
2 Beiträge
Anzeige
Makro ausführen mit Schaltfläche
Alex

Hi @ all,
ich habe mal wieder ein Problem.
Und zwar hab ich folgendes Makro in einer Vorlage:
Sub FilternKopierenTGA() Dim rngAct As Range With Worksheets("TGA") .Cells.Clear Range("N1").AutoFilter _ Field:=14, Criteria1:="TGA" 'Filtern Spalte N nach TGA Set rngAct = Range("A2"...
08.07.2009 13:38:12
Thread-ID: 1087178
5 Beiträge
Anzeige
Makroschaltfläche
Hübner

Hallo liebe Helfer,
ich habe gleich 2 Probleme, sicherlich könnt Ihr mir wieder helfen.
Thema: Dateienumstellung von 2003 auf 2007
1.
gibt es eine Möglichkeit in 2007 das beim Aufzeichnen von einem Makro eine vorhandene Schaltfläche (die mit einem Makro hinterlegt ist, erstellt...
14.07.2009 21:02:25
Thread-ID: 1088359
2 Beiträge
Schaltfläche auszeichnen
Hübner

Hallo liebe Helfer,
ich habe ein Probleme, sicherlich könnt Ihr mir wieder helfen.
gibt es eine Möglichkeit in 2007 das beim Aufzeichnen von einem Makro eine vorhandene Schaltfläche (die mit einem Makro hinterlegt ist, erstellt mit 2003)mit aufgezeichnet wird?
In 2003 ging dies prob...
14.07.2009 14:31:23
Thread-ID: 1088468
7 Beiträge
2 Makros mit einer Schaltfläche ausführen?
Alex

Hi @ all!
Ich hab mal eine Frage:
Is es möglich zwei Makros, die sich auf unterschiedliche Blätter beziehen mit einer Schaltfläche auszuführen.
Das erste Makro filtert und kopiert Daten in das Tabellenblatt in welchem anschließend Zeilen eingefärbt werden sollen
Danke schon mal<...
16.07.2009 23:02:18
Thread-ID: 1089255
3 Beiträge
ListFilRange bei Befehlsschaltflächen
Pfannen-Meister

Guten Tag,
nachdem mir hier heute Vormittag schon geholfen wurde, müßte ich nochmals Hilfe in Anspruch nehmen:
Wenn ich mit Befehlsschaltflächen arbeite, so kann ich im Feld "ListFilRange" eine bestimmte Menge an Excel-Feldern auswählen, deren Inhalt mit Hilfe der Befehlsschaltfläche s...
06.08.2009 15:23:31
Thread-ID: 1094074
3 Beiträge
Schaltflächen verschwinden
Fritz

Hallo,
ich habe das Problem, dass nachdem eine Excel-Tabelle Monatelang in einer Firmenumgebung einwandfrei funktioniert hat (als Freigegebenes Dokument mit einigen Makros) nun plötzlich beim anwenden des Autofilters wahllos Schaltflächen "verschwinden" lässt.
Das Dokument wird von ver...
17.08.2009 13:06:59
Thread-ID: 1096418
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige