Ist kurz, aber leichter zu merken.

Ist natürlich nur ein Einzeiler, passt als eigene Routine aber besser zu den Routinen GetVariable und GetUserField.

Function GetDocUserField(odocument as object,x  as integer) as string

  GetDocUserField= oDocument.DocumentInfo.getUserFieldValue(x)

End Function