Number format based on user input

Hi,

I have a workbook where I need alot of cells showing the unit of the value, I.e. 10 psi, 150 pounds etc. I know how to get the unit shown by using the format cells -> custom and then fill in 'Type'. However, I would like for excel to ask for the unit of the selected cell every time i run the macro.

Sub Addunit()
Dim myValue as string

myValue = InputBox("Type cell unit")
Selection.NumberFormat = "0.00 ""psi"""

End Sub

I would like for the 'psi' in the above bit to be the myValue input instead.

Any help is much appreciated!

Originally Posted by skywriter

Here's another solution. If you entered "psi" into the input box, then this would be as if you went into cell formatting, chose custom and entered: 0.00"psi"

Please Login or Register  to view this content.

This did the trick! Thank you!

I will try to remember to use code tags in the future