查找特定字符单元格并标明顺序?
请教各位大神,如何用VBA查找特定字符单元格并自动标明顺序?比如如下
2018-04-10 19:45
程序代码:
Public Function GetNumValue(ByVal rg As Range) As String
Dim strValue As String
Dim r, i, c, j As Integer
strValue = rg.Value
r = rg.Row
c = rg.Column
j = 0
For i = 1 To r
If Cells(i, c).Value = strValue Then
j = j + 1
End If
Next
GetNumValue = "第" & j & "个:" & rg.Value
End Function
2018-04-26 07:20