Retain format in dropdowns when unlinking fields

[brent chadwick]

Hey Guys,
I've looked everywhere for an answer to this one. I have a dropdown form field that I need the text to be italic. However when I unlink the fields it looses the format and returns to regular text. Suggestions? Thanks-

[gmayor]

What you describe is the normal behaviour, however you can establish whether the font is italic before unlinking then reapply the italics if required e.g.

Sub UnlinkFormFields()
Dim oFF As FormField
Dim oRng As Range
Dim i As Long
    If Not ActiveDocument.ProtectionType = wdNoProtection Then
        ActiveDocument.Unprotect Password:=""
    End If
    For Each oFF In ActiveDocument.FormFields
        i = Len(oFF.Result)
        Set oRng = oFF.Range
        If oFF.Range.Font.Italic = True Then
            oRng.Fields.Unlink
            oRng.End = oRng.End + i
            oRng.Font.Italic = True
        Else
            oRng.Fields.Unlink
        End If
    Next oFF
lbl_Exit:
    Set oFF = Nothing
    Set oRng = Nothing
    Exit Sub
End Sub

[brent chadwick]

Thanks-works great-