Fomeln in Macros
21.11.2003 12:16:07
Michael
ich hab wieder mal ein kleines Problem, in meinem Code soll eine Formel ausgeführt werden, wie muss die Aussehen?
Der Recorder ist da leider auch keine grosse Hilfe
Private Sub CommandButton1_Click()
Range("B3").Select
ActiveCell.FormulaR1C1 = "Brutto"
Range("B4").Select
ActiveCell.FormulaR1C1 = "=WENN(E21="";"";E21*116%)"
Selection.AutoFill Destination:=Range("B4:B30"), Type:=xlFillDefault
Range("B4:B30").Select
End Sub
bei FomulaR1C1 soll die Formel ausgeführt werden
Gruss aus München