2017-02-21 78 views
0

我想讓我的VB腳本將Excel公式輸入到單元格中。不幸的是我迄今還沒有運氣。VBA - 將包含引號的Excel公式設置爲單元格值

Sheets("ABC").Select 
Range("B2").Value = "=IF(Mat_Location!F2=0;"";Mat_Location!F2)" 

後一些谷歌上搜索,並在此網站上搜索我想這將是因爲引號的,所以我試圖改變引號雙引號。

Sheets("ABC").Select 
Range("B2").Value = "=IF(Mat_Location!F2=0;"""";Mat_Location!F2)" 

這也沒有幫助。

任何幫助表示讚賞。提前致謝。

+0

要添加引號用他們四人即MyString的=「亞當說,」&「」「」&「你好簡!「 &「」「」 –

+0

公式無誤(假設「;」是您的分隔符,而不是「,」)。一些基本檢查,是ABC保護和B2鎖定的單元格?工作簿中是否存在工作簿中的「Mat_Location」工作簿(在這種情況下,表格未明確限定爲特定的工作簿) – Zerk

+0

@JohnMuggins他特別說他嘗試過。 – Zerk

回答

1

Chr(34)代替你的多個",這樣更容易調試。

此外,沒有必要先將Select表單。

Sheets("ABC").Range("B2").FormulaLocal = "=IF(Mat_Location!F2=0;" & Chr(34) & Chr(34) & ";Mat_Location!F2)" 

注意:看來你的Excel的區域設置是有;如公式裏面分隔符。默認設置爲,,所以我的Excel設置(也許也是你的),它可能是:

Sheets("ABC").Range("B2").Formula = "=IF(Mat_Location!F2=0," & Chr(34) & Chr(34) & ",Mat_Location!F2)" 
+0

@AxelRichter感謝修復,在這裏「調試」的中間:) –

+0

謝謝,與上次編輯它工作正常。 :) –

+0

@ D.Todor :)不客氣 –

相關問題