I have a subroutine that outputs info about pivot tables and I would like the
option to either output the results to a file or to the Immediate window
(Debug.Print). This is the gist of what I'm looking for:

Sub (ToFile as Boolean)
If ToFile Then
Open "C:\PPI.log" For Output As #1
Else
Open Debug.Print for output as #1
End If
Print #1, "...output..."
..
..
..

Yes, the ELSE line does create an error which is why I'm asking. Is there a
form of redirection I can use? I'm looking for something easy, not a whole
gob of IF...THEN...ELSE statements :-o

TIA
--
Toby Erkson
Oregon, USA
Excel 2003 in Windows XP