I have a macro that retrieves customer data from a SQL database and enters it into a spreadsheet form. The problem I am having is how to transfer a multiline address from one textbox into multiple cells. The code I am using to enter the data into the spreadsheet is below.
Code
Range("D4").Value = PaymentClaimForm.TextBoxAddress
Range("D4").Value = Replace(TextBox1, Chr(13), "")
I would like to enter the data into cells D4, D5 and D6. The addresses were coming into the spreadsheet with carriage return sysmbols, hence the second line of code above
Any help is greatly appreciated.:kiwibird: