VBA code to have user select different column as X axis

rathalex

New Member
Joined
Oct 25, 2017
Messages
32
Hello,

I am having trouble creating a code that would allow a user to pick which column(based on names in cells A1-D1) to use as x axis to construct scatter xy plot. The y data is in column E and remains constant. So i need an input box with 4 options probably and possible IF statement so that user could select which column to plot vs column E. Any suggestions would be greatly appreciated since Im ver new to VBA. Thank you
 

Excel Facts

Ambidextrous Undo
Undo last command with Ctrl+Z or Alt+Backspace. If you use the Undo icon in the QAT, open the drop-down arrow to undo up to 100 steps.
One fairly easy way to achieve this is to make the range A:D your x axis, in effect making four different charts. Since charts will not take date from hidden cells, your code need only hide columns A:D and then unhide the column you wish to use.
 
Upvote 0
How do I make an IF statement or code to prompt user to choose which column to use though? Also by the name in the 1st row not actual column A-D names
 
Upvote 0
You will have to use code to hide and unhide columns. There are various options, but the easiest way to describe a solution is to name a cell in each data column, say Data1, Data2, etc. Then insert a button at the top of each column, attach code similar to the following code to each button.
Code:
Sub ShowData1()
    Call HideAllData
    Range("Data1").EntireColumn.Hidden = False
End Sub
You will also need the code to hide all data columns
Code:
Sub HideAllData()
    Range("Data1").EntireColumn.Hidden = True
    Range("Data2").EntireColumn.Hidden = True
    Range("Data3").EntireColumn.Hidden = True
    Range("Data4").EntireColumn.Hidden = True
End Sub
 
Upvote 0
There is no options without hiding the column? Like create an inputbox and based on user's selection,excel would pick a range?
 
Upvote 0
That's only slightly more complex. The best solution would be for you to record a macro while you edit the chart to change the X axis range and then change the line which looks like "ActiveChart.FullSeriesCollection(1).Values = "=Sheet1!$F$4:$F$15"" to a reference that suits your various options. Then use a case structure to select the code based upon the choice made in the input box. Or you could create a Userform with some option buttons to let the user select the X axis.
 
Upvote 0

Forum statistics

Threads
1,214,648
Messages
6,120,726
Members
448,987
Latest member
marion_davis

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top