Figured out a way to do it from several other posts. Works pretty well.
Thanks to all.
Mystring = [CustInfo]
MyArray = Split(Mystring, Chr(13), -1, 1)
Me![Name] = MyArray(0)
Me![Address] = Mid(MyArray(1), 2)
Me![City] = Mid(MyArray(2), 2)
Me![State] = Mid(MyArray(3), 2)
Me![Zip] =...