这段代码将会把日志写入到LogFilePath,并生成如下输出。StarRange和EndRange是一个变量,它的值将从其他函数中获取。
"Start postion",A1
"End position",B100
---Code-----------------
Sub WriteLogFile()
Dim FilePath As String
LogFilePath = WriteTextBox.Text
LogFilePath = LogFilePath & ".log"
Open LogFilePath For Output As #2
Write #2, "Start postion"; StarRange
Write #2, "End position"; EndRange
Close #2
MsgBox FinalFileName
End Sub
我的问题是如何从输出中移除双引号,并产生如下输出。 谢谢。
Start position = A1
End position = B100
StaRrange
是什么 - 一个命名范围? - brettdj