Dependant? Data Validation

To place Private Sub Worksheet_Change macro in the correct location

'GoTo Excel
'Select sheet the macro is to appy to
'Right Click on Sheet Name Tab > select View Code
'Past macro into the Worksheet Module displayed

When installed in the correct module sheet the Worksheet_Change macro run evertime a change is made to a cell in the sheet

mikerickson macro does nothing if the change is not to A1
If A1 is changed it opens an Inputbox asking to enter a type - High , low etc (1st letter is enough eg H or h or L or f etc)
Depending op reply to Input box it multiplies A1 * a percentage & puts result in C1


In your Hide & Unhide macros you do not need to select columns & rows to hide unhide them

As an example these 2 lines of code

Columns("AD:AD").Select
    Selection.EntireColumn.Hidden = True

can be changed to

Columns("AD:AD").EntireColumn.Hidden = True

Macros that do not select columns etc run faster & are easier on the user as the screen does not jump around whilst the macro is running