Question

菜鸟提问excel中在vba中如何表示某个工作表的某个单元格

在vba中自定义了这个统计背景色的函数：在vba中自定义了这个统计背景色的函数：Function Countcolor(col As Range, countrange As Range)
Dim icell As Range
Application.Volatile
For Each icell In countrange
If icell.Interior.ColorIndex = col.Interior.ColorIndex Then
Countcolor = Countcolor + 1
End If
Next icell
End Function
————————————————————————
接着在vba中，我想把col设为工作表1的c1单元格，countrange设为工作表2的A1：C9区域。这应该怎么写呢？是color1 = Countcolor(工作表1！“c1”), 工作表2！"A1:C9")？
（我想肯定不是。。）

Answer 1

col=Sheets("工作表1").range("c1")
countrange=Sheets("工作表2").range("a1:c9")
把这两个替换进去即可

Answer 2

col=Sheets("工作表1").range("c1")
countrange=Sheets("工作表2").range("a1:c9")
把这两个替换进去即可

Answer 3

color1=countcolor(sheets("工作表1").range("c1"),sheets("工作表2").range("a1:c9"))

Answer 4

color1 = Countcolor(sheets("工作表1").[c1], sheets("工作表2").[A1:C9])

Answer 5

col=Worksheets("工作表1名").Range("C1")
countrange=Worksheets("工作表2名")r.Range("A1:C9")