How can I paste data in reverse order?

Anonymous
2018-08-03T14:46:11+00:00

Hi there,

I was wondering how to paste data in reverse order.

Any ideas?

Thanks :)

Microsoft 365 and Office | Excel | For home | Windows

Locked Question. This question was migrated from the Microsoft Support Community. You can vote on whether it's helpful, but you can't add comments or replies or follow the question.

0 comments No comments
{count} votes

7 answers

Sort by: Most helpful
  1. Anonymous
    2018-08-06T17:27:42+00:00

    Here are a couple of macros for you.

    Sub FlipRowstoptobottom()

        Dim vTop As Variant

        Dim vEnd As Variant

        Dim iStart As Integer

        Dim iEnd As Integer

        Application.ScreenUpdating = False

        iStart = 1

        iEnd = Selection.Rows.Count

        Do While iStart < iEnd

            vTop = Selection.Rows(iStart)

            vEnd = Selection.Rows(iEnd)

            Selection.Rows(iEnd) = vTop

            Selection.Rows(iStart) = vEnd

            iStart = iStart + 1

            iEnd = iEnd - 1

        Loop

        Application.ScreenUpdating = True

    End Sub

    Sub Flipcolumnslefttoright()

        Dim vTop As Variant

        Dim vEnd As Variant

        Dim iStart As Integer

        Dim iEnd As Integer

        Application.ScreenUpdating = False

        iStart = 1

        iEnd = Selection.Columns.Count

        Do While iStart < iEnd

            vTop = Selection.Columns(iStart)

            vEnd = Selection.Columns(iEnd)

            Selection.Columns(iEnd) = vTop

            Selection.Columns(iStart) = vEnd

            iStart = iStart + 1

            iEnd = iEnd - 1

        Loop

        Application.ScreenUpdating = True

    End Sub

    Gord

    8 people found this answer helpful.
    0 comments No comments
  2. Anonymous
    2018-08-08T11:24:40+00:00

    Thanks a lot Gord!

    0 comments No comments