Dec 26 2021 06:59 AM
Hoop dat iemand mij wil helpen
Het is mijn bedoeling om rijen te selecteren op sheet2 en deze rijen op sheet 3 te kopiëren met een button. Rijen niet verwijderen alleen kopiëren
Knop1 UN selectie knop 2 + 3 op blad 2
Knop 1 selecteert bijvoorbeeld rij 1 + 5 + 6 op blad 2
Button2 UN selectie knop 1 + 3 op blad 2
Knop 2 selecteert bijvoorbeeld rij 2 + 4 + 7 op blad 2
Button3 UN selectie knop 1 + 2 op blad 2
Knop 3 selecteert bijvoorbeeld rij 1 + 2 + 8 op blad 2
Button4 UN selectieknop 1 + 2 + 3 op blad 2
Button5 Bewaar de geselecteerde rijen van opdrachtknop 1 of 2 of 3 op blad 2
Button5 UN selectieknop 6 + 7 op blad 2
Knop 5 selecteert bijvoorbeeld rij 9 + 10 + 12 op blad 2
Knop6 Bewaar de riet geselecteerde rijen van opdrachtknop 1 of 2 of 3 op blad 2
Knop6 UN selectie knop 5 + 7 op blad 2
Knop 6 selecteert bijvoorbeeld rij 11 + 13 + 14 op blad 2
Button7 Bewaar de riet geselecteerde rijen van opdrachtknop 1 of 2 of 3 op blad 2
Button7 UN selectieknop 6 + 7 op blad 2
Knop 7 selecteert bijvoorbeeld rij 12 + 16 + 17 op blad 2
Button8 UN selectie rijen knop 5 + 6 + 7 op blad 2, maar bewaar de geselecteerde rijen van opdrachtknop 1 of 2 of 3 op blad 2
Button9 Bewaar de geselecteerde rijen van opdrachtknop 1 van 2 van 3 en 5 van 6 van 7 op blad 2
Button9 UN selectieknop 10+ 11 op blad 2
Button9 selecteert bijvoorbeeld rij 15 + 18 + 19 op blad 2
…….
Knop 12 UN selectie rijen knop 9 + 10 + 11 op blad 2, maar bewaar de geselecteerde rijen van opdrachtknop 1 en 2 en 3 en 5 en 6 en 8 op blad 2
Knop 13 Kopieer alle geselecteerde rijen van blad 2 naar blad 3 zonder lege rijen ertussen
Verwijder geen rijen van blad2 maar laat ze staan voor een ander nieuw blad
Button14 alle geselecteerde rijen op blad 2 UN selecteert
Dec 27 2021 01:29 AM
Here is starting point
Sub commanbutton1_click()
Sheets("Sheet2").Range("A25:C50").Copy Sheets("Sheet1").Range("A25")
End Sub
NikolinoDE
I know I don't know anything (Socrates)
Dec 28 2021 10:50 AM
First of all, the code works, here is an example file with the same code.
From the picture you cannot see whether these are form controls or active X controls.
Knowledge of the Excel version and the operating system would be advantageous for you to get a quick and as far as possible more precise solution proposal.
At the same time, I would like to point out that you can always get help here to get ahead with your project, but you have to manage the project yourself.
I wish you a Happy New Year and have fun with Excel.
Thank you for your understanding and patience
I wish you much success in your project
NikolinoDE
I know I don't know anything (Socrates)