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任務的編程語言。