ich brauch eure Hilfe, und zwar soll ich ein VBA code schreiben, aber hab keine ahnung davon.
Schreiben Sie ein VBA-Modul, das die fehlerfreie Eingabe in die Tabellen unter folgenden Gesichtspunkten garantiert:
Die laufende Nummer in Tabelle 1 wird vom Programm vergeben.
Autorname und Vorname dürfen keine Ziffern und Sonderzeichen enthalten
(Ausnahme: - an mittlerer Stelle!).
Der Lagerbestand darf nicht negativ sein.
Die Platzziffern in der zweiten Tabelle sind von 1 bis 10 durchnummeriert und sortiert.
Hoffe ihr könnt mir helfen...
christopher.g Überflieger
Anmeldedatum: 03.05.2008 Beiträge: 565
Verfasst am: 25.01.2011, 11:15
hi
ich würde dir gerne helfen
nur weis ich überhaupt nicht was du meinst ^^
Code:
'Die laufende Nummer in Tabelle 1 wird vom Programm vergeben.
'meinst du sowas?
for i = 1 to 10
cells(i, 1) = i
next
'Autorname und Vorname dürfen keine Ziffern und Sonderzeichen enthalten
'(Ausnahme: - an mittlerer Stelle!).
dim Autor as string
cells(1,1) = "Autor"
Autor = TextBox1.Text
If Not IsNumeric(Left$(Autor, 1)) And Not IsNumeric(Right$(Autor, 1)) Then
cells(1,2) = Autor
Else
MsgBox "bitte keine zahlen eingeben"
End If
'Der Lagerbestand darf nicht negativ sein.
dim Lagerbestand as integer
if Lagerbestand < 0 then Msgbox "die Eingabe is fehlerhaft"
vl kannst damit mal was anfangen
wennst noch eine frage hast melde dich einfach