VBA kode - Hjælp til at vise info fra en kolonne i en MsgBox

Hej.....

Jeg har lavet en oversigt over værdipapirer i Excel 2007 versionen. Arket er lavet til nogle af mine kollegaer. For at lave arket så brugervenligt som muligt, har jeg derfor lavet nedenstående VBA kode, som sletter den linie som brugeren står i.

Skal måske lige nævne at jeg ikke er så stærk i VBA koder! :o)

Jeg har lavet nedenstående VBA kode:

Sub DeleteRow()

Dim MyCell
MyCell = ActiveCell.Value

ans = MsgBox("Er du sikker på at du vil slette værdipapiret:" & vbCr & " " & vbCr & _
        "" & ActiveCell.Value, 48 + vbOKCancel, "Sletning af værdipapir!!!!!")
    If ans = vbOK Then
            ActiveCell.EntireRow.Delete
    End If
End Sub


Mit problem består i, at jeg godt kunne tænke mig, at ovenstående MsgBox viset indholdet/værdien at det der står i kolonne D for den række brugeren står i, uanset hvilken celle brugerem stå i. Lige pt. viser den kun indholdet af den aktive celler brugeren står i.

F.eks. hvis brugeren enten står i cellerne, F16, L16, K,16 osv. så skal den vise indholdet i kolonne D. Og hvis brugeren står i en anden række, så skal den naturligvis vise værdien i kolonne D for netop denne række.


Håber at der er en der kan hjælpe?


På forhånd tak