Hi Howard,

Am Fri, 3 Jun 2016 17:16:45 -0700 (PDT) schrieb L. Howard:

Set aCity = Mid(rngC, Find("- ", rngC) + 2, 99)

Find is a function and you must write it as
Application.Find.
But in VBA it is easier to use Instr
Try it this way:

aCity = Mid(rngC, InStr(rngC, " - ") + 3, 99)


Regards
Claus B.
--
Windows10
Office 2016