Goedemorgen,
Onderstaande code resulteert in een afgerond bedrag in balans!D" & Rij, laten we zeggen de waarde is €408.13 maar er wordt weggeschreven €408,00. Inmiddels en ik er achter dat dit wordt veroorzaakt door de 'And....' die aan het eind is toegevoegd.
Ik heb de
al gewijzigd in
maar dit was ook niet de oplossing
De vraag is, bestaat er een andere code waarmee in één coderegel tegelijkertijd een waarde met decimalen wordt weggeschreven en een andere cel wordt leeggemaakt?
Vr Gr Albert
Onderstaande code resulteert in een afgerond bedrag in balans!D" & Rij, laten we zeggen de waarde is €408.13 maar er wordt weggeschreven €408,00. Inmiddels en ik er achter dat dit wordt veroorzaakt door de 'And....' die aan het eind is toegevoegd.
Code:
If Range("TblJour!F25000") - Range("TblJour!G25000") > 0 Then Range("balans!D" & Rij) = Range("TblJour!F25000") - Range("TblJour!G25000") And Range("balans!E" & Rij) = ""
Ik heb de
Code:
And Range("balans!E" & Rij) = ""
Code:
And Range("balans!E" & Rij).ClearContents
De vraag is, bestaat er een andere code waarmee in één coderegel tegelijkertijd een waarde met decimalen wordt weggeschreven en een andere cel wordt leeggemaakt?
Vr Gr Albert