Hi,
This is where I demonstrate my breathtaking ignorance.....
This is my code;
Code:
--------------------
Sub Letter1Printchoose()
Sheets("Stage 2 Letter").Select
If Range("C23").Value < "" Then Run ([Sub Letter1Printmulti()])
If Range("C23").Value = "" Then Run ([Sub Letter1Printsingle()])
Sheets("Customer List").Select
End Sub
--------------------
Why doesn't it work?
My only excuse is that it is Friday.......
--
Alec H
------------------------------------------------------------------------
Alec H's Profile:
http://www.excelforum.com/member.php...o&userid=31042
View this thread:
http://www.excelforum.com/showthread...hreadid=518720