I am trying to automate a process that gets an unknown number of files ready to send to another company. It needs to be done once a month. What I would like to do is get the user to supply a name in a UserForm (UserForm3) TextBox (TextBox1) for the name of the directory where it would be stored. For example: 15Feb2006Ver1, where it would go out to the network under K:\History\15Feb2006Ver1. I would also like to create two subdirectories under this new directory. I have everything down except how to code the textbox and then use it to name the directory.
Dim HistoryDir as String
UserForm3.Show
Set HistoryDir = Textbox1.Value
MkDir ("K:\History\&HistoryDir")
Obviously, it's not working. Any help would be appreciated.
Thanks!