Eric Penfold
Active Member
- Joined
- Nov 19, 2021
- Messages
- 424
- Office Version
- 365
- Platform
- Windows
- Mobile
Try to make number ascending in a column gets to
The Error says "Object dosen`t support this property or method" ??
VBA Code:
.AutoFilter Field:=iCol, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption _
:=xlSortNormal
The Error says "Object dosen`t support this property or method" ??
VBA Code:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
With Target.Font
.Name = "Calibri"
.Size = 11
Selection.RowHeight = 15
Selection.EntireColumn.AutoFit
Dim lo As ListObject
Dim iCol As Long
Set lo = Sheet2.ListObjects("Frost_Table")
iCol = lo.ListColumns("Part No").Index
.AutoFilter Field:=iCol, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption _
:=xlSortNormal
End With
End Sub