Office
①个程序员
这个作者很懒,什么都没留下…
展开
-
vb遍历EXCEL行,并输出到text文件
Sub filter1()Rem MsgBox ("我是提示框")Dim Rows, totalRem 获取行数total = Sheet1.UsedRange.Rows.Count Rem 开始循环,从第一行到最后一行For Rows = 1 To Sheet1.UsedRange.Rows.CountDim tmpStrRem B列示第二列一列二列三列Cells(Rows, 3) = Cells(Rows, 1) + Cells(Rows, 2) MsgBox (t.原创 2021-07-27 22:47:33 · 1373 阅读 · 0 评论 -
将自定义操作制作成Excel菜单
Excel是我们日常工作和学习必不缺少的软件之一,由于每天跟它打交道,很多朋友就想自己写一些VBA程序来简单开发excel,如何将自己写的VBA发给别人用,或者将程序嵌入excel的菜单中,无论打开哪个excel都可以用呢?一、将Excel所有列转存到txt文件Sub test() Dim p$, f$, A, i, j, s$ p = ThisWorkbook.Path & "\" f = Format(Now, "yyyymmdd-hhmmss") &am.原创 2021-01-09 13:52:56 · 229 阅读 · 0 评论