Tag: is empty

用vbscript从xlsx中删除蓝色和空的单元格

我有一个VBScript将特定范围的行转换为CSV文件。 我的问题是它也复制空行,不需要蓝色的行。 如何在复制之前删除这些完整的空行或将它们从复制中排除? 我的代码: Public Sub xlsToCsv() Const WorkingDir = "C:\Test\" Const xlCSV = 24 Const xlUp = -4162 Dim fso, SaveName, myFile Dim objExcel, objWorkbook, wsSource, wsTarget myFile = "source_file.xlsx" SaveName = "test.csv" With CreateObject("Scripting.FilesystemObject") If Not .FileExists(WorkingDir & myFile) Then MsgBox "File not found:" & vbCrLf & WorkingDir & myFile, vbInformation, "Script Cancelled" […]