0

ハードコーディングされた式は次のようになります。

=SUMMEWENNS(Rawdata!K2:K3446;Rawdata!I2:I3446;"bezahlt";Rawdata!A2:A3446;">="&DATWERT("18.03.2013 00:00");Rawdata!A2:A3446;"<="&DATWERT("24.03.2013 23:59"))

VBA 経由で式を別のセルに追加したいのですが、この文字列を思いつきましたが、構文の問題があり、エラーを見つけることができません。これは、特に「DATWERT」を使用した文字のエスケープに関係している可能性があります。

qq = Chr(34)
Cells(5, fieldextsales).FormulaLocal = "=SUMMEWENNS(RawData!K2:K" & _
                     maxnumrows & ";Rawdata!I2:I" & maxnumrows & ";" & qq & _
                     "bezahlt" & qq & ";Rawdata!A2:A" & maxnumrows & ";" & _
                     qq & ">= " & DATWERT(weekstart & " 00:00") * 1 & qq & _
                     ";RawData!A2:A" & maxnumrows & ";" & qq & "<= " & _
                     DATWERT(weekend & " 23:59") * 1 & qq & ")"

誰か助けてくれませんか？私はそれのこつを得る願っています。

どうも

4

2 に答える 2

2

どうぞ：

"=SUMMEWENNS(RawData!K2:K" & _
maxnumrows & ";Rawdata!I2:I" & maxnumrows & ";" & _
"""bezahlt""" & ";Rawdata!A2:A" & maxnumrows & ";" & _
""">=""&DATWERT(""" & weekstart & " 00:00"")" & _
";RawData!A2:A" & maxnumrows & ";" & _
"""<=""&DATWERT(""" & weekend & " 23:59""))"
于 2013-06-10T13:01:52.140 に答える
1

VBA側からは、ローカル名ではなく、平易な英語の関数名を使用します => DATWERT は、式に埋め込みたくない場合を除き、DateValue にする必要があります。

于 2013-06-10T13:02:40.653 に答える