Sorting a Column but Keeping Rows Intact - VBA

Question

I am trying to sort a column in ascending order but keep all the rows intact with it. Unfortunately my code isn't performing that. Any advice/help on this will be greatly appreciated.

Sub Ledger()

    Dim a As Integer
    Dim x As Integer
    Dim y As Integer
    Dim z As Integer

    Application.ScreenUpdating = False
    
    a = 0
    x = 1
    y = 3
    z = 2
    
    Sheets(x).Select
    Range("A1").EntireColumn.Insert
    Range("B:B").Sort Key1:=Range("B2"), Order1:=xlAscending, Header:=xlYes
    Range("A2").Select

Thanks in Advance

It looks like you are explicitly only sorting column B: Range("B:B").Sort — topsail
– topsail, Commented Nov 15, 2022 at 15:07

SneakyKeys1025 · Accepted Answer · 2022-11-15 15:09:02Z

1

I figured out what was wrong. Needed to set the range to the entire sheet so that it covered all columns. Silly mistake.

answered Nov 15, 2022 at 15:09

SneakyKeys1025

334 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

Sorting a Column but Keeping Rows Intact - VBA

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related