Case statement to set variable cell range

Hey everyone. What I have is a series of buttons that each do the same thing just with different cells. So I'm trying to come up with a way to do this easily, since I'm a novice. At first I did this with a series of different functions for each button, but I have to think there is an easier way to do it. I did some searching online and figured a case statement would be the easiest way, but I can't seem to get it to work. Here is a a snipet of my code, there are a total of 50 CommandButton's but they all need to copy different cells and then print Sheet 1 and place an "X" in a different cell, that cell depends on which button is pressed. Thanks for the help.

Please Login or Register  to view this content.

PS: Sorry for the horrid coding, I am learning as I go! :D Thanks again.

Thanks for the quick reply! If I remove the Goto statements I get an object variable or with block variable not set error.

I had tried at one point using Application.Caller to use the name, but was having issues, I figured it was due to the buttons being command buttons and not form buttons.

They are not doing anything. It was basically my last ditch effort to carry the cells into the print_BTN function. Without them I get the same variable not set error.

That makes a lot of sense. Thank you for the info. I still have a lot to learn on this, obviously. I will get to work on writing the statement to give the variable a value. Thanks for the help.