Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
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
1452to1456
1452to1456
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Target Wert aus ComboBox nicht

Forumthread: Target Wert aus ComboBox nicht

Target Wert aus ComboBox nicht
21.10.2015 00:43:15
albin
Hallo zusammen
Wer kann mir bitte helfen?
Makro läuft nur mit manueller Eingabe in A1. Ich möchte das auf durch den Input
aus einer ComboBox, dass Makro reagiert.
Ziel: A1 > 0 Textausgabe in A3:A5
A1 = "" Textausgabe wird gelöscht.
Gruss und Dank
Albin 
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, (Cells(1, 1))) Is Nothing Then
If Target = "" Then
[A3] = ""
[A4] = ""
[A5] = ""
Else
[A3] = "Hallo"
[A4] = "Blablabla"
[A5] = "Gruss"
End If
End If
End Sub

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Target Wert aus ComboBox nicht
21.10.2015 09:24:27
Rudi
Hallo, 
Private Sub ComboBox2_Change()
If ComboBox2.LinkedCell = "" Then
[A3] = ""
[A4] = ""
[A5] = ""
Else
[A3] = "Hallo"
[A4] = "Blablabla"
[A5] = "Gruss"
End If
End Sub

Gruß
Rudi

Anzeige
AW: Target Wert aus ComboBox nicht
21.10.2015 16:03:12
Albin
Hoi Rudi
Danke für dein rasches Feedback, gute Idee mit der Option ComboBox2_Change. Habe noch
eine kleine Anpassung machen müssen. Habe den Wert ComboBox2_Change, durch ComboBox2_Text
ausgetauscht. Weil zwar das Makro einen neuen Wert >0 in A1 erkannte, aber wenn A1 wieder leer
war, nicht mehr.
Danke und Gruss
Albin 
Private Sub ComboBox2_Change()
'----- If ComboBox2.LinkedCell = "" Then
If ComboBox2.Text = "" Then
[A3] = ""
[A4] = ""
[A5] = ""
Else
[A3] = "Hallo"
[A4] = "Blablabla"
[A5] = "Gruss"
End If
End Sub

Anzeige
;

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