Posts by rpyle1191

    Re: Copy/Paste Worksheet Column to Another without overwriting

    Skywriter: Worked great. Thank you... I have been beating my head against the wall all morning. I hope you have a great weekend!

    Best Wishes~

    Quote from skywriter;767423

    Try this:

    Sub Copy()
    Dim lc As Long
        With Worksheets("FY16")
                lc = .Cells(1, Columns.Count).End(xlToLeft).Column + 1
                Sheets("Transfer Sheet").Range("B2:B14").Copy .Cells(1, lc)
        End With
    End Sub

    I would like to copy info from one worksheet (Column) and paste to another worksheet (Column) without overwriting previous data. Thank you in advance for your assistance. I have a worksheet that the managers fill out when they move assets from one location to another. I've created three macro's. One to copy this info on worksheet number 1 to another tab for the year. One to convert to PDF and open and e-mail in outlook to send to our transfer department (Works Great) and one to clear the page (Easy). My problem is I cannot get it to move from column B1:B13 to C and so on if that column is filled. I used column A for all the headings. I've attached the excel worksheet just in case.


    Sub Copy()
    ' Copy Macro
    Sheets("Transfer Sheet").Select
    ActiveWindow.SmallScroll Down:=-6
    End Sub