I must admit i am no expert when it comes for forms, never really had the need. I dont mind trying to help, but please bear this in mind
Quote:
Couple of things that I hope you can assist with resolving... the 'to address' for the outer envelope label is getting picked up from the ToFrom worksheet when it should be getting picked up from Column D on the Inner Envelope worksheet.
|
Yes i used the data already populated in the sheet to save going back to 'look' for it in the Inner Envelope sheet. The first 2 lines in the lables sub is where we copy the address - some where in the form there is a lookup to find the correct row to copy the address over. I dont know where that is as i am not familiar with the code, but you code use that if you want to copy from the Inner evelope sheet
Quote:
Selecting Column 1 works fantastic but nothing appears if Column 2 is selected?
|
I had the end ifs wrong, try
Code:
If Col = 1 Then
Worksheets("Outer envelope").Range("a" & Row).PasteSpecial Paste:=xlPasteValues
End If
If Col = 2 Then
Worksheets("Outer envelope").Range("b" & Row).PasteSpecial Paste:=xlPasteValues
End If
Quote:
And there is no 'from address' appearing on the outer envelope label?
|
Again i have not looked at this part as it is more or less a repeat of the other code, just copying a different shape/range