1. vba生成excel文件
vba能解决Excel使用者90%以上的需求。其他语言能处理的Excel工作，vba100%能处理，其他语言不能处理的，vba多数能处理。其他语言处理Excel，其实是使用Excel的COM接口开发或者是第三方的Excel库开发。前者的本质就是vba，只不过换种语言，而后者则有不同的选择，但这些库也会有各种的问题存在，兼容问题、bug、功能不全、使用不方便等。
vba的优势：
1.不需要额外配置编程环境，正常情况下装了Excel都会有。
2.有宏录制功能。宏录制的功能对于初学者来说是一个非常有用的，能了解到陌生API的使用方式。
3.能够调用Windows的API、其他语言编译的dll。除了不能编译成独立的EXE，vb6能做的，vba基本都能做。
4.网上有大量充足的例子，学习起来相对容易。
5.调试相对简单。
vba的劣势:
1.版本老旧、操作反人类的IDE。vba的编辑器真的非常难受。
2.宽松的语法。我刚接触vba的时候，我是认为宽松的语法是非常舒服的。但其实对于编程的学习是不利的，特别在适应vb6语法以后再去学习c系列语言时，过渡时会有点难受。
3.性能问题。vba的处理效率是很低的，进行大量数据处理时间会非常非常长。
4.维护问题。代码是保存在Excel文件中，当这个Excel有一个副本时，相当于代码衍生了一个分支，所以代码维护是非常累的。如果需求比较复杂、代码量较大时，别犹豫，果断拒绝vba。
vba的推荐使用人群及适用需求
1.vba非常适合非专业的工具开发者使用。假如你是审计、会计、运营、策划等经常需要使用Excel来处理数据，希望能通过开发简单的程序来减轻日常工作，推荐你学习vba。
2.工具是一次性或者不需要经常增减需求，推荐使用vba快速开发。
其实我不推荐大家去学习Python，因为如果只是为了日常处理Excel，vba足矣。学习难度真的不大，遇到问题百度一下就能解决。但学习vba我认为必须要以需求推动学习。也就是你要带着目的来学习，跟着所谓的教程盲目地从第一章学到最后一章，到最后也许你都不知道自己学了什么。
最好的方法是：
1.先搞清要实现什么需求。
2.分析这些需求要使用什么知识（例如：单元格格式修改/边框修改/数据计算...）
3.搜寻相应的内容，并学习。
最后补充一句：vba也是编程，编程这东西跟以前学习数学一样，有的同学会容易理解一学就会，有的同学可能刚开始的时候懵逼但听老师讲还有自己做题慢慢就学会了，但有的同学也许无论怎么学都是一脸懵逼。无论你学的是vb、c、c#、c++、java还是python，学习的时候都一样要学编程的基础知识，假如对编程一脸懵逼，无论是vba还是python你都一样是一脸懵逼。
2. vba打开excel文件代码
可以用按钮加载，也可以放到workbook的open事件中，用下面的代码userform1.show
3. excel vba生成文件夹
可以的，vba可以封装成exe文件
把工程属性设置成标准exe文件，设置好启动对象
用shell调用
4. vba 生成文本文件
你把输入法跳到英文状态下。
。不要在中文模式下输入，应该是可以的
5. vba 生成文件
1.在excel中编写vba代码，创建word应用程序对象
2.打开word文档（此步骤可以设置固定的文件路径，也可以设置自定义选择文件路径）
3.读取word文档中的内容到变量
4.如果还涉及到word文档内容的改写，还需要把变量的值回写到word文档中
5.将变量的值写入到excel中
6.保存word文档
7.关闭word文档
8.如果不止一个word文档，则循环步骤2到步骤7
9.释放步骤1中创建的word应用程序对象
10.在excel中处理提取的内容
11.处理完毕
6. vba生成exe程序
wps开启宏的步骤如下：
1、这里以WPS2019为例，首先打开浏览器，在搜索引擎中搜索“VBAforwps”，选择任意一个网站下载vba安装程序回来备用：
2、下载后VBAFORWPS.exe开始安装点击下一步:
3、稍等一会安装完毕，点击完成就装好了：
4、最后打开wps2019，点击上面的选项开发根据，就看到有关宏的功能都可以用了：
7. vba创建excel文件
在有word文件的文件夹中新建一个excel工作簿，打开工作簿，按Alt+F11，把下面的代码复制进去，按F5执行。代码会复制work文件的前300个字符到excel中。
Sub test() Dim i%, myName$, myPath$, AppWord As Object Set AppWord = CreateObject("Word.Application"
) myPath = ThisWorkbook.Path & "\" myName = Dir(myPath & "*.doc*") With ActiveSheet .Columns("A:B").ClearContents Do While myName <> "" AppWord.Documents.Open Filename:=myPath & myName i = i + 1 .Cells(i, 1) = myName .Cells(i, 2) = AppWord.ActiveDocument.Range(Start:=0, End:=300).Text AppWord.ActiveDocument.Close False myName = Dir Loop End With AppWord.Quit Set AppWord = Nothing MsgBox "已完成。"End Sub
8. vba生成新excel文件
1、打开Excel表格
2、点击开发工具
3、点击Vusual Basic
4、最后即可成功启用
9. excel vba帮助文件
在Excel中用VBA创建文件夹：
1、在excel中创建点击按钮
2、在按钮上写入如下代码：
Sub createDir()
If Dir("F:\" & Format(Date, "YYYY-M-D"), vbDirectory) "" Then
MsgBox "文件夹存在"
Else
MsgBox "文件夹不存在!,系统将创建一个名为" & Format(Date, "YYYY-M-D") & "的文件夹"
MkDir "F:\" & Format(Date, "YYYY-M-D")
End If
End Sub
3、点击按钮后就会在f盘下创建目录：
10. vba生成可执行文件
VB可以经过编译成EXE文件可以在系统下运行。VBA没有编译成EXE文件的功能，只能在offce下运行。
11. vba exe文件生成
操作步骤：
一、创建一个ACTIVEX DLL cadPro工程二、添加一个模块命名为ModCad.代码如下Public acadApp As ObjectPublic acadDoc As Object(这里建立一个新块主要是为了以后在多个窗体、类或者多个工程中可以调用)二、添加一个类ClsTest代码如下：
Public Function MenuMain(MenuIndex As Integer) '下面的判断在VB中测试的时候可以用到，在生成DLL后VBA调用时可注释 If ModCad.acadApp Is Nothing Or ModCad.acadDoc Is Nothing Then ConnectToAcad setApp ModCad.acadApp setDoc ModCad.acadDoc End If Select Case MenuIndex Case 1 AutoCADTest Case 2 End SelectEnd FunctionPublic Function ConnectToAcad() On Error Resume Next Set ModCad.acadApp = GetObject(, "AutoCAD.Application.16.2") '16.2是CAD的版本 If Err Then Err.Clear Set ModCad.acadApp = CreateObject("AutoCAD.Application.16.2"
) End If If Err Then Err.Clear Set ModCad.acadApp = GetObject(, "AutoCAD.Application"
) If Err Then Err.Clear Set ModCad.acadApp = CreateObject("AutoCAD.Application"
) End If If Err Then Unload Me End If End If ModCad.acadApp.Visible = True Set ModCad.acadDoc = ModCad.acadApp.ActiveDocumentEnd FunctionPublic Function setApps(acadObj As AcadApplication) Set ModCad.acadApp = acadObj Set ModCad.acadDoc = acadApp.ActiveDocumentEnd Function'VB中要在CAD中实现的功能Private Function AutoCADTest() Dim cadLine As AcadLine Dim cadPoint As Variant cadPoint = ModCad.acadDoc.Utility.GetPoint(, "请选取一个插入点：") ModCad.acadDoc.ModelSpace.AddCircle cadPoint, 5End Function三、如果要在VB中调试，在添加一个EXE工程，引用ACTIVEX工程，添加一个窗体，在窗体上添加一个按钮，Private Sub Command1_Click() Dim Rec As New cadPro.MenuMain Rec.MenuMain 1 End Sub四、生成DLL文件在VBA中调用。在工具----设定引用项目中加入生成的DLL。代码如下：
Option ExplicitPrivate clsGre As New cadPro.ClsTestPublic Sub cadtest() On Error Resume Next clsGre.setApp ThisDrawing.Application clsGre.MenuMain 1 End Sub按照以上四个步骤就可实现VB与AutoCAD的连接。以上程序在本机测试通过。OS:winxp sp2 chtAuotCAD Version:AutoCAD 2006
- 相关评论
- 我要评论
-
