查找标签标题上的行

Question

我有一个带有标签 ID 的用户窗体。仅当行的第一列等于表单的标签 Id 标题时，我才需要查找和修改该行。

当我按下按钮时，所选行没有任何反应。

Private Sub CommandButton2_Click()
    Dim I as integer 
    For I = 2 to Worksheets(“sheet1”).Range(“A10000”).end(xlUp).row
        If cells (i, 1) = label1.caption then
            Cells (i, 3).Value  = TextBox1.text
        End if
    Next I
End sub

Answer 1

这个有用吗？假设按钮位于带有标签和文本框的表单上？

如果它只出现一次，那么一旦发现就可以退出循环。

我添加了一些 sheet 引用并将弯引号更改为直引号。

Private Sub CommandButton2_Click()

Dim I as long

For I = 2 to Worksheets("sheet1").Range("A10000").end(xlUp).row
   If Worksheets("sheet1").cells(i, 1) = label1.caption then
       Worksheets("sheet1").Cells (i, 3).Value  = TextBox1.text
   End if
Next I 

End sub

查找标签标题上的行

Find The Row on Label Caption

excel

vba

label

if-statement

caption