hi all,

i'm new here and i hoop you ppl can help me.


this is what i wand

h2 30



c1 33 -- c1 30
c2 3


i have mad this in macro


Code:
--------------------


Sub bereken()
grens = Range("H2").Value
invoer = ActiveCell.Value
If invoer grens Then
restwaarde = invoer - grens
uitvoer = invoer - restwaarde
ActiveCell.Value = uitvoer
ActiveCell(2, 1).Value = restwaarde
End If

End Sub


--------------------



i don't like it in macro so i hoop somebody has some code that does
the same

i put a sample in the attached..

Attachment filename: test1.xls
Download attachment: http://www.excelforum.com/attachment.php?postid=505351
---
Message posted from http://www.ExcelForum.com/