Hi Guys,
I have populated a user from from a worksheet of address data. I want to input the data to show as an address with each line of the address appearing on the next row down. Currently I have the text boxes assigned to individual cells but that doesn't work as some addresses have 3 address lines. Please help!
Can you attach a sample of your workbook with the userform and the code you are using?
1N73LL1G3NC3 15 7H3 4B1L17Y 70 4D4P7 70 CH4NG3 - 573PH3N H4WK1NG
You don't have to add Rep if I have helped you out (but it would be nice), but please mark the thread as SOLVED if your issue is resolved.
Tom
Hi gmr4evr1, apologies for the delayed response and thanks for the help. Please find it attached
Ok for some firms to have multiple address lines, but what exactly are you trying to achieve in that case ?
On your userform you only have 1 textbox for an address line so ..... ?
After giving it some thought I guess you want the possibility to select an address line in case of multiple addresses.
A solution would be to change TextBox to Combobox and check for multiple address lines and add them accordingly to the Combobox.
Does this sound plausible to you ?
Post an example file where this situation occurs so we can work with that.
Last edited by bakerman2; 03-15-2017 at 04:11 AM.
Avoid using Select, Selection and Activate in your code. Use With ... End With instead.
You can show your appreciation for those that have helped you by clicking the * at the bottom left of any of their posts.
Thanks. I have attached an updated copy of what I'm working with. You will see on Sheet1 that the data now has two additional lines for addresses 'Address line2' and 'Address Line3'.
As some addresses have more than one line; when I specify (as is currently) a specific cell for each address line. It leaves the two cells for 'Address Line2' and '3' blank and then the postcode appears two lines down.
EG If address has only one address line
Company XYZ
6 Luck Lane
Aberdeen,
Aberdeenshire
AB CDE
Whereas I want it to appear as:
Company XYZ
6 Luck Lane
Aberdeen,
Aberdeenshire
AB CDE
And if it has two address lines like this:
Company XYZ
6 Luck Lane
Lively House
Aberdeen,
Aberdeenshire
AB CDE
And not like this
Company XYZ
6 Luck Lane
Lively House
Aberdeen,
Aberdeenshire
AB CDE
Please note that on the user form 'ClintInvShpInputForm' I have placed 4 hidden textboxes to capture the information.
Thanks again.
Try this.
With ws .Range("E8").Resize(6).ClearContents .Range("E8").Value = ConfirmedClntName.Text .Range("E9").Value = ConfirmedClntAddr1.Text If ConfirmedClntAddr2.Text <> vbNullString Then .Range("E15").End(xlUp).Offset(1) = ConfirmedClntAddr2.Text If ConfirmedClntAddr3.Text <> vbNullString Then .Range("E15").End(xlUp).Offset(1) = ConfirmedClntAddr3.Text .Range("E15").End(xlUp).Offset(1) = ConfirmedClntCity.Text .Range("E15").End(xlUp).Offset(1) = ConfirmedClntPcode.Text End With
Works a treat....Legend.....Thank you!
You're welcome and thanks for rep+ and feedback.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks