Excel vba 怎么跨用户窗体和sheets()调用子程序?

比如一个窗体叫"1"
第二个窗体叫"2"

我想让"1"窗体的sub中调用"2"中的sub xxx
请问怎么写呢?

如果是通用过程,传递个参数就能搞定的事,最好是放在公共模块里。
非要跨窗体调用,首先窗体2不能被卸载,其次过程不能被声明为私有。追问

具体怎么写呢?就是跨窗体调用?

温馨提示:内容为网友见解,仅供参考
无其他回答

excel里面我想 用VBA实现调用另一个工作簿中的数据怎么解决
在Excel中,利用VBA可以轻松实现跨工作簿的数据调用。首先,你需要在工作簿的宏录制功能中开始操作。点击左下角的录制宏按钮,为即将执行的操作创建一个宏。在宏名处,输入一个易理解的名称,例如"DataTransfer",并选择存储在"个人宏工作簿"中,然后点击"确定"。录制完成后,通过点击停止录制宏按钮暂停...

excel vba 跨工作簿的过程或函数调用程序写法
在所有录制的宏的语句前面加上 "Workbooks("xxx.xls").",如:Workbooks("xxx.xls").Sheets(1).Select 方便一点的话就 Dim WB As Workbook Set WB = Workbooks("xxx.xls")WB.Sheets(1).Select 刚开始自学VBA的时候也碰到这个问题,搞了好长时间 ...

excel里面我想 用VBA实现调用另一个工作簿中的数据怎么解决
1、点击Excel界面左下角的录制宏按钮录制宏。2、在【宏名】处输入一个有意义的名称,帮助以后识别该宏的功能。本例按照默认名称命名。选择将宏录制在【个人宏工作簿】并点击【确定】按钮。3、马上点击Excel界面左下角的停止录制宏按钮停止宏的录制。4、按Alt+F11打开VBE界面,如下图。5、在代码部分...

Excel 怎么用VBA实现跨工作薄 多条件的引用
a=Workbooks("工作薄名").Sheets("工作表名").range("单元格")然后判断A的值

vba俩个窗体之间怎么跳转
1、打开Excel开发工具下的VisualBasic。2、在项目工程区域,鼠标右击选择“插入”,点击“用户窗体”。3、添加窗体后,在其右侧会自动出现一个工具箱。4、点击“视图”下的工具箱可以控制它的显示和不显示。5、点击工具箱中的控件,添加至用户窗体中。6、点击执行按钮后,可以在Excel工作表中显示窗体界面...

vba如何新建一个excel并且从另一个excel中导入数据到这个新建的excel中...
1.打开表格 2.按alt+F11 3.点击插入 4.点击模块 5.粘贴如下代码 '自定义公式-按ALT+11-插入-模块(提取)Sub 提取()If MsgBox("为避免使用时表格被占用,您将提取收货人为 陈杭荣 所在行至 陈杭荣流水账 后删除该行,是否继续", vbOKCancel) = vbOK ThenUserForm1.Show 0DoEvents 当前...

如何用函数或VBA调用(引用)另外一个工作表的数据
1、首先,在Excel表格中输入如图内容,以方便在VBA中进行读取和处理操作。2、进入VBA环境,可以按键盘上的“Alt+F11”进入。右击“Microsoft Excel对象”,从其右键菜单中选择“插入”-“用户窗体”项。3、接着向窗体中拖动一个“标签”和一个“按钮”,右击“按钮”,从其扩展菜单中选择“属性”项。...

Excel中怎么用vba将多个sheet的内容分别导入另一个sheet的指定列中...
sub a()for i=1 to sheets.count-1 '从第1个到倒数第2个工作表 sheets(i).range("A1:a2").copy sheets(sheets.count).[a65536].end(3).offset(1)next iend sub将每个工作表的A1:A2数据,复制到最后一个工作表的A列中。

vba怎样做用户窗体才能在excel中调用出来或者激活
1、如果你想打开excel就可以弹出,可以选择VBA-thisworkbook下输入:Private Sub Workbook_Open()userform1.show End Sub 如果你想在显示窗体的时候还能操作单元格,可以设置userform1的showmodal属性为false 2、如果只是单纯的显示,可以在表格中插入按钮,链接一个宏 sub fff()userform1.show end sub ...

谁能帮我用VBA做一个excel多用户多权限登陆系统?效果如图
Private Sub Workbook_Open()ThisWorkbook.Sheets("登录").Activate UserForm1.ListBox1.AddItem ("张三&123")UserForm1.ListBox1.AddItem ("李四&234")UserForm1.ListBox1.AddItem ("王二&345")UserForm1.ListBox1.AddItem ("刘邦&456")UserForm1.ListBox1.AddItem ("张飞&567")UserForm1.ListBox...

相似回答