Hi,

I'm looking to call upon the communities expertise, I have a bit of trouble with the following.

In a userform I have 6 textbox's on which contain workbook filepath references that the user has entered. I wish to take those file references and return them in msgbox's (later use them to open workbooks). Does anybody have any idesor sample code, I tried using the for statement but can't get it right.

Thanks for your help in advance.

Stuart McKay

Hi guys,
it appear i've answered my own question:-

Dim IntNo As Integer
Dim StrUname As String


For IntNo = 2 To 7 Step 1
StrUname = "Textbox" + CStr(IntNo)
If Controls(StrUname).Value <> "" Then
MsgBox Controls(StrUname).Value
Else
MsgBox ("Blank")
End If
Next


End Sub

I'd concatenate instead of using + CStr and use it with the if then to minimize the code, myself.

------------------------------------------------------------------------------------
Dim IntNo As Integer, sMsg As String
For IntNo = 2 To 7 Step 1 'Step 1 is actually optional, incrementing by 1 is default
  sMsg = Controls("TextBox" & IntNo).Value
  If sMsg = "" then sMsg = "Blank"
  MsgBox sMsg
Next
------------------------------------------------------------------------------------

Just trying to be helpful.