Listview 的运用

q71672618 · 发表于 2019-12-8 01:00

一指禅62 发表于 2017-10-20 20:42
选择字段、部分记录输出输出

老师您好，这个是记录选择性导出，
能不能选择性的显示字段。

比如此图中的年度，期限，责任者，文件题名，选中后,LISTVIEW中显示，不选中的字段将不显示

wbjjzhu · 发表于 2020-1-9 14:47

谢谢楼主分享，收藏学习！

一指禅62 · 发表于 2020-1-9 15:47

本帖最后由一指禅62 于 2020-1-10 09:38 编辑

q71672618 发表于 2019-12-8 01:00
老师您好，这个是记录选择性导出，
能不能选择性的显示字段。

通过设置列的宽度实现。不知是不是您要达到的效果：

ListView字段选择.rar (37.73 KB, 下载次数: 152)

q71672618 · 发表于 2020-1-10 08:56

一指禅62 发表于 2020-1-9 15:47
通过设置列的宽度实现。不知是不是您效达到的效果：

对，就是这个意思，非常感谢

水灵仙子 · 发表于 2020-6-6 16:21

谢谢老师!学习了！

jiangjiang211 · 发表于 2020-7-26 15:54

一指禅62 发表于 2014-3-14 22:41
如果系统文件中没有 MSCOMCTL.OCX 文件，
1、将以下文件解压到“C:\WINDOWS\system32”（WindowsXP）或 ...

win10 注册MSCOMCTL的方法，把MSCOMCTL.OCX文件复制到C:\Windows\SysWOW64
然后用管理员身份运行cmd，输入：
cd c:/windows/syswow64 [回车键]
regsvr32 MSCOMCTL.OCX [回车键]
看到注册成功的消息，即为成功。

wowo000 · 发表于 2020-9-2 17:18

一指禅62 发表于 2018-10-1 16:55
其他代码相同，以下代码变化以下

尊敬的一指禅62老师：
这句代码：.Range("A1").Resize(UBound(a, 2), UBound(a)) = WorksheetFunction.Transpose(a)可以不用转置函数，用数组arr赋值吗？？Transpose()函数有限制的。恳请回复，谢谢！！！

一指禅62 · 发表于 2020-9-3 07:51

wowo000 发表于 2020-9-2 17:18
尊敬的一指禅62老师：
这句代码：.Range("A1").Resize(UBound(a, 2), UBound(a)) = WorksheetFunction.T ...

是的，可以先用 For Next 转置，再赋值到单元格区域。

wowo000 · 发表于 2020-9-3 07:56

尊敬的一指禅62老师：劳烦您给弄弄吧？？！！！先谢谢了！！！！！！！！

一指禅62 · 发表于 2020-9-3 08:01

wowo000 发表于 2020-9-2 17:18
尊敬的一指禅62老师：
这句代码：.Range("A1").Resize(UBound(a, 2), UBound(a)) = WorksheetFunction.T ...

这是哪个楼层的代码？

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

[推荐] Listview 的运用