Copying rows and objects

[Zahhhaaaa]

Hello again, I'm a rookie programming excel so I need some help to get start.

I gotta question;

In worksheet, i have four columns, A6, B6, C6, D6

A6 contains ComboBox4, named Groups
B6 contains ComboBox3, Work
C6 contains ComboBox7, Area
D6 contains two textboxes 7 and 8. named Working time

What I need to, is to add a commandbutton to copy this row, range A6:D6 and place it in range A7:D7.

I know that I can do this by recording, but when I do this, it records macro normally but ignores comboboxes etc. What I got is an empty row.

And also, I need to have many many rows. So is it possible to have Commandbutton "New row", and everytime I click this, it gives me a new row WITH combobox3 4 and 7, and textboxes7 and 8, over and over again, under previous row

 

[Zahhhaaaa]

They are ActiveX-objects, they're able to be copied when design mode is selected, but when I unselect it, objects CAN be copied. But for now, I haven't find a code to copy range A6:D6 and insert it below, as many times as I want it to appear.

It goes like this, I do my things on row a6:d6, then I press "new row", it gives me a new row on a7:d7, i do my things, then press "new row" again, it gives me a row in a8:d8, etc etc etc, as many times as I want

 

[Sektor]

You want to generate hundreds of ActiveX buttons? What for?
Instead of ActiveX controls, you better use Forms button. It can be created on the fly (for instance, by double-clicking a cell) and there's no need to write procedures after creating it - procedure can be created beforehand.
See example.

 

[Zahhhaaaa]

Yeah, 'cuz these objects are drop down menus, and i need to copy them. I can use forms too, but then, what is the code to copy them and insert them below the copied row?

And there's not gonna be hundreds of comboboxes, maybe ten, twenty.. just said

 

[RoryA]

You did say "many many" rows...

Can you not use Data Validation dropdowns instead?

 

[Zahhhaaaa]

well, maybe I can use that.. It just would've been much better looking worksheet with activex objects or forms

 

[RoryA]

That's a matter of opinion.

 

[Zahhhaaaa]

Nah, it doesn't even look that bad =) But now, can you help me with the code how to copy that row, and insert it below? Many many times =)

 

[RoryA]

Range("A6:D6").Copy Destination:=Range("A7")

 

[Zahhhaaaa]

Sorry for stupid questions, but I'm a rookie. Can you write it little more detailed?