现在想用办公软件excel的vba编程实现一个功能，要求如下，希望大神出手相助！
现在想用办公软件excel的vba编程实现一个功能，要求如下，希望大神出手相助！
将excel中的两列数据输出并生成txt文档，用逗号分隔。文件命名为“YYYYMMDD+编号”，编号从1到20，如果超过20就会出现警告。
txt输出效果：
a1,b1
a2,b2
a3,b3
...
"编号从1到20，如果超过20就会出现警告。"是什么意思？追问
我不会写啊，我从来没用过这个编程，是否可以帮我写一下？谢谢！关于编号，就是我输出到txt文档的时候需要给文件命名，每次执行的时候生成一个文件，在同一路径下按顺序编号，从1到20，当生成到第21个时，在excel中提示超过20个文件了，不能继续输出了
比如第一个文件名就是 20170118_1.txt，第二个是20170118_2.txt，以此类推，同一路径下，只允许生成20个文件，前面的日期是系统日期
追答前面的好实现，就是你后面的这个要求不好实现。情况太多，懒得费神了。
给你个生成一个文件的吧：默认生成在 F 根目录下
Sub CreateTxtFile()Dim Arr As Variant, i As Integer, FSO As Object
Arr = Sheet1.Range("A1").CurrentRegion
Set FSO = CreateObject("Scripting.FileSystemObject")
With FSO.CreateTextFile("F:\TEST.txt", True)
For i = 1 To UBound(Arr, 1)
.WriteLine Arr(i, 1) & "," & Arr(i, 2)
Next i
.Close
End With
End Sub
你也不理我啊
请求大神帮忙写个excel VBA代码,谢谢!
五、在分类1中输入金，后面数据自动出来
求excel VBA 编程,实现如下功能,从ABC列中筛选出数放在EFG列中。_百 ...
Sub JSabc()'本计算过程由百度知道用户【常山大宝】提供 '把过程复制到工作表对应的VBA代码窗口 '直接在VBA代码窗口中运行本过程即可获得楼主所需的数据 'A列单元格实际区域的首行和尾行的行号分别替换I的循环范围1和13 For I = 1 To 13 'B列单元格实际区域的首行和尾行的行号分别替换J的循环范围...
想用excel中的VBA语句解一个比较简单的二元一次方程组。求大神帮帮忙...
Dim MyA as integer (就是你的Y88,Y99了，如果类型不对，改成Long or Double)Dim MyB as integer With Thisworksheet(你的表Worksheets(1)类似这样也行)MyA = (.cells(93,25).Value + .cells(70,25).Value * 2 - .cells(72,25).Value * 2) \/ 4 MyB = (.cells(93,25).Value + ...
【VBA学习】借助VBA实现办公自动化!!
1、使用宏 在Excel中，可以通过“开发工具”菜单下的“录制宏”功能来创建宏。操作步骤如下：首先点击“开发工具”中的“录制宏”，然后在宏录制过程中定义宏名称、分配快捷键并添加需要执行的命令和操作。录制完毕后，可以通过Alt+F8调用宏，执行预设的操作。2、编写宏 编写VBA宏需要熟悉编程语言的基本...
请教大神,怎么用vb\/vba实现excel的按键宏,只对本excel工作簿操作_百...
在VB中：Set xlExcel = GetObject(, "Excel.Application") '获取EXCEL进程 Set wb = xlExcel.Workbooks.Add '新建一个工作簿 Set xlSheet = wb.Sheets(1) '把新建工作簿的第一个工作表赋给xlSheet
Excel中用VBA写一个判断并弹出对话框
1、首先我们打开一个excel，这里建议使用office excel，因为wps的excel开发工具中的VBA是灰色的，还需要下载相关的插件，如下图所示：2、接着我们在最上边的菜单栏中找到开发工具，然后找到Visual Basic，我们点击一下，就会出现一个新的页面，如下图所示：3、当然出现新页面也有一个快捷键就是alt+f11，...
excel里面我想 用VBA实现调用另一个工作簿中的数据怎么解决
在Excel中，利用VBA可以轻松实现跨工作簿的数据调用。首先，你需要在工作簿的宏录制功能中开始操作。点击左下角的录制宏按钮，为即将执行的操作创建一个宏。在宏名处，输入一个易理解的名称，例如"DataTransfer"，并选择存储在"个人宏工作簿"中，然后点击"确定"。录制完成后，通过点击停止录制宏按钮暂停...
怎么用VBA在excel中添加一个工作表并命名?
用VBA在excel中添加一个工作表并且对其命名的实现方法和操作步骤如下：1、首先，在Excel中按快捷键“Alt + F11”，如下图所示。2、其次，在VBA编辑器中依次单击“插入”-->“模块”，如下图所示。3、然后，在“模块”中输入如下代码：Option Explicit Sub addwork()Sheets.Add after:=Sheets(...
请教一个有关excel vba代码的问题,以下为代码,希望哪位大哥能帮忙详解一...
在vba编辑器中 帮助—ms basic帮助，自己输入关键字解释的很清楚的 Range("H7").Select 当前表的H7单元格被选中 Sheets("基础表").Range("A3:L19").AdvancedFilter 基础表的“A3:L19”单元格区域进行高级筛选，后面有三个参数 Action:=xlFilterCopy,筛选模式参数，具体参数意义查看帮助 CriteriaRange:...
Excel写个VBA谁会?
以下是实现该功能的VBA代码：Sub FindDuplicate()Dim i As Long, j As Long, k As Long Dim rng1 As Range, rng2 As Range Dim ws As Worksheet Set ws = ThisWorkbook.Sheets("Sheet1") '指定操作的工作表 For i = 5 To 20 Step 4 '循环遍历每4行数据 Set rng1 = ws.Range("A"...
