回答編集履歴

2

a

2018/01/24 09:54

投稿

ryzeal
ryzeal

スコア15

test CHANGED
@@ -4,7 +4,7 @@
4
4
 
5
5
  for i = 1 to worksheets.count
6
6
 
7
- sheet(i).activate
7
+ sheets(i).activate
8
8
 
9
9
  range("A1").select
10
10
 

1

書式修正

2018/01/24 09:54

投稿

ryzeal
ryzeal

スコア15

test CHANGED
@@ -1,3 +1,5 @@
1
+ ```VBA
2
+
1
3
  Application.ScreenUpdating = False
2
4
 
3
5
  for i = 1 to worksheets.count
@@ -10,6 +12,8 @@
10
12
 
11
13
  Application.ScreenUpdating = true
12
14
 
15
+ ```
16
+
13
17
 
14
18
 
15
19
  これはだめですか?