web-dev-qa-db-ja.com

Excel(2007)VBA-引用符を含む.Formula

昨日、次のコードをプログラムに入れてみました。 VBAがエラーを呼び出しました。これは、数式内の二重引用符が原因です。私はグーグルし、見つけたすべての結果は数式を入れる基本を与えただけでしたが、内部で引用を回避する方法を説明したものはありませんでした。

(これの前にWithステートメントがありました。ピボットはワークシート名です)

.Range("A2").Formula = "=IF(Pivot!A5="",A1,Pivot!A5)" 

どんな助けでも大歓迎です。ありがとう!

12
Graphth

疑わしいときはいつでも、それが可能であればマクロを記録してください:)

これを試して

.Range("A2").Formula = "=IF(Pivot!A5="""",A1,Pivot!A5)" 
25
Siddharth Rout

二重引用符の代わりにChr(34)を使用します。

だからあなたの場合:

.Range("A2").Formula = "=IF(Pivot!A5=" & Chr(34) & Chr(34) & ",A1,Pivot!A5)"
5
Marc

これを行う必要があるかもしれません:

.Range("A2").Formula = "=IF(Pivot!A5="& """" & """" & ",A1,Pivot!A5)" 
1
Greg