VBA操作复合框文本框

ke3088 · 发表于 2023-3-4 18:54

窗体1的复合框的字符串与窗体2的文本框1-6的字符串相对比，如相同则显示内容相同，不相同则查找出第1个空白文本框序号，该代码如何写，向老师求教，谢谢

ke3088 · 发表于 2023-3-4 20:16

本帖最后由 ke3088 于 2023-3-4 23:30 编辑

用了以下代码：
For r = 1 To 6
      yys = Trim(窗体2.Controls("TextBox" & r))
      Set Rng = yyXls.Find(what:=ComboBox1.Value, lookat:=xlWhole)
      If Not Rng Is Nothing Then
         MsgBox Rng
   End If
Next r
显示，没有找到对象

taller · 发表于 2023-3-5 07:49

ke3088 · 发表于 2023-3-5 08:58

taller 发表于 2023-3-5 07:49

对，就是这个，谢谢

		自动登录	找回密码
密码			免费注册

[求助] VBA操作复合框文本框