Supportnet / Forum / Tabellenkalkulation

STUNDE1 STUNDE 2 STUNDE3 Lohn ARBEITER 1 ARBEITER 2 ARBEITER 3 Ich habe die Beträge hinterlegt.(Bezugszelle) Nun möchte ich das der Arbeiter ein x in die Tabelle macht je nachdem ob er 1,2oder 3 Stunden gearbeitet hat. Soweit ist die Tabelle fertig. Nun möchte ich erreichen : Wenn Arbeiter1 ein x bei Stunde 2 macht , sobald er ein x bei Stunde 3 oder Stunde 1 macht das,dass x bei Stunde 2 gelöscht wird . Hoffe das versteht einer ! :-) Gruß Memphis

hallo,
ich glaube schon das ich verstehe was du machen möchtest, aber leier muss ich dir mitteilen das das so nicht funktioniert.

alternative über Optionsfelder aus der Steuerelemet-Toolbox, wenn ein feld geklickt wird, werden die anderen der selben Option ausgeklickt.

mfg
roland

Hi memphis,

ich gehe mal davon aus, dass die Texte Arbeiter 1 Arbeiter 2 und Arbeiter 3 in den Zellen A2, A3 und A4 stehen. Außerdem gehe ich davon aus, dass die Texte Stunde 1in Spalte B, Stunde 2 in Spalte C und Stunde 3 in Spalte D stehe. Wenn dem so ist, dann kopiere nachfolgenden VBA Code in das VBA Projekt des Tabellenblattes, in dem die obigen Texte stehen und in das der Arbeiter sein x einträgt.

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Row > 1 Then
If Target.Column = 2 Then
Range(Cells(Target.Row, 3), Cells(Target.Row, 4)).ClearContents
End If
If Target.Column = 3 Then
Cells(Target.Row, 2).ClearContents
Cells(Target.Row, 4).ClearContents
End If
If Target.Column = 4 Then
Range(Cells(Target.Row, 2), Cells(Target.Row, 3)).ClearContents
End If
End If
Application.EnableEvents = True
End Sub

Mit dem Code wird jenachdem, in welcher Spalte das x eingetragen wird, in der gleichen Zeile in den anderen Spalten der Buchstabe x gelöscht.

Ich hoffe, Du hast das so gemeint und dass Du klarkommst.Bei Fragen oder Problemen mede Dich bitte wieder.

Solltest Du nicht wissen, wie Du den Code in Deine Datei bekommst, dann schau mal auf meiner HP in der Rubrik Anleitungen und dort dann in der Anleitungsnummer 2 nach. Dort stelle ich dazu eine bebilderte Anleitung zur Verfügung, die Dir sicherlich helfen wird.

MfG,
Oliver
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein}
^{Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

Hallo Oliver,
zunächst erst einmal Danke,dass du dich so schnell
der Problematik angenommen hast.
Ich werde diese Lösung übernehmen.
Hat prima funktioniert.
Herzlichen Dank ;-)))
Memphis

Hallo Memphis,

freut mich, dass Dir die Lösung zugesagt hat. Danke Dir auch für die Rückmeldung.

MfG,
Oliver
^{Jeder macht was er will, keiner macht was er soll, aber alle machen mit.}

• Makro: Markierung Diagramm
• Jede 4. Zelle addieren
• 2 Zellen zusammenführen und dabei führende Nullen in der 2. Zelle einfügen
• Bedingte Formatierung Zellergebnis markieren
• Kann man ein Excel-Kopiermakro mit Platzhaltern erstellen?