在Excel 2013中将文本与公式连接在一起

时间:2016-06-13 21:39:27

标签: excel vba excel-vba

我有这种excel数据表:

Sheet0:

    column A     column B
 1  SheetA       =COUNTIF('SheetA'!A:A;"<>")
 2  SheetB       =COUNTIF('SheetB'!A:A;"<>")
 3  SheetC       =COUNTIF('SheetC'!A:A;"<>")
 .  ... More than 60 rows ...

我的工作表名称基于具有此VBA功能的A列:

Sub SheetRenames()
    Dim R As Range
    Dim WS As Worksheet
    Set R = ActiveCell
    For Each WS In ThisWorkbook.Worksheets
        WS.Name = R.Value
        Set R = R(2, 1)
    Next WS
End Sub

我希望,在我的公式中,用A列的内容替换原始文本'SheetA',因为我可以修改工作表名称,我不想修复所有公式......

有可能吗? 如果是的话,如何。

提前谢谢。

编辑:

CELL("contents";A1) = SheetA

现在有什么好的语法?

=COUNTIF('CELL("contents";A1)'!A:A;"<>")

1 个答案:

答案 0 :(得分:1)

你想要INDIRECT():

=COUNTIF(INDIRECT("'" & A1 & "'!A:A"),"<>")