在stringvba excel中评估variables

sReport = "EFGHIJKLM" sSource = "FGHIJKLMN" For J = 5 To 18 For I = 1 To Len(sReport) wbTarget.Sheets(sheetTargetName).Range(Mid(sReport, I, 1) & J) = "=HK_USD!(Mid(sSource, I, 1) & J+79)+London_USD!(Mid(sSource, I, 1) & J+79)+Labuan_USD!(Mid(sSource, I, 1) & J+79)+NY_USD!(Mid(sSource, I, 1) & J+79)+NISP_USD!F84+OWH_USD!(Mid(sSource, I, 1) & J+79)" Next Next 

我有这个公式，如上图所示。 基本上，我想这条线评估为

 wbTarget.Sheets(sheetTargetName).Range("E5") = "=HK_USD!F84+London_USD!F84+Labuan_USD!F84+NY_USD!F84+NISP_USD!F84+OWH_USD!D4" 

范围将由于循环而变为F5，G5，H5等。 公式的左侧工作。 问题是string中的问题。 我怎样才能改变这个代码，以便它将评估我的string中的variables？ 谢谢

Answer 1

像这样的东西

 strFormula="=HK_USD!" & (Mid(sSource, I, 1) & J+79) & "+London_USD!" & (Mid(sSource, I, 1) & J+79) & " +Labuan_USD!" & (Mid(sSource, I, 1) & J+79) & " +NY_USD!" & (Mid(sSource, I, 1) & J+79) & "+NISP_USD!F84+OWH_USD!" & (Mid(sSource, I, 1) & J+79) wbTarget.Sheets(sheetTargetName).Range(Mid(sReport, I, 1) & J)=strFormula