What do the hash signs in #if, #else, #end if mean?

user_746131 0
Viewed 27942

I'm writing code to check if a file is available to be checked out of SharePoint and, if it isn't, alert the user and tell them that the file is in use by someone else and who has it in use.

I came across a piece of code at http://www.xcelfiles.com/IsFileOpen.html#anchor_37

The code seems to work in test scenarios so I am planning to adapt it for my purposes. I'm having trouble understanding some of the syntax.

#If Not VBA6 Then

'// Xl97

For i = j - 1 To 1 Step -1

    If Mid(strXl, i, 1) = Chr(0) Then Exit For

Next

i = i + 1

#Else

'// Xl2000+

i = InStrRev(strXl, strFlag1, j) + Len(strFlag1)

#End If

I understand what the code does but I don't get the significance of the '#' symbol.

Another example:

hdlFile = FreeFile

Open strPath For Binary As #hdlFile

strXl = Space(LOF(hdlFile))

Get 1, , strXl

Close #hdlFile

It is a pain to google because it is so vague.

conditional-statements vba excel
3 Answers

The accepted answer is correct that your first code example are compile directives.

It's worth pointing out in case someone else comes across this question that your second code example is a different thing. In this case these are file numbers used to identify text streams. You will see them used in the context of the commands below. They are completely unrelated to compiler directives.

Open "c:\test.txt" For Input As #hdlFile Input #hdlfile Print #hdlfile Write #hdlfile Close #hdlfile

user_88873830
Related