teratail header banner
teratail header banner
質問するログイン新規登録

回答編集履歴

4

修正3

2018/01/25 03:55

投稿

jawa
jawa

スコア3020

answer CHANGED
@@ -9,6 +9,7 @@
9
9
 
10
10
  全シート一括設定のサンプル
11
11
  ---
12
+ `Sheets.Select`を使った一括変更のサンプルです。
12
13
  処理前にアクティブだったシートを最後にアクティブに戻す必要がなければ、shDef関連の部分は不要です。
13
14
  ```
14
15
  Sub Sample()

3

修正2

2018/01/25 03:55

投稿

jawa
jawa

スコア3020

answer CHANGED
@@ -5,7 +5,7 @@
5
5
  ループ処理にはループ処理のメリットもあり、1シートずつ判断が組み込めるので一律で変更したくないシートなどは対象外にすることもできます。
6
6
 
7
7
  あとは好みの問題でしょうか。
8
- 好みでいえば、私はアクティブシートやセルの選択状態をマクロ処理から更すること自体があまり好みではないので、極力それを行わないようなコードを書きますが…避けられないときもありますよね(^-^;
8
+ 好みでいえば、私はアクティブシートやセルの選択状態をマクロ処理えてしまうこと自体があまり好みではないので、極力それを行わないようなコードを書きますが…避けられないときもありますよね(^-^;
9
9
 
10
10
  全シート一括設定のサンプル
11
11
  ---
@@ -37,7 +37,7 @@
37
37
  'シートをアクティブ化しないとセルが選択できない
38
38
  sh.Activate
39
39
  'A1セルを選択
40
- sh.Cells(2, 1).Select
40
+ sh.Range("A1").Select
41
41
  Next sh
42
42
  End Sub
43
43
  ```

2

しゅうせい

2018/01/25 03:54

投稿

jawa
jawa

スコア3020

answer CHANGED
@@ -5,7 +5,7 @@
5
5
  ループ処理にはループ処理のメリットもあり、1シートずつ判断が組み込めるので一律で変更したくないシートなどは対象外にすることもできます。
6
6
 
7
7
  あとは好みの問題でしょうか。
8
- 好みでいえば、私はアクティブシートやセルの選択状態をコード上で変更すること自体があまり好みではないので、極力それを行わないようなコードを書きますが…避けられないときもありますよね(^-^;
8
+ 好みでいえば、私はアクティブシートやセルの選択状態をマクロ処理から変更すること自体があまり好みではないので、極力それを行わないようなコードを書きますが…避けられないときもありますよね(^-^;
9
9
 
10
10
  全シート一括設定のサンプル
11
11
  ---

1

tuiki

2018/01/25 03:52

投稿

jawa
jawa

スコア3020

answer CHANGED
@@ -1,7 +1,9 @@
1
1
  全シート一律で処理するなら、saziさんからのアドバイスにもある通り、`Sheets.Select`で全シート選択するのが簡単です。
2
- ただ、ループで処理する方法もコードとしては大差ないと思います。
3
- こちらにこちらメリットがあり、1シトずつ判断が組み込めるの一律で変更したくないシートなど対象外することきま
2
+ (しかし私の環境でsaziさん提供ではセルのSelect時エラー発生したため、別途投稿させていただきました
4
3
 
4
+ ループで処理する方法は好まれていないようですが、コードとしては大差ありません。
5
+ ループ処理にはループ処理のメリットもあり、1シートずつ判断が組み込めるので一律で変更したくないシートなどは対象外にすることもできます。
6
+
5
7
  あとは好みの問題でしょうか。
6
8
  好みでいえば、私はアクティブシートやセルの選択状態をコード上で変更すること自体があまり好みではないので、極力それを行わないようなコードを書きますが…避けられないときもありますよね(^-^;
7
9