当前位置:编程学习 > VB >>

问个弱智问题

我在一个单元格里面写了个"UserForm1"
然后声明变量 Dim x As Object
再然后 Set x = Sheet1.Cells(i_1, 3)'这个单元格就是我写 "UserForm1"的地方
最后我x.show 但什么窗体都没出来 
请问我这个有什么问题? 在cell中做窗体? 窗体是在出发某个时间弹出来的,比如你想双击这个单元格弹出这个窗体,则在beforeDoubleClick()事件中,UserForm1.show 就OK了。
实在不行,把你需求跟我讲下,我给你做!!! 我的意思是。。。
我在一个单元格中输入了UserForm1
然后在一个过程中 声明变量 Dim x As Object
再然后 Set x = Sheet1.Cells(i_1, 3)'这个单元格就是我写 "UserForm1"的地方
最后我x.show 但什么窗体都没出来  

这些都是在auto_open(就是打开excel自动执行那个,拼写可能不对)那个过程中写的,我按f8调试,到了
x.show这句 倒是执行了 但没有任何反应 啥窗体都没弹出来。。。
不知道问题出在哪了 试试:
forms(Sheet1.Cells(i_1, 3)).show

 Dim x As Object
 Set x = VBA.UserForms.Add(Sheet1.Cells(i_1, 3))
 x.Show

    Dim f As Form
    Forms.Add Trim(Sheet1.Cells(i_1, 3))
    For Each f In Forms
        If f.Name = Trim(Sheet1.Cells(i_1, 3)) Then f.Show
    Next Dim f As Form
  Forms.Add Trim(Sheet1.Cells(i_1, 3))
  For Each f In Forms
  If f.Name = Trim(Sheet1.Cells(i_1, 3)) Then f.Show
  Next Dim f As Form
  Forms.Add Trim(Sheet1.Cells(i_1, 3))
  For Each f In Forms
  If f.Name = Trim(Sheet1.Cells(i_1, 3)) Then f.Show
  Next 楼主还是把你的"原意"表达清楚吧, 你遇到的问题应该是你的思路不对造成的. 硬来没结果
补充:VB ,  VBA
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,