ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

Listview 行扩充

[复制链接]

TA的精华主题

TA的得分主题

发表于 2022-12-14 15:08 | 显示全部楼层 |阅读模式
各位大师好,


        参考附件,我现在展现 listview 的初期表格没有问题。 但是,在 窗体的 文本格添加内容后,需要调用 module 进行一系列的运算并显示相关数据到 17~26行。 这样就会把 17~26行的数据追加到当前的 Listview 中继续显示。

    目前遇到几个问题:

     1, 窗体中的文本框录入后,不能调用 module. (如何实现文本框内容变化后调用 module, 或者其他思路)
     2,追加显示的 Listview 中的内容不是 刷新后的内容, 而是最初 6~13 行内容接在后面显示。( For 语句里面的信息再次刷新后没在 listview 中生效)
     3, 追加显示的其他好方法。


谢谢指导和大家的交流
Same as.JPG

3ew.zip

23.87 KB, 下载次数: 8

TA的精华主题

TA的得分主题

发表于 2022-12-14 15:29 | 显示全部楼层
把简单问题复杂化了,没必要如你这般复杂的

TA的精华主题

TA的得分主题

发表于 2022-12-14 20:30 | 显示全部楼层
  1. Private Sub Label5_Click()
  2.     countB = Sheet1.Cells(1, 2) + Sheet1.Cells(1, 4)
  3.     countC = Sheet1.Cells(2, 2) + Sheet1.Cells(2, 4)
  4.     Call Xianshi
  5. End Sub
复制代码

TA的精华主题

TA的得分主题

发表于 2022-12-14 20:32 | 显示全部楼层
窗体打开后D1、D2各填写上11,看看效果

TA的精华主题

TA的得分主题

发表于 2022-12-14 20:34 | 显示全部楼层
或:
Private Sub Label5_Click()
    countB = countB + TextBox3.Text
    countC = countC + TextBox4.Text
    Call Xianshi
End Sub

TA的精华主题

TA的得分主题

 楼主| 发表于 2022-12-15 19:07 | 显示全部楼层
谢谢 3/4/5 楼的师哥师姐。 从图片看,三种方式,其 Listview 中两次读取的内容似乎同时变或均不变,而不是接在后面显示。 另外, 我确实需要 从 Module 中读取更新的变量,因为该变量的生成来自多个工作表之间的逻辑上的多重计算和查找。依据计算出来的信息来判别到哪个工作表的第几行和第几列来读取相关的物理量,以便跟在 后面显示。是否有可能 点击“追加” 指令框来 Call module , 或者推荐其他方式来 call module. 谢谢!
23wsx.JPG
34ert.JPG
12323.JPG

TA的精华主题

TA的得分主题

 楼主| 发表于 2022-12-23 07:47 | 显示全部楼层
师哥师姐,关于 Listview 追加显示的问题解决了。 谢谢!

目前的困惑是:  如何 将 User form 中在 command box 中的信息 传递给 Module  (目前显示调用模块失败), 一旦成功,module 中仅限多文档间的复杂计算来形成新的 count B  和 count C , 从而 后续需要的 行就顺理成章显示啦。 谢谢

TA的精华主题

TA的得分主题

 楼主| 发表于 2022-12-23 08:30 | 显示全部楼层
您好,调用 Module 的问题我也搞定了,我把 module 名称搞重合了,非常感谢!
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2024-11-20 04:19 , Processed in 0.037885 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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