View Single Post
  #1   Report Post  
Old April 24th 19, 09:26 AM
Roumen Roussev Roumen Roussev is offline
Junior Member
First recorded activity by ExcelBanter: Dec 2018
Posts: 4
Default VBA auto sort multicolumn table when data is changed/deleted in protected sheet mode

I use the code to automatically sort the table by attribute "Name" from column B.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
On Error Resume Next
If Not Intersect(Target, Range("A:Z")) Is Nothing Then
Range("B5").Sort Key1:=Range("B6"), _
Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, _
End If
End Sub

The first problem with this code is that when I delete a record after the first line remains an empty cell.
The second problem is how to make the code work while sheet is password-protected.
Protected password can be found in sheet PASS.

This is the WeTransfer link to an Excel file:

Last edited by Roumen Roussev : April 26th 19 at 11:03 AM Reason: I'm sorry, but I realized the open post was not in the correct thread.