Capture array into message box

Hi
for capturing array to a msgbox..

try following code.... after end with

for c=1 to 40
msg=msg & Vbnewline & myvar(c)
next

Msgbox Msg

Don't forget to click *

Vikas,

Thank you for the suggestion.

I tried your slution the message box does show but is completely blank, any thoughts?

Thanks

Andy,

Thank you for the reply.

When i step thru the macro using the debug mode "step into", i can clearly see that the myVar(s) are loading with the correct information, so i'm not sure how it is not storing the infromation. So how do you suggest that i change the macro, any help would be appreciated.

Thanks

Hi jprlimey,

change your code.. as per Andy's Suggestion..

and then try running my code..

hopefully you will get the results...



Don't forget to click *

    Dim myVal
    With frmLoadExistingPlanning.cbxPlanning
        If .ListIndex > -1 Then
            myVal = Application.Index(.List, .ListIndex + 1, 0)
        End If
    End With
    MsgBox Join(myVal, vbLf)

Jindon,

The suggestions worked great, the message box displays everything.

Now i tried to capture what the user may have changed, for this i created another sub routine that is called just before the user form selections are placed onto the worksheet. See below, this is not the entire variables i truncated them for ease of discussion and only show 1 thru 6.

I tried to declare the myVerify as both String and Variant but neither worked. I though that the values that the user slected through the combo and text boxes would be still available to place into an array being that i called this sub routine within the initial sub routine, any thoughts?

Sub Verify()

Dim myVerify(1 To 40) As String


    myVerify1 = txtPlanningNo
    myVerify2 = cboEngineer
    myVerify3 = txtPartNo
    myVerify4 = txtPartDesc
    myVerify5 = txtDrawingNo
    myVerify6 = txtDrawingRev

For c = 1 To 40
Msg = Msg & vbNewLine & myVerify(c)
Next

MsgBox Msg


End Sub

Jindon,

The suggestions worked great, the message box displays everything.

Now i tried to capture what the user may have changed, for this i created another sub routine that is called just before the user form selections are placed onto the worksheet. See below, this is not the entire variables i truncated them for ease of discussion and only show 1 thru 6.

I tried to declare the myVerify as both String and Variant but neither worked. I though that the values that the user slected through the combo and text boxes would be still available to place into an array being that i called this sub routine within the initial sub routine, any thoughts?

Sub Verify()

Dim myVerify(1 To 40) As String


    myVerify1 = txtPlanningNo
    myVerify2 = cboEngineer
    myVerify3 = txtPartNo
    myVerify4 = txtPartDesc
    myVerify5 = txtDrawingNo
    myVerify6 = txtDrawingRev

For c = 1 To 40
Msg = Msg & vbNewLine & myVerify(c)
Next

MsgBox Msg


End Sub

Leith,

That is a good point about the message box maximum size of 1024 characters. In this case if some of the variables are empty and nothing shows does that count towards the 1024 characters?

Thanks

You are not assigning values to the array.

    myVerify(1) = txtPlanningNo
    myVerify(2) = cboEngineer
    myVerify(3) = txtPartNo
    myVerify(4) = txtPartDesc
    myVerify(5) = txtDrawingNo
    myVerify(6)= txtDrawingRev

Jindon,

I see my mistake, thanks for helping me along. I going to close this post as Solved.

Thanks