delphi listview1添加指定列_按指定次数重复数据,PQ也太溜了

由于公众号规则改变,为防止以后看不到我们: 请务必点击上方蓝字【Excel三十六计】→右上角菜单【···】→设为星标★

974da8368764c1887a63b740db7aa233.gif

在以前的文章中,我们学了关于如何处理按指定次数重复数据,请看以下文章:

你会按指定次数重复数据吗?

这是用vlookup函数和辅助列来实现,当然也可以用Word、rept进行技巧性解决。今天我们来学习如何用PQ来快速实现。

首先我们来看下源数据:

9c874440c9441404c52eec5c1679bdee.png

需求:

如果次数为6,那么就要拆分成6行,也就是按次数来拆分成多行数据。

操作步骤:

1、选中所有数据,单击【数据】——自表格,将数据加载到PQ编辑器中。

9c874440c9441404c52eec5c1679bdee.png

2、单击:添加列——自定义列,在自定义列公式中输入:

={1..[次数]}

这里的1.. 表示从1至多少,[次数]是字段名。

13bd1fab855ef4533c76563ea5b0820f.gif

3、选择新增加的列——扩展到新行,如此就将数据按次数进行扩展了。

4、删除次数列和自定义列,单击【文件】——【关闭并上载】,如此我们就把所有数据都按次数进行重复了。

GIF如下:

c0a4f0c4a3d9462c8ad5dfc1155ff8ef.gif

用PQ来解决的最大好处在于,如果数据发生变化,那么只需要刷新一下就可以。

GIF如下:

5ce178d4a65565501fcf80acf610edc9.gif

练手文件,百度网盘地址如下:

链接:https://pan.baidu.com/s/1GA8LhSRfr482PCVKWShvbA

提取码:92nz

你学会了吗?赶紧练习一下吧。光看不练假把式。

f5389b6ec3ab8b15468c46afa1658662.png 推荐阅读:

368ac2835ce204444e07bb798e7060c3.png

新课程报名

739b6a191e712e7ecdd7234dc5a31657.png 118c2e16abc1f7d9a5b3c67764db7093.gif 为了帮助表亲们提升工作效率,Excel三十六计在网易云推出课程——Excel入门与提高。

课程目录

739b6a191e712e7ecdd7234dc5a31657.png 118c2e16abc1f7d9a5b3c67764db7093.gif fe5b0aa11c181c2bfd4a2b1d5a6c8dfb.png 24e8bf4f9a220b67b35add34d665dbb6.png 87f2abf2ab0d41d01073779f1aa60dc6.png 14909d25dec4def110d7fbedb7e8c03b.png ▲四图上下滑动,查看更多

————— 常见问题 —————

739b6a191e712e7ecdd7234dc5a31657.png 118c2e16abc1f7d9a5b3c67764db7093.gif Q: 课程有时间、次数限制吗? A:  课程不限时间和次数,随时可学,长期有效。 Q: 手机上可以学习吗? A:  可以,手机上安装网易云课堂 APP,登录账号即可学习。电脑学习效果更佳。 Q: 如何领取购课福利? A: 只要你在活动期间购课,添加小助手微信:landisidan,小助手将在24小时内通过,将支付订单截图发送给小助手,即可 领取课程资料及福利赠礼; 现在购买, 点击 「阅读原文」 Get 数据思维? 掌握??的图表技能 ???
Delphi中使用TListView来显示Access数据库的数据,并将数据显示在指定上,您可以按照以下步骤进行操作: 1. 添加TListView控件到您的窗体上。 2. 设置TListView的ViewStyle属性为vsReport,这将使其以报表视图显示。 3. 在设计时添加所需的。您可以在Object Inspector中添加,也可以在运行时使用以下代码添加: ``` ListView1.Columns.Add.Caption := '标题1'; ListView1.Columns.Add.Caption := '标题2'; ``` 4. 连接到Access数据库。您可以使用ADOConnection组件连接到Access数据库。设置ADOConnection的ConnectionString属性来指定数据库的连接字符串,例如: ``` ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\your_database.mdb'; ``` 5. 使用ADOQuery组件执行SQL查询并获取结果集。设置ADOQuery的SQL属性为查询语句,例如: ``` ADOQuery1.SQL.Text := 'SELECT 1, 2 FROM 表名'; ADOQuery1.Open; ``` 6. 遍历结果集并将数据添加到TListView中的每一行。例如: ``` while not ADOQuery1.Eof do begin ListItem := ListView1.Items.Add; ListItem.Caption := ADOQuery1.FieldByName('1').AsString; ListItem.SubItems.Add(ADOQuery1.FieldByName('2').AsString); ADOQuery1.Next; end; ``` 以上是一个简单的示例,您可以根据您的具体情况进行修改和扩展。请注意,您需要使用合适的ADO组件(例如ADOConnection、ADOQuery)和连接字符串来连接到Access数据库。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值