Hallo
Durch die Hilfe hier im Forum habe ich mir eine Tabelle und makros zusammengebastelt .
Jetzt komme ich leider nicht mehr weiter.
Die Makros
Private Sub T20_Click()
ActiveCell.Value = T20.Caption
ActiveCell = T20.Name
ActiveCell.Offset(0, 1) = 60
T20.BackColor = 255
ActiveCell.Interior.ColorIndex = 3 'Färbt Zelle Rot
End Sub
Private Sub T19_Click()
ActiveCell.Value = T19.Caption
ActiveCell = T19.Name
ActiveCell.Offset(0, 1) = 57
T19.BackColor = 5753088 ' Command Button Farbe Schwarz
ActiveCell.Interior.ColorIndex = 4 ' Farbe für Zelle Grün '
End Sub
Private Sub T18_Click()
ActiveCell.Value = T18.Caption
ActiveCell.Offset(0, 1) = 54
T18.BackColor = 255 ' Command Button Farbe Rot'
ActiveCell.Interior.ColorIndex = 3 'Färbt Zelle Rot
End Sub
erfüllen ihren Zweck
jetzt suche ich nach einer Erweiterung , die mir ermöglicht das nach eingabe des ersten Zellenpaares
automatisch das zweite Zellenpaar rechts daneben aktiv wird und danach das dritte Zellenpaar aktiv wird
anschliesend sollte ein Zeilenumbruch in die nächste Zeile erfolgen
Das ganze soll Eingabefehler vermeiden
wer hat eine Idee
T20 |
60 |
T20 |
60 |
T19 |
57 |
T19 |
57 |
T18 |
54 |
T19 |
57 |
T18 |
54 |
D20 |
60 |
D20 |
60 |
|
|
|
|
|
|
MfG