Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
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
1016to1020
1016to1020
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro ausführen nach Auswahl aus Dropdown

Forumthread: Makro ausführen nach Auswahl aus Dropdown

Makro ausführen nach Auswahl aus Dropdown
24.10.2008 20:55:51
PeterO
Hallo Leute!
Ich verzweifle langsam und habe auch im Forum keine Lösung für mich gefunden. Folgendes Problem:
Der Benutzer einer Tabelle muss in B5 per Gültigkeitslistendropdown den Begriff "PKW" bzw. "Anhänger" wählen. Je nach Auswahl soll in D5 das Zellformat entweder auf 0 "kW" oder 0,0 "to." gesetzt werden.
Die Formatierung an sich ist nicht das Problem. Das würde ich z.B. mit Selection.NumberFormat = "0,0 ""to.""" über VBA lösen können.
Mein Problem besteht jedoch darin, dass ich nicht weis, wie ich den Code "auslösen" soll. Zudem sollte die Änderung auch bei späterer Änderung des Dropdownfeldes automatisch erfolgen.
Wäre echt nett, wenn mir da jemand helfen könnte.
Gruß PeterO
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro ausführen nach Auswahl aus Dropdown
24.10.2008 21:05:00
Hajo_Zi
Hallo Peter,
benutze 

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$3" Then
'Dein Code
End If
End Sub



