Excel 2010中VBA錯誤1004與式

Question

我有這樣的代碼：

Dim fStrecke As String 
fStrecke = "=A" & z & "*B" & z & "*C" & z 
wks.Cells(z, "L").Formula = fStrecke 

Dim fZeit As String 
fZeit = "=IF(ISBLANK(H" & z & ");((A" & z & "*B" & z & "*I" & z & ")-I" & z & ")+(A" & z & "*B" & z & "*J" & z & ");(A" & z & "*B" & z & "*H" & z & "))" 
wks.Cells(z, "K").Formula = fZeit 

第一個公式是工作，第二我得到一個運行時錯誤1004什麼想法？我已經將用戶定義爲「m：ss」的K列格式化了。

Answer 1

有你兩個選擇：

1. 使用.FormulaLocal屬性：wks.Cells(z, "K").FormulaLocal = fZeit
2. 使用逗號,作爲分隔符代替分號;（即使你的本地設置需要;爲非標準的分隔符）：

---

fZeit = "=IF(ISBLANK(H" & z & "),((A" & z & "*B" & z & "*I" & z & ")-I" & z & ")+(A" & z & "*B" & z & "*J" & z & "),(A" & z & "*B" & z & "*H" & z & "))" 
wks.Cells(z, "K").Formula = fZeit