Sub GetLengthOfString() Dim stFullName As String stFullName = "C:\asdf\asdf.xls" MsgBox Len(stFullName) End Sub