Convert values from one textbox to the next

[tortillachips]

I created a multipage userform in VBA. On one page of the userform I have the user input a range in meters. On a separate page of the same form I want to create a button to bring those same range values in (except this time in feet). When I try this I get a type mismatch error. Can anyone help me do this while still using an array to avoid my code being extremely lengthy. You can find the code below..

Dim x as integer
For x = 1 to 10
Me.Controls("TxtFRange" & x).Value = Me.Controls("TxtRange" & x).Value * 3.2808
Next x

Thank you!

 

[wigi]

Hi

Do you refer to the correct page in your multipage?

I bet you get errors since controls are on a different page.

 

[tortillachips]

The code works if I take out the "* 3.2808". As far as I can tell it has something to do with mixing the control value with a number but I'm not sure how to get around it.

 

[wigi]

Dim x as integer
For x = 1 to 10
Me.Controls("TxtFRange" & x).Text = CDbl(Me.Controls("TxtRange" & x).Text) * 3.2808
Next x

 

[tortillachips]

wigi,

thanks for the quick response. I tried that, got another type mismatch. Appreciate the help though.

-tortilla