1

我在这里遇到一个问题。

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 列。过滤后,我想用公式填充这些单元格。我的公式有什么问题吗,它可以执行,但不像我预期的那样工作。这个代码虽然和宏一样。但是当运行它时,数据行显示的与我使用宏记录的不同。

4

1 回答 1

2

您正在设置.FormulaR1C1属性,它期望公式使用 R1C1 表示法,而字符串以普通 A1 表示法编写,因此您应该设置该.Formula属性。

于 2013-04-24T01:41:41.093 回答