Help with finding column number using month and shape number

[dad812]

I have 12 sheets where;
Sheet1(Jan)
Sheet2(Feb)
...
Sheet12(Dec)

each Sheet has 6 shapes with the name lblIncome1 - lblIncome6

also is a Sheet13(Income) that holds the data for my 6 incomes per month,

Jan1 Income starts at column 1
Jan2 Income starts at column 4
Jan3 Income starts at column 7
...
Jan6 Income starts at column 16

Then Feb, Mar... Dec
I use the column numbers when saving and returning values for that Income. I can get the shape number that was pressed but need assistance with developing the math that will get me the correct column number. example; lblIncome1 pressed on Sheet2(Feb) should be 19. Assistant would be greatly appreciated.

[kersplash]

You would be better attaching a sample of your workbook.

Go Advanced -> Manage Attachments -> Upload

[dad812]

Be glad to, it will be tomorrow am,

[dad812]

moving from ActiveX controls to Form Controls, and having issues passing variables, so I chose to eliminate passing and just call the sub
needed, doing the calculations or logic in the sub. The Income Shapes are the last piece I need to complete before moving on to other
details. With ActiveX controls I just passed the var. as needed, the Form control doesn't like passing without throwing an error on
1st. mouse click.

Moving to Form Controls has been a blessing and a challenge at the same time, the size of my WB has been reduced more than half,
speed went from 34 seconds to almost nothing.

you will find the column number being passed where you call the macro from, and in module Income/Sub FormIncomeShow I have commented out
the calling sub - GetiColumn while testing. I will edit the Shape Assign Macro when working. Thanks in advance

[dad812]

Thanks for the help, I have solved this myself;

using the WorksheetFunction Match

Please Login or Register  to view this content.