I'm trying to convert a Public String variable into a Double so I can use it to change my margins on a selection, but I keep getting "Type Mismatch". I'm not sure what I'm doing wrong.
[vba]Sub MarginAll()
Dim myMargin As Double
myMargin = CDbl(myVal) 'change the String to a Double

With ActiveWindow.Selection.ShapeRange
If ActiveWindow.Selection.ShapeRange.HasTextFrame Then
.TextFrame.MarginLeft = myMargin
.TextFrame.MarginRight = myMargin
.TextFrame.MarginTop = myMargin
.TextFrame.MarginBottom = myMargin
End If
End With

End Sub[/vba]