您好我想通過確定每個值的變量插入公式到單元格中。excel vba - 使用變量插入公式
例如,
=G5/D5
所以在電池
Sheets("Sheet1").cells(LastRow + 2, 2).value = "=columnletter1 + (lastrow + 2)/columnletter2 + (lastrow + 2)
我找到columnletter爲G通過確定列名稱爲X,行LASTROW + 2 我怎麼寫,讓我得到「= G5/D5「回到了牢房?
您好我想通過確定每個值的變量插入公式到單元格中。excel vba - 使用變量插入公式
例如,
=G5/D5
所以在電池
Sheets("Sheet1").cells(LastRow + 2, 2).value = "=columnletter1 + (lastrow + 2)/columnletter2 + (lastrow + 2)
我找到columnletter爲G通過確定列名稱爲X,行LASTROW + 2 我怎麼寫,讓我得到「= G5/D5「回到了牢房?
不知道如果我理解你的要求完全是,我想你的意思是:
columnletter1
是一個字符串,= G
columnletter2
是一個字符串,= D
lastrow
是一個長期的,= 3
要設置公式,請構建一個字符串並寫入.Formula
屬性
Sheets("Sheet1").cells(LastRow + 2, 2).Formula = _
"=" & columnletter1 & lastrow + 2 & "/" & columnletter2 & lastrow + 2
對於下面的矩陣計算,給定的代碼(包括帶有變量的公式)可能會有所幫助。
For ROW= 0 To K - 1
For COL= 0 To J - 1
Range("G5").Offset(ROW, COL).Select
ActiveCell.FormulaR1C1 = _
"=SUMIFS(R2C5:R500C5,R2C4:R500C4,RC[" & -COL- 1 & "],R2C2:R500C2,R[" & -ROW- 3 & "]C,R2C3:R500C3,R[" & -ROW- 2 & "]C)"
Next
COL= COL + 1
Next
ROW= ROW + 1