VBA script - List box of OFT templates in a file folder

[pwnyo1]

WOW, this is SO great! Thankyou!
I did note, I think you missed an ENTER in your last two lines of code :

Sub CreateMessagefromTemplate()    UserForm1.Show
End Sub

didn't work, so I tried:

Sub CreateMessagefromTemplate()    
UserForm1.Show
End Sub

and that worked great! One last question (I'm being greedy), any chance to add to the code that rather than having to select the template and then clicking the open button, you could also just double click the template for it to open in a new email? Is that very difficult to add that functionality? Either way, thanks again! This is really awesome.