关注
分享
东华果汁哥
大家好！我叫赖德发，欢迎您来到我的博客。
展开
-
【excel VBA】合并一个文件夹下多张excel表数据，前提字段一样
Sub HuiZong()Dim myfile, mypath, wb '声明变量Application.ScreenUpdating = False '关闭屏幕更新Sheet1.UsedRange.Offset(1, 0).Clear '清除除表头之外的所有内容mypath = ThisWorkbook.Path '找到当前工作簿的路径原创 2017-06-13 09:27:44 · 6165 阅读 · 3 评论 -
【excel VBA】合并当前工作薄下多个sheet表
Sub 合并当前工作簿下的所有工作表()Application.ScreenUpdating = FalseFor j = 1 To Sheets.Count If Sheets(j).Name <> ActiveSheet.Name Then X = Range("A65536").End(xlUp).Row + 1 Sheets(j).UsedRange.C原创 2017-06-13 09:30:04 · 4310 阅读 · 3 评论 -
【excel VBA】excel 计算字符串相似度
Private Function min(one As Integer, two As Integer, three As Integer) min = one If (two < min) Then min = two End If If (three < min) Then min = three End I原创 2017-06-13 09:33:15 · 9305 阅读 · 8 评论 -
【excel VBA】中英文分割
'中文Function SplitStringChs(TheString) Dim n, Chs For n = 1 To Len(TheString) If Asc(Mid(TheString, n, 1)) < 0 Then Chs = Chs & Mid(TheString, n, 1) End If N原创 2017-06-13 09:36:19 · 1961 阅读 · 0 评论 -
【excel 函数】常用的Excel函数
函数可以被我们想象成一个盒子，专门负责将输入转换成输出，不同的函数对应不同的输出。清洗处理类：trim、concatenate、replace、substitute、left/right/mid、len/lenb、find、search、text关联匹配类：lookup、vlookup、index、match、row、column、offset逻辑运算类：if、and、or、is系列计算统计类：su原创 2017-07-19 11:57:10 · 863 阅读 · 0 评论