-
Fototrend
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
m.zmrzlina
senior tag
Sőt így talán jobb mert a nullával való osztás nem okoz problémát ha nincsen kitöltve a dbszám/doboz oszlop.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row >= 4 And Target.Row <= 11 Then
Application.EnableEvents = False
If Target.Column = 2 Then
Cells(Target.Row, 4).Value = Cells(Target.Row, 2).Value / 1.044
On Error Resume Next
Cells(Target.Row, 6).Value = Cells(Target.Row, 2).Value / Cells(Target.Row, 5)
ElseIf Target.Column = 4 Then
Cells(Target.Row, 2).Value = Cells(Target.Row, 4).Value * 1.044
On Error Resume Next
Cells(Target.Row, 6).Value = Cells(Target.Row, 2).Value / Cells(Target.Row, 5)
ElseIf Target.Column = 6 Then
Cells(Target.Row, 2).Value = Cells(Target.Row, 6).Value * Cells(Target.Row, 5)
Cells(Target.Row, 4).Value = Cells(Target.Row, 2).Value / 1.044
End If
Application.EnableEvents = True
End If
End Sub[ Szerkesztve ]
Új hozzászólás Aktív témák
- Steam kulcsok - UTALÁS/REVOLUT
- AKCIÓ! - STEAM kulcsok / Punch Club, Oddworld: Soulstorm, Children of Morta, stb. - 2024.05.16.
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- PC JÁTÉKOK (OLCSÓ STEAM, EA , UPLAY KULCSOK ÉS SOKMINDEN MÁS IS 100% GARANCIA )
- Új, bontatlan World of Warcraft gyűjtői kiadások
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Alpha Laptopszerviz Kft.
Város: Pécs