Hi can anybody help me with this problem:

I have a function that expects the following:

Public Sub CheckFrame(ByRef ThisFrame As MSForms.Frame)

I would like to call this Sub in a loop foor frames with names FrameQ1,
FrameQ2 untill 22.

so:

for i = 1 to 22
CheckFrame Cstr("Me.FrameQ" & i)
next i

but this doesn't work because the sub expects a frame object and not a
string. But how can i change string such that the sub will treat it as the
Frame object?

I really hope you can help me out here...

kind regards,

Tamar

Tamar,

Try it this way:

For i = 1 To 22
CheckFrame Me.Controls("FrameQ" & i)
Next i


--
Hope that helps.

Vergel Adriano


"Tamar" wrote:

Hi can anybody help me with this problem:

I have a function that expects the following:

Public Sub CheckFrame(ByRef ThisFrame As MSForms.Frame)

I would like to call this Sub in a loop foor frames with names FrameQ1,
FrameQ2 untill 22.

so:

for i = 1 to 22
CheckFrame Cstr("Me.FrameQ" & i)
next i

but this doesn't work because the sub expects a frame object and not a
string. But how can i change string such that the sub will treat it as the
Frame object?

I really hope you can help me out here...

kind regards,

Tamar

Hi Vergel,

Thanx a lot for your fast response, your solution works!

kind regards

Tamar

"Vergel Adriano" wrote:

Tamar,

Try it this way:

For i = 1 To 22
CheckFrame Me.Controls("FrameQ" & i)
Next i


--
Hope that helps.

Vergel Adriano


"Tamar" wrote:

Hi can anybody help me with this problem:

I have a function that expects the following:

Public Sub CheckFrame(ByRef ThisFrame As MSForms.Frame)

I would like to call this Sub in a loop foor frames with names FrameQ1,
FrameQ2 untill 22.

so:

for i = 1 to 22
CheckFrame Cstr("Me.FrameQ" & i)
next i

but this doesn't work because the sub expects a frame object and not a
string. But how can i change string such that the sub will treat it as the
Frame object?

I really hope you can help me out here...

kind regards,

Tamar