Having the user specify a column when running a macro

Hi All,

I have a very simple macro that I use to highlight duplicates in a column...

Sub test()
'
' test Macro
' Macro recorded 8/21/2008 by Corey G. Garner
'

'
    Range("A1").Select
    Selection.FormatConditions.Delete
    Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=COUNTIF(A:A,A1)>1"
    Selection.FormatConditions(1).Interior.ColorIndex = 6
    Range("A1").Select
    Selection.Copy
    Columns("A:A").Select
    Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
End Sub

In this example, the macro is applied to column A. Is there some way that I could have a user be prompted for which column they wish to check for duplicates when they run the macro? Thanks in advance.

-Corey