- 博客(3)
- 资源 (3)
- 收藏
- 关注
原创 script中js导入外部js文件
new_element=document.createElement("script"); new_element.setAttribute("type","text/javascript"); new_element.setAttribute("src","js/jquery.md5.js"); document.body.appendChild(new_element);
2016-01-20 09:17:17 1045
原创 VBA 巧用 On Error GoTo,Exit Function/Exit Sub,Resume
Set TextObj = FileObj.OpenTextFile(strPath) Do While Not TextObj.AtEndOfStream Dim Line$, DateStr$, Curentdatestr$, Datecountstr$ Line = TextObj.ReadLine Curentdatestr = Left(Line, 10)
2013-10-14 18:05:27 2555
原创 VBA 新建工作簿,关闭工作簿时不用提示关闭提示框
Sub Test() Dim wb As Workbook Set wb = Workbooks.Add(xlWBATWorksheet) Set sht = wb.Worksheets("Sheet1") wb.Close SaveChanges:=FalseSub
2013-10-14 17:57:19 1852
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人