Macro or code to copy a "command button"

[johannordgren]

As the title says, my need is to copy a made command button to another 500 rows.

The code I'm using is this;

Private Sub CommandButton1_Click()
Dim x As Integer
x = Range("A1").Value
Range("A1").Value = x + 1
End Sub

Which makes a count of how many times the button is clicked.

What i would like is to copy this button, pretty much like you would copa down a normal excel cell. I'm talking about the "draging down".

Essentialy i would like the cells in the formula above (A1) to automaticly change, or if you are smarter than me, which you probably are, make a completely different code.

I dont even know if this is possible, but if it is, please help!

 

[johannordgren]

Do you mean there is another way for me to sort the articles by name, or "Highest number of clicks" top down?

 

[My Aswer Is This]

You earlier said "Filter"
Are you now saying you want to "Sort" not "Filter"

Sort and filter are not the same.

 

[johannordgren]

I never use filtering that way.

Not sure how my double click script could be causing a filter problem.

I got it to work! It was appearantly some other problem with the file, since I had used a template when I made the document.
Problem resolved anyway!

Thanks again!

 

[My Aswer Is This]

Glad I was able to help you.
Come back here to Mr. Excel next time you need additional assistance.

I got it to work! It was appearantly some other problem with the file, since I had used a template when I made the document.
Problem resolved anyway!

Thanks again!