VBA“要求对象”是什么意思

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

本人刚刚开始学习VBA，公司要求做一个扫码出库的程序，我从网上摘取了一段代码但是一直提示“要求对象”，不知道是哪里出现了问题，求高手帮忙解答，多谢多谢~
'设工作表名称为“数据表”，工作表第27列为“条码”
Private Sub TextBox1_Change()
    '计算数据行的数量
    Dim rowNum As Long
    rowNum = Sheets("数据表").Range("AA" & Sheets("数据表").Rows.Count).End(xlUp).Row
    '取出工作表的数据
    Dim crr
    crr = Sheets("数据表").Range("AA1:AA" & rowNum)
    '取出当前扫描的条码
    Dim dangMa As String
    dangMa = Trim(TextBox1.Text)
    '循环所有数据，对比条码
    Dim i As Long
    For i = 1 To rowNum
        '找到了与扫描相同的条码
        If dangMa = Trim(crr(i, 1)) Then
            Sheets("数据表").Range("A" & i).Select
            Exit For
        End If
    Next
End Sub

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：是什么意思 VBA Private sheets string

骑马，你得先说一下，那个textbox存在不，然后就是sheet数据表存在不。其他再说
学新东西建议从基础开始，连基础都不了解，看别人代码也是看不明白的

范围不对吧，建议一步一步改。