AW: Makro ausführen nach Auswahl aus Dropdown
24.10.2008 21:13:23
PeterO
Hallo Hajo,
mein VBA ist wirklich bescheiden...
Deinen Ansatz verstehe ich im Grunde schon, nur wie bringe ich ihm bei, bei der Auswahl PKW in B5 die Zelle D5 in "kW" zu formatieren. Mir fehlt quasi die Funktion um die Zelle B5 auszulesen, zu interpretieren und dann D5 zu ändern.
Peter
Anzeige
AW: Makro ausführen nach Auswahl aus Dropdown
24.10.2008 21:31:00
Hajo_Zi
Hallo Peter,
bei
' Dein Code
Select CAse Target
case "PKW"
Range(D5")="KW"
End Select
Eine Formatierung "KW" ist mir nicht bekannt.
Gruß Hajo
AW: Makro ausführen nach Auswahl aus Dropdown
24.10.2008 21:55:00
Uwe
Hi Peter,
ich habe mal anhand von Hajos Vorschlägen eine Code zusammengebastelt, der meiner Meinung nach funktioniert:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$5" Then
With ActiveSheet
Select Case Target
Case "PKW"
.Range("D5").NumberFormat = "0 ""KW"""
Case "Anhänger"
.Range("D5").NumberFormat = "0.0 ""to."" "
End Select
End With
End If
End Sub


?
Gruß
Uwe
(:o)

Anzeige
AW: Makro ausführen nach Auswahl aus Dropdown
25.10.2008 12:29:00
PeterO
Hallo Hajo, hallo Uwe,
sieht sehr gut aus, werde es aber erst am Montag testen können. Melde mich dann noch mal.
Gruß Peter
AW: Makro ausführen nach Auswahl aus Dropdown
27.10.2008 20:35:00
PeterO
Nochmals ein freundliches "Hallo" an alle!
vielen Dank für eure Hilfe. Natürlich auch an Chris. Hat prima geklappt.
Peter
AW: Makro ausführen nach Auswahl aus Dropdown
24.10.2008 21:08:00
chris
Hallo Peter,
würde das funktionieren ?
Weil ein ereigniss für dropdown gibt es soweit ich weiß nicht.
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = ("$B$5") Then
MsgBox ("wechsel erfolgte")
Else
End If
End Sub


gruß Chris

Anzeige
;

Forumthreads zu verwandten Themen

Dropdownliste ausgew. gültige Werte aktualisieren
Flo

Hallo allerseits!
Ich habe ein Problem mit der Aktualisierung von bereits ausgewählten gültigen Werten in einer Dorpdownliste. Die gütligen Werte der Dropdownliste werden per Namensdefinition aus einem anderen Excelblatt gefüllt. Nun kommt es öfter mal vor, dass sich die Gültigen Werte im s...
16.08.2008 16:24:00
Thread-ID: 1002344
2 Beiträge
Anzeige
DropDown Auswahl in Zelle
Lars

Hallo,
ich würde gerne in einer Zelle eine DropDown-Auswahl zur verfügung stellen, wenn die Zelle aktiviert wird. Die Liste soll enthalten "Wartung", "Stillstand" sowie ein Feld zur Freitexteingabe.
Irgendwie stehe ich gerade vor einem Rätsel.
kann mir jemand helfen?
Danke
G...
01.10.2008 13:01:00
Thread-ID: 1013606
6 Beiträge
dynamische Dropdown-Liste
Helmut

Hallo Excel-Profis,
ich möchte gerne eine dynamische Dropdown-Liste erstellen.
Dabei möchte ich z.B. eine Namensliste zur Auswahl anbieten, wo aber der oder die Namen die schon mal ausgewählt wurden, nicht mehr zur Verfügung stehen (so dass ein Namen nicht 2 mal ausgewählt werden kann)....
14.10.2008 12:43:43
Thread-ID: 1016304
2 Beiträge
Dropdownliste aus Matrix erstellen
asdf

Hi ich habe folgendes Problem,
ich hab eine Matrix und möchte die Zeile und Spalte per Dropdownliste auswählen
(wie ich die Dropdownliste selbst erstelle weiss ich ) und will nach auswahl von Zeile und Spalte nun das Ergebnis aus der Matrix haben, also den inhalt der in Spalte x und Ze...
31.10.2008 11:26:37
Thread-ID: 1020823
2 Beiträge
Dropdownliste aus Matrix erstellen
asdf

Hi ich habe folgendes Problem,
ich hab eine Matrix und möchte die Zeile und Spalte per Dropdownliste auswählen
(wie ich die Dropdownliste selbst erstelle weiss ich ) und will nach auswahl von Zeile und Spalte nun das Ergebnis aus der Matrix haben, also den inhalt der in Spalte x und Ze...
31.10.2008 11:38:00
Thread-ID: 1020833
2 Beiträge
Dropdownliste erweitern
Rainer

Hallo Leute,
ich hab mal wieder ne Frage. Ich habe eine Dropdownliste erstellt, in dem ich bestimmte Zellen markiert habe und diesen über die Name Box (linke Seite der Eingabe, wo normalerweise die Zelle steht) einen Namen gegeben haben. Aus dieser Liste kann ich dann im Dropdownmenu auswäh...
05.11.2008 09:52:00
Thread-ID: 1021773
2 Beiträge
Dropdown Auswahlfeld über INDIREKT ansprechen
Thomas

Hallo und einen schönen Tag
Könntet ihr mir mal hilfreich in die Seite treten?
INDIREKT: ich bekomme es einfach nicht hin.
Ich möchte ein Dropdown Auswahlfeld über INDIREKT ansprechen.
Aber so eins wo der Pfeil immer sichtbar ist.
Habe die Datei mal mit hochgeladen.
Wär...
10.11.2008 14:53:21
Thread-ID: 1023207
6 Beiträge
dropdownliste mit bilder
e-mo

Hallo..
ich habe eine Frage in Bezug zum Dropdown Liste.
Ich kann eine Dropdownliste mit der Auswahl erstellen, das ist lein Problem.
moechte aber jetzt eine Dropdownliste erstellen, wo ich als liste, paar bilder habe. Ist das moeglich? ich habe bereits in diversen foren gesucht, le...
18.11.2008 17:06:17
Thread-ID: 1025706
2 Beiträge
Anzeige
Dropdown-Auswahlliste: Ausgabe anderer Text
Daniel

Hallo
Ich habe eine Dropdown-Auswahlliste erstellt, die auch funktioniert. Nun möchte ich aber, dass aus Platzgründen ein anderer (kürzerer) Text ausgegeben wird als in der Auswahlliste angezeigt wird.
Beispiel: Anzeige = Telefon ----- Ausgabe im Feld = Tel.
Ist das überhaupt mac...
04.12.2008 08:58:00
Thread-ID: 1030032
2 Beiträge
Dropdown Liste aus einem seperaten Arbeitsblatt
0ogni0

Hallo und Hilfe
Ich möchte eine Liste aus einem anderen Arbeitsblatt oder einer anderen Mappe als Dropdown Zelle erstellen.
Ist das möglich und wenn ja wie?
Gruß und Dank
Ingo
23.02.2009 11:55:09
Thread-ID: 1053023
3 Beiträge
Drop Down Ansicht einer Gültigkeitsliste "Filtern"
Udo

Hallo,
ich versuche einmal mein Vorhaben so einfach wie möglich zu schildern:
Auf dem ersten Tabellenblatt einer Arbeitsmappe habe ich in die einzelnen Zellen einiger Spalten Namen eingefügt. Die Namen in den einzelnen Spalten wiederholen sich teilweise auch, so dass z.B. in Spalte A so...
27.03.2009 16:41:18
Thread-ID: 1064674
7 Beiträge
BUG ? Dropdown-Liste der Datenvalidierung
Markus

Hallo Forum,
mir ist ein seltsames Verhalten im Zusammenhang mit der Datenvalidierung ("Daten - Gültigkeit ...") aufgefallen. Durch einen VBA-Code kann die die Funktion killen. Seit Tagen bastel ich schon an einem Sheet, bei dem die Validierungsfunktion erforderlich ist. Plötzlich funktioni...
29.04.2009 10:25:13
Thread-ID: 1071807
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Makro ausführen nach Auswahl aus Dropdown

Schritt-für-Schritt-Anleitung

  1. Erstelle das Dropdown-Menü:

    • Wähle die Zelle B5 aus.
    • Gehe zu Daten > Datenüberprüfung.
    • Wähle Liste und gib die Werte "PKW, Anhänger" ein.

  2. Öffne den VBA-Editor:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Füge den Code ein:

    • Doppelklicke auf das Tabellenblatt im Projektfenster, in dem du das Dropdown erstellt hast (z.B. Tabelle1).
    • Füge folgenden Code in das Fenster ein:
    Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Address = "$B$5" Then
       With ActiveSheet
           Select Case Target.Value
               Case "PKW"
                   .Range("D5").NumberFormat = "0 ""KW"""
               Case "Anhänger"
                   .Range("D5").NumberFormat = "0.0 ""to."""
           End Select
       End With
   End If
End Sub

  4. Teste das Makro:

    • Wechsle zurück zu Excel und wähle in B5 "PKW" oder "Anhänger". Die Zelle D5 sollte sich entsprechend formatieren.

Häufige Fehler und Lösungen

  • Error: Das Makro wird nicht ausgelöst.

    • Stelle sicher, dass du die richtige Zelle (B5) im Code angegeben hast.

  • Fehler bei der Formatierung.

    • Überprüfe den Formatierungsstring im Code. Er sollte den korrekten Syntax verwenden, z.B. 0 ""KW""" für kW.

  • Dropdown funktioniert nicht.

    • Achte darauf, dass die Gültigkeitsprüfung korrekt eingerichtet ist und dass die Zellen die richtigen Werte enthalten.

Alternative Methoden

  • Verwende ein Formularsteuerelement:

    • Anstelle eines Dropdowns kannst du auch ein Kombinationsfeld verwenden, welches mehr Optionen bietet.

  • Nutze die Worksheet_SelectionChange-Ereignisprozedur:

    • Damit kannst du andere Aktionen auslösen, wenn eine Zelle selektiert wird, nicht nur bei einer Änderung.

Praktische Beispiele

  • Beispiel 1: Automatische Berechnung

    • Wenn du in B5 "PKW" auswählst, könnte D5 nicht nur das Format ändern, sondern auch automatisch einen Wert wie 200 einfügen.

  • Beispiel 2: Mehrere Dropdowns

    • Du kannst mehrere Dropdowns in verschiedenen Zellen haben, die jeweils unterschiedliche Zellen beeinflussen.
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Me.Range("B5:B10")) Is Nothing Then
        Dim cell As Range
        For Each cell In Target
            Select Case cell.Value
                Case "PKW"
                    cell.Offset(0, 1).NumberFormat = "0 ""KW"""
                Case "Anhänger"
                    cell.Offset(0, 1).NumberFormat = "0.0 ""to."""
            End Select
        Next cell
    End If
End Sub

Tipps für Profis

  • Verwende Option Explicit:

    • Das hilft, Fehler zu vermeiden, da du alle Variablen deklarieren musst.

  • Debugging:

    • Nutze Debug.Print oder setze Haltepunkte, um den Code zu überprüfen und Fehler schneller zu finden.

  • Dokumentation:

    • Kommentiere deinen Code gut, damit du und andere ihn später leichter verstehen können.

FAQ: Häufige Fragen

1. Wie fülle ich andere Zellen automatisch aus, wenn ich Werte in der Excel Dropdownliste auswähle? Du kannst den obigen VBA-Code anpassen, um zusätzliche Zellen automatisch zu füllen, indem du .Offset oder .Range verwendest.

2. Kann ich mehrere Dropdowns in einer Tabelle verwenden? Ja, du kannst mehrere Dropdowns in einer Excel-Tabelle verwenden. Jeder Dropdown kann unabhängig voneinander andere Zellen beeinflussen.

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