- 博客(3)
- 资源 (1)
- 收藏
- 关注
原创 VBA学习练习-遍历工作簿,将数据合并汇总
工作中会遇到数据汇总,尤其是运营工作,一区二区分别填了之后需要手动复制黏贴好了之后上交,所以写了这个代码,但是还是有很多地方需要改进的,毕竟有些需要手动填的地方,如果有大佬可以指点一下,谢谢 Sub 遍历所有sheet,并匹配填到指定sheet里() Application.ScreenUpdating = False Application.DisplayAlerts = False Dim a, b, c, d As Integer, n As Range, n_in, asc As Integer
2021-12-15 18:22:56 1523
原创 VBA学习练习-将多个单元格内容合并
excel有分列功能,能把一个单元格内容拆分开,但是并没有合并操作,有些插件可以做到,既然是学习练习,就自己动手写了一下这个功能 将如下的数据内容合并到一个单元格内,并用逗号隔开(我这里指定的是输出内容填写在第一行右侧第一个空单元格,可以做适当改变) 代码如下: Sub 单元格内容合并() Dim arr(), arr1() As Variant, lc, la As Integer, c, v, s As String Application.DisplayAlerts = False..
2021-12-03 10:54:58 4132
原创 VBA学习练习-拆分成多个工作簿
Sub 拆分成多个工作表() '将报表按指定列分类并保存到各工作表中 Dim i, c As Long, bj As String, rng As Range, arr(), myrows, lc As Integer Application.ScreenUpdating = False Application.DisplayAlerts = False myrows = Application.InputBox("请输入内容从第几行开始") '分类处理的第一条记录在第几行 i = myrows c ..
2021-12-02 13:13:37 2065 1
mechrevo_mrs20102_6-intel(r)_prosetwi-fi_sthwfw6113_21.40.1.4_g_win10-64.exe
2022-04-11
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人