Código de programación VBA para calcular el IRPF

No sé calcularlo, ¿cómo escribirlo? Entonces, ¿cómo quieres programar con VBA? ¿Es una función fija o personalizada?

Función impuesto(xVuale As Double, MVuale As Double) As DoubleDim Lv As Double, Taxrate As Long, yVuale As DoubleyVuale = xVuale - MVualeSelect Case yVuale Case Is lt; = 0,05 tasa impositiva = 0 caso es lt; 2000 lv = 0,1 tasa impositiva = 25 caso es lt; Es lt 60000 = 0,3 Tasa impositiva = 3375 Tasa impositiva = 80000 Lv = 0,35 Tasa impositiva = 0,45 Fin Selecttax = yVuale; * Lv - Función TaxrateEndlt;/pgt;