ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 595|回复: 10

[求助] 窗体间数据传递,请各位老师帮我指点一下

[复制链接]

TA的精华主题

TA的得分主题

发表于 2024-3-1 11:53 | 显示全部楼层 |阅读模式
这个是写出来的文件,请大家帮忙一下

窗体间数据传递.zip

21.65 KB, 下载次数: 19

TA的精华主题

TA的得分主题

发表于 2024-3-1 11:57 | 显示全部楼层
不明楼主的意思,可能是你的表达有问题,又或者是我的理解有问题

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-3-1 12:01 | 显示全部楼层
laterite 发表于 2024-3-1 11:57
不明楼主的意思,可能是你的表达有问题,又或者是我的理解有问题

就是先添加一些控件在一窗体,然后添加一些比如文本框的控件,单击这些文本框的时候就会弹出另外的一个窗体,然后从子窗体输入数据可以提交到父窗体

TA的精华主题

TA的得分主题

发表于 2024-3-1 13:44 | 显示全部楼层
天门白云 发表于 2024-3-1 12:01
就是先添加一些控件在一窗体,然后添加一些比如文本框的控件,单击这些文本框的时候就会弹出另外的一个窗 ...

不知道我理解得对不对,你猜你想要的是

点击userform1的文本框1,在MouseUp或者双击DblClick事件中打开窗体2:
userform2.show

在userform2中的textbox1的change,或者exit,又或者关闭窗体事件中,将文本框1的文本赋给窗体1的文本框1
userform1.textbox1.text =me.textbox1.text

TA的精华主题

TA的得分主题

发表于 2024-3-1 16:38 | 显示全部楼层
公司不便下载附件,等我有空时在家里看下,应该简单的。

TA的精华主题

TA的得分主题

发表于 2024-3-1 16:47 | 显示全部楼层
将类的声明 MSForms.UserForm改为为Object

TA的精华主题

TA的得分主题

发表于 2024-3-1 16:50 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-3-1 17:20 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
laterite 发表于 2024-3-1 13:44
不知道我理解得对不对,你猜你想要的是

点击userform1的文本框1,在MouseUp或者双击DblClick事件中打 ...

是这个意思,但是要类化,不能说固定的传递

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-3-1 17:53 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助

改了之后,确实是可以了,谢谢大佬!但我现在也写了一些第二个窗体的控件的创建,但是现在我开始写不下去了,你可以帮我看一下,然后再改一下的吗

窗体间数据传递.zip

23.92 KB, 下载次数: 19

TA的精华主题

TA的得分主题

发表于 2024-3-1 18:33 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
天门白云 发表于 2024-3-1 17:53
改了之后,确实是可以了,谢谢大佬!但我现在也写了一些第二个窗体的控件的创建,但是现在我开始写不下去 ...

哪里写不下去,不就是继续给窗体控件继续添加事件执行相关功能就可以了么?
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-17 07:20 , Processed in 0.034847 second(s), 12 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表