Rememberign which command button was pressed in a userform

I have a userform that has around 100 command buttons on them.

Two are associated with each label on the useform.

The labels are populated with the names of work positions (dynamic).

My vision on this is to have the supervisor be able to pull up this userform, which shows all the employment positions. they can then hit one of two buttons (color coded command buttons) next to a label to have it either move up the list or down the list until they are happy with the results.

I was wondering if there was a way to recall what button was pressed in that specific button's code, have it retain that number, and then run a macro that would adjust the labels accordingly.

Example:

Please Login or Register  to view this content.

I have name associations with each label to command button (i.e.. label 2 is associated with commandbutton2 for move up the list and commandbutton 52 to move down the list).

I know this could be done by going through each individual command button and just having a variable assigned a number and have it carry over, but was wondering if there was a way to do this for learning sake.

I'll try to illustrate it. CB = Command Button

[CB1] [CB51] [Label 1]
[CB2] [CB52] [Label 2]
[CB3] [CB53] [Label 3]


I press CB2 to move the data from Label 2 to Label 1
A small macro in that button pulls the number 2 from the name
it runs another macro that uses the 2 to swap the data from Label 2 to Label 1.

Bump, still looking for some assistance.

I would investige a list box and just use two up and down buttons.

That would definitely limit the amount of command buttons I would need to use so thank you on that. I would still like to know if it is possible to pull the number from an object such as a command button, combobox, listbox, etc... using something like the function below or some other small routine that would do the task.

Right(PostForm.ListBox.Name, Len(PostForm.ListBox.Name) - Len("ListBox"))

I'm not exactly sure what you're trying to do.

Please Login or Register  to view this content.

Would return 12.

I have a multitude of these buttons.. I want one macro that I can copy and paste into each of these buttons that will return the number of the button that was pressed. I am not sure how much more clear I can make this.

This way all I have to do is copy/paste the code into each button without having to go through and say what number buttons was pressed. I know I could just put in the macro B = 1 for commandbutton one, but I wanted something that will pull the number of the button for me instead of having to go through all of them and say B = 1 for button 1, B = 2 for button 2, B = 3 for button 3, B = 4 for button 4, etc.................

Something like what I put in the original code..

CB = Right(PostForm.CommandButton.Name, Len(PostForm.CommandButton1.Name) - Len("CommandButton"))

So if I pressed button number 45, CB = 45. if I pressed button number 89, CB = 89 without having to go into each button and just stating that CB = (Whatever button number)

Originally Posted by Solus Rankin

I'm not exactly sure what you're trying to do.

Please Login or Register  to view this content.

Would return 12.

Ok.

Lets try this.

I have created a userform with 120 command buttons.

I have created a macro to display the userform.

In the Worksheet I have created sample VB code to drive a command box

I have created another macro to create the code that I want to use to control all the command buttons.

So open the workbook. and press create code to create the code to drive the 120 command buttons.

copy this code and paste it into visual basic, under the Userform Activation code.

close visual basic.

click on show userform.

click on any command button.

mehmetcik, never really thought of creating a macro to create my macros. This is ingenious and works beautifully. Thank you.

From the lack of the main question being answered, I guess there is not a way to pull the actual name of the button being pressed from a generic macro that would cover multiple buttons.


Thanks for your solution to this, it'll save me a ton of time.