Macro to move a name down in rankings

[leafs4life22]

Hey guys,

I have a simple worksheet with 2 columns: Rank, and Name. I would like the ability to move a name up and down the rankings without having to cut, paste, move the rest of the names up, and paste in the empty slot. Ideally, I would like to run a macro that prompts me to select a new # for the ranking, and moves the name to that ranking.

So the data would look like:

Rank | Name
1 | John
2 | Bob
3 | Fred
etc.

And what I would like to be able to do is select one of the cells (say, B4, "Fred") and call a macro, which then prompts me with a question like "What new ranking would you like to move this cell to?"; I would enter, say, 8, and it would move "Fred" to cell B9 (where Rank=8) and slide the rest, from Rank 4-8, up to Rank 3-7.

A note: in actuality, I have 4 sets of rankings side by side on the sheet (so one is columns A:B, the next columns D:E, G:H, J:K), so I need it to generalize for that, not just work on columns A:B.

I realize this is probably fairly simple, but I have absolutely no VBA experience and am not even really aware of the syntax of it, which is why I am here. Thanks in advance for your help.

[mehmetcik]

Two Macros here

Use one or both,

One runs when you right click the other when you double click.

Right click on the sheet name at the bottom of excel and select view code

Paste the code in the window that opens and then close that window.

Please Login or Register  to view this content.

[daffodil11]

Maybe try this out.