1. vba与vbs
修改如下:
Sub exceldata2fmldata()
'将EXCEL工作表数据写入FMLDATA文件
Dim sht, fmldataPath, fileName
Dim i, FileNumber
Dim dzhrq, value 'DZH时间,指标值(VBA的Long,Single为32位)
Dim dt,fso
Dim xlApp
Dim xlBook
Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = true '不显示对话框False
Set xlBook = xlApp.Workbooks.Open("E:\CPX-ST\fmldata\电子调试.xls")
Set sht = xlBook.Worksheets("Sheet1") '假设要写入的数据在sheet1
fmldataPath = "E:\CPX-ST\fmldata\" 'FMLDATA所在路径
fileName = "581.12345.day" '文件名
set fso=wscript.createobject("Scripting.FileSystemObject")
if fso.fileexists(filename) then kill filename
Set fso = fso.CreateTextFile(fileName, True)
i = 2 '设数据从第二行开始;第1列为日期,第2列为指标值
dt = sht.Cells(i, 1) '取出日期
Do While IsDate(dt) And dt <> TimeSerial(0, 0, 0)
dzhrq = DateDiff("s", DateSerial(1970, 1, 1), dt) '转为DZH日期:与1970.1.1间隔秒数
fso.write dzhrq '写入数据'
value = sht.Cells(i, 2) '取出指标值
fso.write value
i = i + 1
dt = sht.Cells(i, 1) '取出日期
Loop
fso.close '关闭文件
xlBook.Close (True) '关闭工作簿 这里的True表示退出时保存修改
xlApp.quit '结束EXCEL对象
Set xlApp = Nothing '释放xlApp对象
End Sub
2. vba与vbs
Sub exceldata2fmldata()
'将EXCEL工作表数据写入FMLDATA文件
Dim sht, fmldataPath, fileName
Dim i, FileNumber
Dim dzhrq, value 'DZH时间,指标值(VBA的Long,Single为32位)
Dim dt,fso
Dim xlApp
Dim xlBook
Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = False '不显示对话框
Set xlBook = xlApp.Workbooks.Open("c:\1.xls")
Set sht = xlBook.Worksheets("Sheet1") '假设要写入的数据在sheet1
fmldataPath = "d:\dzh2\fmldata\" 'FMLDATA所在路径
fileName = "000001.12345.day" '文件名
set fso=wscript.createobject("Scripting.FileSystemObject")
if fso.fileexists(filename) then kill filaname
fso.CreateTextFile fileName
fso.type=1 '数据流类型设为字节'
fso.open
fso.loadfromfile filename '打开文件'
fso.position=0 '设置文件指针初始位置'
i = 2 '设数据从第二行开始;第1列为日期,第2列为指标值
dt = sht.Cells(i, 1) '取出日期
Do While IsDate(dt) And dt <> TimeSerial(0, 0, 0)
dzhrq = DateDiff("s", DateSerial(1970, 1, 1), dt) '转为DZH日期:与1970.1.1间隔秒数
fso.write dzhrq '写入数据'
value = sht.Cells(i, 2) '取出指标值
fso.write value
i = i + 1
dt = sht.Cells(i, 1) '取出日期
Loop
fso.savetofile filename,2 '覆盖保存'
fso.close '关闭文件
xlBook.Close (True) '关闭工作簿 这里的True表示退出时保存修改
xlApp.quit '结束EXCEL对象
Set xlApp = Nothing '释放xlApp对象
End Sub
3. 请帮我将这段VBA代码改为VBS代码
VBA和VBS两个概念,不能完全转化,VBS有些功能是实现不了的。毕竟只是个脚本语言
4. VBS和VBA区别
vba相当是要挂在某一软件里的vb,依存于某软件,比如excel autocad等,不需编译,不能独立运行。主要是解决excel autocad自己的事情用的。
vbs语法基于vb,宿主(host)解释,不需编译。可以在微软的桌子上就可以运行(桌面就是宿主,可以用记事本写几行代码,存成.vbs就可以运行)比如你要搞一个安装文件,自动设置一下电脑等,当然嵌在网页里面就使网页一下高大上。
其实用好了都比较强大,虽然比不上高大上的其他语言。语法上两者也比较接近。
可以找个教程粗略看一下,再搜点例子看。
5. Excel VB,VBA,VBS的区别你搞清楚了吗
Excel :是微软开发的表格处理文件,功能强大。
VB:Visual Basic 是一种由 Microsoft 公司开发的结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。从任何标准来说,VB都是世界上使用人数最多的语言——不仅是盛赞VB的开发者还是抱怨VB的开发者的数量。它源自于BASIC编程语言。VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建ActiveX控件。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。
VBA: Visual Basic for Applications(VBA)是Visual Basic的一种宏语言,是微软开发出来在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。主要能用来扩展Windows的应用程式功能,特别是Microsoft Office软件。也可说是一种应用程式视觉化的Basic 脚本。该语言于1993年由微软公司发行。微软在1994年发行的Excel5.0版本中,即具备了VBA的宏功能。
VBS:VBScript(Microsoft Visual Basic Script Editon).,微软公司可视化BASIC脚本版). 正如其字面所透露的信息, VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言。 我进一步解释一下, Microsoft Visual Basic是微软公司出品的一套可视化编程工具, 语法基于Basic. 脚本语言, 就是不编译成二进制文件, 直接由宿主(host)解释源代码并执行, 简单点说就是你写的程序不需要编译成·exe, 而是直接给用户发送·vbs的源程序, 用户就能执行了。
6. VB VBA VBS有什么区别
Excel
:是微软开发的表格处理文件,功能强大。
VB:Visual
Basic
是一种由
Microsoft
公司开发的结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。从任何标准来说,VB都是世界上使用人数最多的语言——不仅是盛赞VB的开发者还是抱怨VB的开发者的数量。它源自于BASIC编程语言。VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建ActiveX控件。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。
VBA:
Visual
Basic
for
Applications(VBA)是Visual
Basic的一种宏语言,是微软开发出来在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。主要能用来扩展Windows的应用程式功能,特别是Microsoft
Office软件。也可说是一种应用程式视觉化的Basic
脚本。该语言于1993年由微软公司发行。微软在1994年发行的Excel5.0版本中,即具备了VBA的宏功能。
VBS:VBScript(Microsoft
Visual
Basic
Script
Editon).,微软公司可视化BASIC脚本版).
正如其字面所透露的信息,
VBS(VBScript的进一步简写)是基于Visual
Basic的脚本语言。
我进一步解释一下,
Microsoft
Visual
Basic是微软公司出品的一套可视化编程工具,
语法基于Basic.
脚本语言,
就是不编译成二进制文件,
直接由宿主(host)解释源代码并执行,
简单点说就是你写的程序不需要编译成·exe,
而是直接给用户发送·vbs的源程序,
用户就能执行了。
7. vbs edit如何进行vba编程
利用宏进行。
通过自定义按钮、菜单,并指定一个宏,VBA过程,自定义界面也可以通过编程手段完成此类工作,通过单击此按钮即可调用相应的VBA代码。
vbsedit用起来比较爽,它是一个非常好用的VBS编辑器,支持语法高亮与自动修正,支持把VBS编译成EXE等。
8. vbs里面可以嵌套vba吗
不可以。
所谓vba,指的是Office应用软件里的VB编程,这个a指的就是application(应用)。vba跟应用软件绑定,只能在应用软件中运行,可以通过应用软件提供的VBE(VB编辑器)来编程。
而VBS,只要在windows上都能直接双击运行,不依赖应用软件,只依赖Windows上的VBS脚本宿主。
虽然非常相似,但他们在某些方面有着不同的语法。
9. VBA 如何调用VBS
wscript.exe
或者 cscript.exe
10. vbs edit如何打开vba编程菜单
用宏。
单击开发工具选项卡中的宏按钮,在弹出的宏对话框中选中需要查看的宏名,并单击编辑按钮,弹出的窗口即为VBA编辑器。
VBA是VisualBasic的一种宏语言,是微软开发出来在其桌面应用程序中执行通用的自动化OLE任务的编程语言。