Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
396to400
396to400
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

[VBA] 2 Textfelder mit Gültigkeit und/oder dropdow

Forumthread: [VBA] 2 Textfelder mit Gültigkeit und/oder dropdow

[VBA] 2 Textfelder mit Gültigkeit und/oder dropdow
18.03.2004 09:31:25
Markus H.
Guten Tag,
ich habe zwei Felder
TXTanfang
TXTende
in diese Felder soll der Benutzer Zahlen eingeben oder noch besser auswählen können von mind. 1 und maximal 29
jetzt bräuchte ich ein paar prüfungen.. ich weiß allerdings nicht wie ich das anstellen soll.
1. Prüfung
in beiden Feldern muss etwas stehen
2. Prüfung
die eingetragenen Werte dürfen nicht kleiner 1 und nicht größer 29 sein
3. Prüfung
in den Feldern müssen Zahlen ohne , ("Komma") stehen.
4 Prüfung
TXTende muss größer sein als TXTanfang

Ich denke wenn man ein dropdown einfügt würden ein paar prüfungen wegfallen..
Ist es dann möglich, dass wenn man bei TXTanfang 5 auswählt, dass das Dropdown von TXTende von 6 bis 29 geht?

Vielen Dank & sonnige Grüße
Markus
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: [VBA] 2 Textfelder mit Gültigkeit und/oder dropdow
18.03.2004 09:43:04
Daniel
Hi, ja, das geht:
txtanfang=a1
txtende=b1
1-29 in c1:c29 und in d1:d29
In das Datenblatt einfügen:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i As Integer
With Range("a1").Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=$C$1:$C$29"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
i = Range("a1")
If i = 0 Then
i = 1
End If
txtende = "=$D$" & i & ":$D$29"
With Range("b1").Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:=txtende
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
End Sub

Das wars...
mfg Daniel
Anzeige
und wie mach ich das nur mit VBA?
18.03.2004 09:54:27
Markus H.
Danke schon mal..
ich will das aber komplett in VBA machen, also ohne hilfsspalten ect.
Danke
;

Forumthreads zu verwandten Themen

Checkboxen mit If und And-Verknüpfung
Werner

Hallo Spezialisten,
ich benötige einen kleinen Hinweis.
Ich habe eine Userform mit Checkboxen erstellt. Nun benötige ich ein Makro in der Art:
If Checkbox1 = True AND checkbox2 = True Then mach irgendwas
Leider funktioniert diese Verknüpfung ni...
02.06.2010 23:41:31
Thread-ID: 1160089
5 Beiträge
UND/ODER Verknüpfung mit WENN Abfrage
Marc

Hallo Forum.
Bislang konnte ich mir immer mit Beiträge stöbern helfen, aber leider finde ich für mein Problem keine passende Lösung und hoffentlich könnt ihr mir weiterhelfen.
Für eine Grafik ziehe ich mir über folgende Formel Daten aus meinem Reiter 'Arbeitsdaten' in eine Hilfstbelle:...
05.10.2010 16:16:06
Thread-ID: 1180802
7 Beiträge
Verknüpfung WENN ODER mit UND WENN ODER
Rod

Hallo,
ich habe ein Problem und sehe vermutlich die Bäume vor lauter Wald nicht.
Ich muss Arbeitszeiten/Zulagen berechnen und habe folgende Vorgabe:
in A Stehen die Wochentage, in B die möglichen Feiertage, in C und D die Arbeitszeiten, in E das Ergebnis
Wenn A1 = MO, DI, MI ode...
14.02.2011 16:01:24
Thread-ID: 1200728
2 Beiträge
VBA Schleife Farbhintergrund setzen
Dieter(Drummer)

Hi VBA Spezislisten,
suche ein VBA Lösung: Der Bereich ist A4 bis AH34! Ab der aktiven Zelle sollen 3 Zellen BLAU, die nächsten 3 ROT und die nächsten 3 GRÜN Hintergrund gefärbt werden. Dann wieder mit ROT usw. beginnen. Dies soll sich max. bis Zeile 34 der aktiven Spalte wiederholen.
D...
27.04.2011 12:53:49
Thread-ID: 1211980
14 Beiträge
[VBA-Schleife] Worksheets öffnen und speichern
Nico

