Making userform rows visible with a command button

Hello,

In my userform, I've got 18 rows, each with 5 textboxes and one combobox. The first row has them labeled TextBox3 - TextBox7 and ComboBox1.

The next row has them labeled TextBox8 - TextBox12 and ComboBox2 and it goes on in the same sequence.

I need to make a command button so that, when pressed, it makes an entire row visible. Another press of the button should make another row visible and so on. I've got my pseudo-code idea below:


i = 3
k = 1
for every press of commandbutton3,
TextBox(i).Visible To textbox(i + 4).Visible = True
ComboBox(k).Visible = True
i = i + 5
k = k + 1

why not to increase the form's height when that button is clicked?
upload the file and i will do it for you

Thank you, but I have to keep the form height the same because of the other boxes and controls inside. Something like this (although I'm sure that the dim as Range is wrong):

Please Login or Register  to view this content.

you can move them with every click.
See the attached file. Go to the extra tab Named "Khaled Elshaer" and click the "Enter Hours" button.
Select a code from the "Activity ID 1" combobox and press tab then you will see the form expanding and the controls moved.
Sorry I have the code password protected as it's a program that I have made for one of my clients.
Please upload your file so I can help

Perhaps:

Please Login or Register  to view this content.

Here you go

Thanks Kelshaer and romperstomper! Both of your codes worked perfectly!

All I needed was the static variable property and the Control property. Now, does declaring something as "Static" retain the variable value indefinitely? Or does it only work for that one button you appended it inside of?

I'd like to use the final value of "counter" so that I can remove rows using another button as well, from the last row to the top row. I used your code and put "False" in place of each "True", but of course, as I expected, the rows are removed from top to bottom.

the counter curRow is available anywhere in the form

A variable declared static in a routine only has scope within that routine. If you want to use it from multiple places, just Dim it above all routines.

u r welcome, Please mark this thread as SOLVED