Wildcard for macro

I have about 20 columns on a sheet that contain different data in the exact same rows. I have a macro to clear the data from a particular column:

Please Login or Register  to view this content.

This is tied to a button form control on the sheet that says 'Clear Data'. Rather than creating a form control and macro for each column, is there a method to have a user either input a column letter in a cell or select from a dropdown in the cell and then have the macro use that cell to replace the column letter in the code. So the code would be setup with a wildcard entry and based on the input from the cell it would replace the column letter in all of the code? For example the entry cell would be AV2 and the user enters 'E' and then click the button form control and the macro would run as:

Please Login or Register  to view this content.

thanks

Stupid question, when you enter the title for the InputBox into a cell which direction does the macro search for the data? Cell in the row below, cell in the column to the right,...? Or is there a method to designate the InputBox?

Disregard, apologies.

Thanks for all of the replies. I ended up going with this:

Please Login or Register  to view this content.

But I want to see if I can take it a step further and eliminate user error because it may result in formulas being cleared if the wrong column is entered.

I have a list of Customer Names in Row 6 (Customer 1, Customer, 2, etc.) and the same column contains the data I want cleared (Customer 1 Column D, Customer 2 Column F, etc.). There are formulas in the columns between the Customer Names (Column E, Column G, etc.). So how would I get a ComboBox working to have a dropdown selection of the Customer Name from Row 6 and match it to the column where is exists and clear the entries based on that particular column? Also I don't have a header or title stating the Customer Name row, they only exist in each particular cell.

If Customer 1 (D6) was selected then it would clear contents in D11:D16,D18:D47,D49:D85,D87:D107,D120:D150. Customer 2 (F6) would clear contents in F11:F16,F18:F47,F49:F85,F87:F107,F120:F150. And so on.

I ended up working kind of a hybrid of what you had suggested. I populated the column headers into a table starting in BD3 and copying down to BD23 using:

=INDEX($C$9:$AR$9,INT(2*ROWS($BD$3:BD3)))

Then I created a named list (clist) based on those entries plus an extra at the top (BD2) for All Columns. And used a ComboBox to display the named list in a drop down. When you chose an entry from the drop down it populates a linked cell (BA3). Then I extract the column letter from the entry in the linked cell to BB3 using:

IF(BA3="all columns",1,LEFT(ADDRESS(ROW(A9),MATCH(BA3,9:9,0),4),LEN(ADDRESS(ROW(A9),MATCH(BA3,9:9,0),4))-LEN(ROW(A9))))

Then inserted a Button Form Control to perform the following macro:

Please Login or Register  to view this content.

Workbook if you want to see further:example6.xlsm

I will probably end up moving the helper table, linked cell and column calculations off to a 'data' sheet. So only the Button and ComboBox will remain on the existing sheet.

Thanks for everything, got a bunch of great suggestions to get the sheet functioning properly.