我需要在Excel中处理一些Unix或Windows格式的文件。我已经有正确的代码来读取每个文件,但在调用正确的过程之前,我需要提前知道文件类型。是否有一种使用VBA识别文件类型(Unix / Windows)的简单方法?谢谢
bxjv4tth1#
你可以用这样的方式来计算:
Private Sub CountCRLF() Dim TmpStr$() TmpStr = Split(Text1.Text, Chr(13) & Chr(10)) MsgBox "There are " & UBound(TmpStr()) & " CRLF's in string", vbInformation, "Count" End Sub
如果多于几个,它应该是一个Windows文件。如果一个文件混合了两种类型的换行符,则需要更复杂的方法。但这让我担心性能问题,除非你确定文件真的很小。你的问题让我觉得你已经有了一个函数来处理一行一行的,你应该试着只处理这些文件一次,一边检测一边处理......
1条答案
按热度按时间bxjv4tth1#
你可以用这样的方式来计算:
如果多于几个,它应该是一个Windows文件。如果一个文件混合了两种类型的换行符,则需要更复杂的方法。
但这让我担心性能问题,除非你确定文件真的很小。你的问题让我觉得你已经有了一个函数来处理一行一行的,你应该试着只处理这些文件一次,一边检测一边处理......