Excel 自动筛选写入编码的功能与录制在宏中的功能不同

我在这里面临一个问题

formula = "=CONCATENATE(""ML"",MID(cell(C),2,1),MID(cell(C),4,5),""M"",RIGHT(cell(C),2),""_"",LEFT(D52,1),""_Q"")"

ActiveSheet.Range("$H$2:$H$1048576").AutoFilter Field:=8, Criteria1:="=SAMP"
'exclude the header  
Range("A1").Select
ActiveCell.Offset(1, 0).Select


ActiveCell.FormulaR1C1 = formula
'Range("A2").AutoFill Destination:=Range("A2:A" & Range("A" & Rows.Count).End(xlUp).Row)
Selection.FillDown

---

我试图用这个编码过滤我的H列。过滤后，我想用公式填充这些单元格。我的公式有什么问题吗？它可以执行，但不像我预期的那样工作。这个代码虽然和宏一样。但是当运行它时，数据行显示的与我使用的宏录制的不一样。

您正在设置

.FormulaR1C1

属性，该属性要求公式使用R1C1表示法，而字符串是用普通的A1表示法编写的，因此，您应该设置

.Formula

属性。

尝试将此行：

ActiveCell.FormulaR1C1=Formula

更改为

ActiveCell.Formula=Formula

。我希望

formula

可以像字符串一样正常工作-我没有检查它。。。