Office: Knobelaufgaben für Anfänger, Routine für Profis :)

Hey Leute,

kann mir jemand kurz weiterhelfen:

1) Ich möchte eine MSG-Box erzeugen und zwar, wenn in einer Combox ein bestimmter Wert drinsteht (Kürzel1 oder Kürzel 2... K4 -) und gleichzeitig muss ein Datum in Format TT.MM.JJJJ in einer Textbox eingegeben werden.

Vorschlag: If Worksheets("A").ComboBox1.Value = Worksheets("A").Cells(1,1) Or... AND TextBox1 "TT.MM.JJJJ" Then...
Msg Box
End If

Allerdigs möchte ich das Datum genau nach der Vorgabe eingeben, also nicht dass einfach nur Zahlen in der Zelle stehen, sondern genau ein Datum nach dem Format, sonst öffnet die MSG Box.


2) Wie bekomme ich es hin, dass ich ein einer Textbox eine VOLLE (Int) ingeben muss, so dass keine Kommastellen oder Buchstabe in der Zelle stehen darf?

- Kein Vorschlag, ratlos!!

3) Weiterhin möchte ich die Daten von einem Tabellenblatt in ein anderes übertragen und dort speichtern, das habe ich hinbekommen. Allerdings soll jetzt eine Sicherung eingebaut werden, dass die Werte nicht doppelt gebucht werden. Ich habe mir das so gadacht, dass die neuen WErte mit der Spalte der vorrigen verglichen werden.

- Hätte das mit einer If Schleife gelöst, allerdings habe ich mehr als 7 Bedingungen, ca 15.

Kann mir da jemand weiterhelfen?

:)

 

haLLO


Bin Zwar kein Profi, aber:
zu 2)
Versuch mal sowas:
Option Explicit

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
Case 48 To 57
Case Else
KeyAscii = 0
End Select
End Sub


Zu 1) ist mir auch was eingefallen:
DAs sind deine Strings die erlaubt sind:
A

	A
1	REO4L
2	1USIC
3	G5XJR
4	CY9BY
5	ANY08
6	0D9LE
7	L4NLW
8	U4R4T
9	2ME96
10	BIA63
11	DT5IU
12	9G98R
13	OE2OX
14	MFSRG
15	BOL7T
16	HFW08
17	W0TZY
18	LK688
19	O8RWU
20	2OXPA

Excel Tabellen im Web darstellen >>

 

Hey ransi, danke für deine Mühe.

Werd ich morgen früh mal ausprobieren und dann berichten.

Kurz zu 3) Kurz gesagt schreibe ich Wert in Zelle A1, A2, ...A15. Diese Übergabe von anderen Zellen wird durch ein Button ausgelöst. Beim nächsten Mal werden die Werte in Zelle B1, B2... B15 gespeichert. Allerdings soll eine msg Box erscheinen, wenn die Werte schon gebucht sind, da man den Button ja mehrmals hintereinander betätigen kann und die Werte nur einmal gebucht werden sollten.

Das war hoffentlich besser ausgedrückt :-)

 

Hey ransi,
hätte nicht besser laufen können. *Smilie

Vielen Dank *cool.gif*