Summenformel mit Variablen
14.03.2021 15:10:21
Simon
ich möchte per VBA eine Formel in eine bestimmte Zelle setzen. Das gelingt mir grundsätzlich auch mit folgendem Code:
Dim SummenString3 As String, last As Long
last = ActiveSheet.Cells(Rows.Count, 8).End(xlUp).Row + 1
'=WENN(H10="test";(F10*G10)*0,95-F10+0;-D10)
Cells(last + 2, 9).Activate
SummenString3 = "=IF(RC[-1]=""test"",(RC[-3]*RC[-2])*0.95-RC[-3]+0,-RC[-5])"
Cells(last, 9).Formula = SummenString3
Allerdings soll jetzt statt "+ 0" der Inhalt einer Textbox einer UserForm eingesetzt werden. Dazu hatte ich mir folgendes überlegt:
Dim Textb1 As Long
Textb1 = TextBox1.Value
Da ich aber jetzt (warum auch immer) "+0" nicht einfach durch Textb1 ersetzen kann, hatte ich mir überlegt, ob es vielleicht an der R1C1-Schreibweise liegt. Die "normale" Schreibweise ist bei mir aber immer fehlerhaft und ich kann sie nicht ganz nachvollziehen:
Vll. so ähnlich?:
SummenString3 "=IF(H" & last & "=""test"";" (F" & last & "*G" & last & ")" *0.95-F" & last & "+0,-D" & last & ")"
Wie sind hierbei die Regeln für das &-Zeichen und die Gänsefüßchen. Muss eine Variable immer von beiden umschlossen sein: " & Variable & " ? Ich bin bei Google leider nicht weitergekommen.
Weiß jemand weiter und könnte mir die richtige Formel, die die Textbox mit einschließt mitteilen?
Schonmal vielen Dank
Simon