随笔分类 - 脚本语言
Excel技巧,VBA编程,VBS编程
摘要:脚本Set WshShell = WScript.CreateObject("WScript.Shell")strDesktop = WshShell.SpecialFolders("Desktop")set oShellLink = WshShell.CreateShortcut(strDesktop & "\xxx系统.lnk")Dim fsoSet fso=CreateObject("Scripting.FileSystemObject") If fso.folderExists("C:\\
阅读全文
摘要:首先分享一个“VBS脚本常用经典代码收集”,这里面关于vbs很丰富的内容。所有vbs脚本都需要保存为.vbs形式才可以运行FileSystemObject Object的所有方法参考:http://msdn.microsoft.com/en-us/library/aa262402(v=vs.60).aspxvbs判断文件是否存在参考文献:http://bbs.51js.com/thread-72582-1-1.html这个是我们经常碰到的需求,通过vbs判断一个文件是否存在,这个主要是通过CreateObject("Scripting.FileSystemObject")
阅读全文
摘要:工作以后发现excel很强大,用好excel已经成功工作中很重要的一部分内容,最近写了一些宏, 整理如下:根据excel生成sql脚本的sc_templateSub GenSCTemplateFile() Dim WS As Worksheet Dim WS_Config As Worksheet Set WS_Config = ThisWorkbook.Worksheets("Config") Dim turbineModelSheetName As String turbineModelSheetName = WS_Config.Cells(2, 2)...
阅读全文