- 博客(2)
- 资源 (2)
- 收藏
- 关注
RSS订阅原创 VBA 筛选结果存入数组
:自动筛选--获取可见行（数据）数据自动筛选，按第3列的缺勤进行筛选后，将筛选结果复制到F：H.Sub 获取可见数据() Dim LastRow As Long Dim Rng As Range, Rng1 As Range With ActiveSheet .UsedRange LastRow = .Cells.SpecialCells(xlCellTypeLastCell).Row '返回最后一行行号 Set Rng ...
2020-11-20 20:15:25
8863
3
原创 VBA 字典+计次统计一个区域连续负数的最大个数
解决思路：遍历数组，出现负值，Key就递增，出现连续负值，相关key对应的item就递增。然后取item最大值具体代码：Function负数(rn)SetD=CreateObject("Scripting.Dictionary")n=1ForEachrInrnIfr<0ThenD(n)=D(n)+1Elsen=n+1...
2020-11-09 18:14:03
577
PictureToPdf.zip
网友问题:
在excel中如何能够将jpg图片批量转成pdf文件,并将pdf子文件合并成一个文件.?
为此给出解题思路如下：
将jpg图片批量插入到word文档中,然后使用word的导出功能将文档转为pdf文件。
2020-03-13
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人