Listview 的运用

chrish · 发表于 2018-4-23 01:12

谢谢，正需要这样的东西啊

chrish · 发表于 2018-4-23 01:13

谢谢谢谢~~~

z00128284 · 发表于 2018-6-30 21:07

非常不错收藏学习了，谢谢

wyymy01101 · 发表于 2018-8-8 23:14

膜拜了，谢谢大神，自己研究了一段时间，但是收效甚微，这个里面的功能就是我需要的，谢谢大神，台鸡冻了

老鬼公公_31 · 发表于 2018-10-1 15:14

一指禅62 发表于 2017-10-22 08:54
附件

导出到新建的工作表怎样写？

一指禅62 · 发表于 2018-10-1 16:55

老鬼公公_31 发表于 2018-10-1 15:14
导出到新建的工作表怎样写？

其他代码相同，以下代码变化以下

Dim wb As Workbook
Set wb = Workbooks.Add
With wb.Sheets(1)
.Range("A1").Resize(UBound(a, 2), UBound(a)) = WorksheetFunction.Transpose(a)
.Columns("A:Z").Columns.AutoFit
.Range("A1").CurrentRegion.Borders.LineStyle = xlContinuous
End With
' Application.ScreenUpdating = False
' Sheet3.Cells.Clear
' Sheet3.Range("A1").Resize(UBound(a, 2), UBound(a)) = WorksheetFunction.Transpose(a)
' Sheet3.Columns("A:Z").Columns.AutoFit
' Sheet3.Range("A1").CurrentRegion.Borders.LineStyle = xlContinuous
' Application.ScreenUpdating = True
' Sheet3.Select

复制代码

老鬼公公_31 · 发表于 2018-10-1 17:39

好的，非常感谢老师的帮忙，节日快乐

linshanfeng1977 · 发表于 2018-10-30 22:16

脚步,脚步,绝对有用

audychu · 发表于 2018-12-15 18:27

非常感谢！！！

dogingate · 发表于 2019-1-24 10:03

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

奇怪，我win7 64位系统里有这个文件，另外我也按照这个方法重新注册了，为什么excel 2016 64位里没有找到listview控件呢

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

[推荐] Listview 的运用