|
お世話になります。マクロの記録を改良して下記のソート文を利用しております
Application.ScreenUpdating = False
PL = Range("B50000").End(xlUp).Row
Range(Cells(6, 1), Cells(PL, 68)).Select
ActiveWorkbook.Worksheets("Sheet4").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Sheet4").Sort.SortFields.Add Key:=Range(Cells(6, 18), Cells(PL, 18)) _
, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Sheet4").Sort
.SetRange Range(Cells(6, 1), Cells(PL, 68))
.Header = xlGuess
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
上の文の中でWithとEnd withの間の文は何を意味しているか教えてください。
また削除して問題が無いかも教えて頂きたいと思います。
|
|