Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel VBA查找范围中的第一个值行_Vba_Excel - Fatal编程技术网

Excel VBA查找范围中的第一个值行

Excel VBA查找范围中的第一个值行,vba,excel,Vba,Excel,我有这个范围,它选择该列中的所有值: 设置c=ThisWorkbook.worksheetsSplitsSkillInterv.RangeC3:c&Rows.Count 现在我需要让它找到一些值,然后它的行可以是1或10+,所以我需要找到第一个,有什么想法吗 例如,我需要找到:在范围c中,值从1到10,并且随机重复,直到总共100行。我和让我们说我需要找到第一次在范围和它的行中是第3位的时间 这个问题对我来说有点不清楚,但我的理解是,如果将“某物”替换为要查找的值,这将得到第一行的行号和要查找的

我有这个范围,它选择该列中的所有值:

设置c=ThisWorkbook.worksheetsSplitsSkillInterv.RangeC3:c&Rows.Count

现在我需要让它找到一些值,然后它的行可以是1或10+,所以我需要找到第一个,有什么想法吗


例如,我需要找到:在范围c中,值从1到10,并且随机重复,直到总共100行。我和让我们说我需要找到第一次在范围和它的行中是第3位的时间

这个问题对我来说有点不清楚,但我的理解是,如果将“某物”替换为要查找的值,这将得到第一行的行号和要查找的值

i = 3
ValueToFind = 'Something'

Do Until ValueToFind = ThisWorkbook.Worksheets("SplitSkillInterv").Cells(i, 3).Value
    i = i + 1
Loop
FirstRowWithValue = i

我也有点不清楚你在问什么,但使用Find可能会帮你解决问题:

With ThisWorkbook.Worksheets("SplitSkillInterv")
  Set Rng = .Range("C3:C" & RowCount).Find(What:=".", LookIn:=xlValues, lookat:=xlPart, _
             MatchCase:=False)    'find the first "." in the first row
  While Not Rng Is Nothing
    'Your stuff here 
    Set Rng = .Range("C3:C" & RowCount).Find(What:=".", LookIn:=xlValues, _
               lookat:=xlPart, MatchCase:=False)  'find the next "."
  Wend
End With
我将在输入此代码段之前定义行计数。替换什么:=。不管你要找什么

然后,Rng将是包含您正在搜索的内容的单元格。你可以在“你的东西在这里”对该单元格执行你的东西,然后下一行将找到你的搜索项目的下一个匹配项。如果您只需要对第一项执行某些操作,请在Set Rng=