Difficult to test with no sample workbook, but perhaps the below (or something like it) would do the trick:

Const strFldrPath As String = "C:\Documents and Settings\carl.walker\My Documents\Reports\" & TextBox1 & "\" & TextBox2 'Depending on the content of TextBox2 you may need to account for the file extension here.
BSB