Hallo,
ich möchte mit verschiedenen Filtern mehrere Worksheets aus einer Datentabelle erstellen. Im Prinzip klappt auch alles.
Einziges Problem:
Beim automatischen erstellen & schließen der Excel-Dateien tauchen unregelmäßig Fehlermeldungen auf.
Einige erstelle Dateien in d...
26.03.2013 11:12:30
Thread-ID: 1306027
3 Beiträge
VBA Undo ? oder zwischenspeichern? oder direkt?
Matze

Hallo Zusammen,
ich komme leider nicht klar und brauch mal Unterstützung wie ich das Problem umsetzen kann (hatte erst an ein Zwischenspeichern gedacht ,Art Undo Befehl)
Es geht um die Spalte J(10) in dieser werden Mehrarbeitstunden eingetragen
Wird eine Eingabe gemacht, so wird je...
09.05.2014 12:07:28
Thread-ID: 1360702
3 Beiträge
Min. und max. X-Achsenbeschriftung durch VBA
Han2883

Hallo Gemeinde,
Ich habe eine einfache Frage und zwar, ich habe bereit ein Diagramm erstellt. Erwünscht wird der min. Wert und der max. Wert der X-Achsenbeschriftung mit VBA automatisch von den Zellen K13(min. Wert) und K14(max. Wert) aufgerufen, wenn man die Werte in K13 und K14 manuell än...
30.06.2014 16:38:50
Thread-ID: 1368230
9 Beiträge
Anzeige
VBA: find und instr oder iserror kombinieren
tomcatoggo

Hallo!
da ich jetzt etliche Stunden an diesem Problem hänge und einfach gar nicht verstehe, warum so eine (so dachte ich das zumindest) super simple Sache sich nicht lösen lässt, frage ich jetzt mal hier nach:
Ich denke ich brauche hier nix extra hochladen... hier die Beschreibung:
...
13.11.2014 15:26:30
Thread-ID: 1392217
6 Beiträge
VBA: find und instr oder iserror kombinieren
tomcatoggo

Hallo!
da ich jetzt etliche Stunden an diesem Problem hänge und einfach gar nicht verstehe, warum so eine (so dachte ich das zumindest) super simple Sache sich nicht lösen lässt, frage ich jetzt mal hier nach:
Ich denke ich brauche hier nix extra hochladen... hier die Beschreibung:
...
13.11.2014 15:49:45
Thread-ID: 1392225
2 Beiträge
VBA Schleife Zellen auswählen und selektieren
Andreas

Hallo,
trotz langem Suchen habe ich keine Lösung gefunden. Ich hoffe Ihr könnt mich helfen.
Folgende Ausgangssituation:
- Mappe „Makro“ befindet sich nur ein Button mit meiner Makro.
- In der Mappe „Daten“ befinden sich alle Informationen die selektiert und kopiert werden sollen...
08.06.2015 14:34:45
Thread-ID: 1429823
4 Beiträge
Kopieren mit VBA Schleife und Bedingung
Elmar

Hallo Experten,
ich bräuchte ein Makro, was die Inhalte einer Datei (Name "Versand") in eine zweite Datei (Name "Master") mit exakt gleicher Struktur kopiert. Das wäre ja noch einfach, aber das Makro soll vor dem Kopieren immer zuerst den Wert der Zelle "D2" aus der Datei "Versand" prüfen,...
12.03.2016 16:23:08
Thread-ID: 1481550
5 Beiträge
Exel_VBA_Begriff suchen und Wert dahinter kopieren
Alexander

Guten Tag zusammen,
ich habe jetzt ein Makro geschrieben was mir eine Datei öffnet...
Sub test() Dim Datei As String Dim Verzeichnis As String Datei = Cells(2, 2) Verzeichnis = Cells(2, 1) Workbooks.Open Verzeichnis & "\" & Datei, ReadOnly:=True ActiveWorkbook.Close SaveChanges:...
20.06.2016 11:13:44
Thread-ID: 1499886
12 Beiträge

Beliebteste Forumthreads (12 Monate)

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