Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 21:55:37
Preiserhöhung über mehrere Jahre berechnen
17.04.2024 20:19:32
Endzeitpunkt berechnen aus d:hh:mm errechnen
17.04.2024 18:57:33
Errinnerungsfunktion
17.04.2024 16:56:58
Stunden addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1328to1332
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
1328to1332
1328to1332
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

DropDown in VBA??

DropDown in VBA?
27.08.2013 12:10:28
Snewi
Hallo,
ich möchte gerne in einer Zelle ein DropDown in der aktuell immer die Datumstage der nächsten 2 Montage und Mittwoche auszuwählen sind!
DropDown in A2 müsste dann zum Zeitpunkt heute so aussehen:
Mi 28.08.2013 06:00:00
Mo 02.09.2013 12:00:00
Mi 04.09.2013 06:00:00
Mo 09.09.2013 12:00:00
Wenn es ohne VBA geht ist ok, sonst vielleicht in VBA!
Hoffe das ihr mir helfen könnt!
Gruß

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

Betreff
Datum
Anwender
Anzeige
AW: DropDown in VBA?
27.08.2013 14:22:49
grassshopper
Moin,
hier ne VBA-Lösung:
Private Sub Workbook_open()
Select Case Weekday(Now)
Case vbMonday:
tag1 = "Mi "
tag2 = "Mo "
diff1 = 2
diff2 = 7
Case vbTuesday:
tag1 = "Mi "
tag2 = "Mo "
diff1 = 1
diff2 = 6
Case vbWednesday:
tag1 = "Mo "
tag2 = "Mi "
diff1 = 5
diff2 = 7
Case vbThursday:
tag1 = "Mo "
tag2 = "Mi "
diff1 = 4
diff2 = 6
Case vbFriday:
tag1 = "Mo "
tag2 = "Mi "
diff1 = 3
diff2 = 5
Case vbSaturday:
tag1 = "Mo "
tag2 = "Mi "
diff1 = 2
diff2 = 4
Case vbSunday:
tag1 = "Mo "
tag2 = "Mi "
diff1 = 1
diff2 = 3
End Select
If tag1 = "Mi " Then
uhrzeit1 = " 06:00:00"
uhrzeit2 = " 12:00:00"
Else
uhrzeit1 = " 12:00:00"
uhrzeit2 = " 06:00:00"
End If
eintrag1 = tag1 & DateAdd("d", diff1, Date) & uhrzeit1
eintrag2 = tag2 & DateAdd("d", diff2, Date) & uhrzeit2
eintrag3 = tag1 & DateAdd("d", diff1 + 7, Date) & uhrzeit1
eintrag4 = tag2 & DateAdd("d", diff2 + 7, Date) & uhrzeit2
Me.ComboBox1.AddItem (eintrag1)
Me.ComboBox1.AddItem (eintrag2)
Me.ComboBox1.AddItem (eintrag3)
Me.ComboBox1.AddItem (eintrag4)
End Sub

Gruß,
grassshopper

Anzeige
AW: DropDown in VBA?
27.08.2013 14:42:42
Snewi
Hallo,
kann ich auch das Ergebnis direkt einem Formularsteuerelement (Kombinationsfeld) über Makro zuweisen übergeben? Was müsste dann in z.B. Modul1 stehen?
Danach würde ich dann gerne das Ergebnis meiner SQL Abfrage in dem Format:
to_date('02.09.2013 12:00:00','dd.mm.yyyy hh24:mi:ss')
Gruß

AW: DropDown in VBA?
27.08.2013 16:29:26
Luschi
Hallo Snewi,
hier mal mein Lösungsvorschlag. Formeln berechnen den nächsten Mi & Fr ausgehend von aktuellen Datum
in einem ListObjekt werden diese beide Daten und die Woche darauf übernommen.
Die Sortierung übernimmt ebenfalls das ListObjekt und wird per Vba angestoßen bei der Auswahl der Gültigkeitsliste.
https://www.herber.de/bbs/user/87053.xlsm
Gruß von Luschi
aus klein-Paris

Anzeige
AW: DropDown in VBA?
28.08.2013 09:08:31
Snewi
klappt super danke!!

309 Forumthreads zu ähnlichen 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
wert aus dropdown in vba übernehmen
reich

hallo,
könnt ihr mir bitte helfen? wie schaff ich es von einer drop down liste den ausgewählten wert in vba zu übernehmen ...
dim varWert as variant
worksheets("formular").activate
'dropdown 1 liste ansteuern und aktuell ausgewählten wert in vba übernehmen
varWert = 'wert au...
23.09.2008 15:34:00
Thread-ID: 1011776
4 Beiträge
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
Anzeige
Dropdown Menue zum Sheets wechseln
Peter

Hallo,
ich habe ein kleines Vorhaben: Ein DropDown Menue innerhalb der Sheets zur Sheetnavigation, dh.
A) Ich brauche in den Feldern A1, B1 auf jedem Tabellensheet ein Dropdown Menü.
B) Dieses Menü soll - wenn man es öffnet - alle vorhandenen Tabellensheets anzeigen.
C) Wenn man...
28.10.2008 14:57:47
Thread-ID: 1019959
4 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
Anzeige

Links zu Excel-Dialogen

ComboBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
2
3
5
1
3
1
1
1
5
1
11
1
4
3
2
2
1
2
8
1
1
6
10
1