2022 年 11月 17 日随笔档案 - myrj

2022年11月17日

摘要： Sub cha() Dim result As String, str1 As String Dim hang As String Dim hha As Integer hha = 0 Dim c As Range, rng As Range result = "航空" result = Appli 阅读全文

posted @ 2022-11-17 15:22 myrj 阅读(584) 评论(0) 推荐(0) 编辑

VBA分列

摘要： Sub fenlie() Dim dict1 As Object Set dict1 = CreateObject("scripting.dictionary") maxr1 = Range("d65536").End(xlUp).Row arr1 = Range("a1:a" & maxr1) F 阅读全文

posted @ 2022-11-17 13:04 myrj 阅读(283) 评论(0) 推荐(0) 编辑

VBA 确定工作表数据区域

摘要：在使用VBA编写程序时，有几种常用方法可以在工作表中查找包含已有数据的区域，但这些方法都多少存在一些局限。 Activesheet.Cells(1).CurrentRegion 如果已有数据区域中存在空行或空列，将无法获取正确的区域。 Activesheet.Cells(Activesheet.Ro 阅读全文

posted @ 2022-11-17 10:53 myrj 阅读(300) 评论(0) 推荐(0) 编辑

VAB excel FIND使用

摘要：求：多个表格内容相加公式：=PHONETIC(A2:A7) 说明：Phonetic函数只能对字符型内容合并，数字不可以。求：前三位公式：=LEFT(A2,LEN(A2)-8) 说明：LEN计算出总长度,LEFT从左边截总长度-8个操作示例求：-前边的文字公式:=LEFT(A2,FIND 阅读全文

posted @ 2022-11-17 07:02 myrj 阅读(121) 评论(0) 推荐(0) 编辑

myrj

公告