質問編集履歴
1
誤字修正
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -7,7 +7,11 @@
|
|
|
7
7
|
番号順に並び替える命令の部分でエラーで止まっています。
|
|
8
8
|
|
|
9
9
|
・実行時エラーは「438」
|
|
10
|
-
・エラーは下記コードの
|
|
10
|
+
・エラーは下記コードの
|
|
11
|
+
** ActiveWorkbook.Worksheets("支払申請一覧表").Sort.SortFields.Add2 Key:=Range( _
|
|
12
|
+
"A2:A1048576"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
|
|
13
|
+
xlSortNormal**
|
|
14
|
+
|
|
11
15
|
・エクセルのバージョンはどちらも「2016」
|
|
12
16
|
・マクロのセキュリティーはどちらも「すべてのマクロを実行する」
|
|
13
17
|
・PCは「Windows10」
|