Osaatteko joku pukea koodiksi sen, miten lasketaan osinkovero, kun se tulee USAsta.
Alla on Suomen osinkoveron Basic-koodi exceliin:
' Laskee paljonko osingosta menee veroja Suomen lakien mukaan
Function OSINKOVEROA(osinkoa As Double) As Double
Dim veroa As Double
Dim pienempiPct As Double
Dim suurempiPct As Double
pienempiPct = 0.255 ' https://www.veronmaksajat.fi/Sijoittaminen/Osinkojen-verotus/
suurempiPct = 0.289
veroa = 0
If osinkoa > 30000 Then
veroa = (osinkoa - 30000) * suurempiPct 30000 * pienempiPct
Else
veroa = osinkoa * pienempiPct
End If
OSINKOVEROA = veroa
End Function
Alla on Suomen osinkoveron Basic-koodi exceliin:
' Laskee paljonko osingosta menee veroja Suomen lakien mukaan
Function OSINKOVEROA(osinkoa As Double) As Double
Dim veroa As Double
Dim pienempiPct As Double
Dim suurempiPct As Double
pienempiPct = 0.255 ' https://www.veronmaksajat.fi/Sijoittaminen/Osinkojen-verotus/
suurempiPct = 0.289
veroa = 0
If osinkoa > 30000 Then
veroa = (osinkoa - 30000) * suurempiPct 30000 * pienempiPct
Else
veroa = osinkoa * pienempiPct
End If
OSINKOVEROA = veroa
End Function
Vastaukset
Vanhimmat
Ei vielä vastauksia
Aloittaja odottaa vastauksia. Kerro oma näkemyksesi ensimmäisenä.