ListView控件基本操作

  • 一、找到ListView控件
  • 二、Listview控件显示数据
  • 三、使用复选框
  • 四、在listview控件中排序

一、找到ListView控件

工具——附加控件——Microsoft ListView Control。


二、Listview控件显示数据

  • 首先我们插入一个ListView控件,如图所示。
  • 数据如图所示
  • 然后再对应事件中插入如下代码
Private Sub UserForm_Initialize()Dim lst As ListItemDim i As Long, j As Long, k As Long, m As Longj = Sheet1.Cells(Rows.Count, 2).End(3).RowWith Me.ListView1For i = 0 To Sheet1.Range("b3").CurrentRegion.Columns.Count - 1.ColumnHeaders.Add , , Sheet1.Cells(3, i + 2), 50Next'设置标题行.View = lvwReport.Gridlines = True'设置视图For k = 4 To jSet lst = .ListItems.Add()lst.Text = Sheet1.Cells(k, 2)For m = 1 To Sheet1.Range("b3").CurrentRegion.Columns.Count - 1lst.SubItems(m) = Sheet1.Cells(k, m + 2).ValueNextNext'添加记录Set .SelectedItem = .ListItems(1)'选择第一条记录End WithSet lst = Nothing
End Sub

三、使用复选框

  • 首先我们在上述代码中加入下列代码,以启用复选框
With Me.ListView1.FullRowSelect = True.CheckBoxes = True
End With
  • 然后插入一个命令窗体,刷入以下代码
Private Sub CommandButton1_Click()With Me.ListView1For i = 1 To .ListItems.CountIf .ListItems(i).Checked ThenSet rngCel = Sheet4.Cells(Rows.Count, 2).End(3).Offset(1)rngCel.Value = .ListItems(i)For j = 1 To 3rngCel.Offset(0, j) = .ListItems(i).SubItems(j)Next.ListItems(i).Checked = FalseEnd IfNextEnd WithSet rngCel = Nothing
End Sub

四、在listview控件中排序

Private Sub ListView1_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)With Me.ListView1.Sorted = True.SortOrder = 1'0为升序,1为降序,默认升序.SortKey = ColumnHeader.Index - 1End With
End Sub

VBA自学应用(16)——Listview控件基本操作相关推荐

  1. ASP.NET ListView控件基本操作

    1.前台代码 View Code 1 <asp:ListView ID="lvDepartment" runat="server" DataKeyName ...

  2. C# 使用ListView控件实现文件查看大图标小图标,详细信息效果

    C# 使用ListView控件实现文件查看大图标小图标,详细信息效果. 前言: 最近的项目需要用到C# 窗体应用里面的ListView,博主这篇文章使用了按钮和快捷菜单进行选择查看视图,实现的是对文件 ...

  3. Android使用ListView控件问题

    Android使用ListView控件问题: The application has stopped unexpectedly, please try again. 开发环境:android 1.6 ...

  4. VB.net实现从ListView控件中异地获取文本内容源代码

    对于一些VB6工程代码来说,需要完成从VB到VB.net的转换,在转换过程中需要注意很多内容,利用VB.net的直接转换功能很少能完全成功,需要我们付出很大的努力. 下面的VB.net代码实现从其他应 ...

  5. vb.net listview 删除选定行_VBA学习笔记59-1: listview控件

    学习资源:<Excel VBA从入门到进阶>第59集 by兰色幻想 本节学习Listview控件,它可以用多种视图方式显示项目的控件.由于其外形美观而且非常实用,所以使用频率很高. Lis ...

  6. Android列表ListView控件的使用

    在Android开发中,ListView是比较常用的控件,它以列表的形式显示具体内容,并且能够根据数据的长度自适应显示. 在ListView中可以根据需要显示自定义的列表内容,包括文字(TextVie ...

  7. ImageList与ListView控件

    一.基本概念 1.ImageList控件 ImageList组件,又称为图片存储组件,它主要用于存储图片资源,然后在控件上显示出来,这样就简化了对图片的管理.ImageList组件的主要属性是Imag ...

  8. activex控件 新对象 ocx 初始化_VBA代码利用Listview控件来显示你的工作表任务

    VBA++ 题记:一剪闲云一溪月,一程山水一年华.一世浮生一刹那,一树菩提一烟霞.岁月静好,现世安稳.纵算云水漂泊,心若安宁,亦可淡若清风.希望见者与不见者都能安康.静下心,多学习有用的知识,多提高自 ...

  9. C#进行MapX二次开发之控件基本操作

    上篇介绍了MapX的部分基本使用代码,包括放大.缩小.缩放到初始大小(全图).平移.矩形选择.圆形选择.箭头.打开图层对话框 .打开ActiveX属性对话框 .添加符号等基本操作代码,本篇继续探讨一些 ...

最新文章

  1. wordcount代码_Scala小案例之wordcount
  2. nginx压力测试和并发预估
  3. 命名空间不能直接包含_php命名空间
  4. 去哪面试都会问的HashMap
  5. python3 redis_python3_redis随手学习笔记
  6. 2020-07-07 内模原理(The Internal Mode Principle)
  7. 关于ngx_trylock_accept_mutex的一些解释
  8. linux必须运行在enforcing,设置 Selinux环境为 Enforcing模式
  9. opencv 高通滤波和低通滤波_一阶低通滤波原理详解
  10. Crackme015
  11. 【关系抽取】从文本中进行关系抽取的几种不同的方法
  12. 文件系统挂载、卸载及相关的工具 ⑨
  13. Eucalyptus学习汇总
  14. RabbitMQ消息队列之RPC调用
  15. 【微信公众号后台基础能力接口对接】
  16. 百度地图LBS开放平台AK一直没有用
  17. android 闪屏动态界面,Android实现闪屏欢迎界面
  18. Windows Server 2016 NTP服务端和客户端配置
  19. 坚持玩游戏为什么会这么容易
  20. 工具及方法 - 斗地主技巧

热门文章

  1. 数学建模之减肥计划 matlab编程,数学建模matlab算法大全第02章整数规划.pdf
  2. 【信号处理】心电信号PQRST峰值检测matlab工具箱
  3. jmeter分布式压测,远程机器来运行脚本,察看结果树中的响应数据项为空白问题
  4. Elasticsearch 6.6 官方文档 之「节点」
  5. Sql Server数据库备份大全(Sql语句)
  6. 小程序x钉钉内网穿透(windows) 步骤
  7. UG快捷键使用技巧总结(补充中....)
  8. 小程序毕设作品之微信小程序点餐系统毕业设计(2)小程序功能
  9. 马华兴、王鹏《做出好选择》读书笔记
  10. 最新版本Portraiture4.1中文版ps磨皮滤镜插件安装包