Microsoft Excel

Herbers Excel/VBA-Archiv

Makro für Excel


Betrifft: Makro für Excel von: Adi
Geschrieben am: 11.08.2016 09:35:17

https://www.herber.de/bbs/user/107549.xls

Hallo,
in dieser Tabelle stehen einige Summen Formeln.
Kann man diese Formeln durch Makros ersetzen?
Wenn ja, dann möchte ich ein Makro haben, welches
die Std: berechnet, wenn ein Wert in Spalte „Zeit_Bis“
eingetragen wird.

Und wenn in Spalte „Pause“ ein Wert eingetragen wird,
soll der „Betrag_Arge“ berechnet werden.

Ich sende ein Beispiel der Tabelle mit, in der allerdings bis zu
2000 Zeilen stehen könnten.

Gruß
Adi.

  

Betrifft: AW: Makro für Excel von: Bastian
Geschrieben am: 11.08.2016 10:48:01

ja kann man machen

Gruß Basti

Einfach in VBA in die Gewünschte Tabelle


Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
   If Not Intersect(Target, Columns("G:I")) Is Nothing Then
  Cells(Target.Row, "J") = ((Cells(Target.Row, "H") - Cells(Target.Row, "G")) * 24) - Cells( _
Target.Row, "I")
  Cells(Target.Row, "K") = Cells(Target.Row, "J") * Cells(Target.Row, "F")
  End If
End Sub