回答編集履歴

2

こちらかがいいかも

2020/07/31 01:09

投稿

mako1972
mako1972

スコア383

test CHANGED
@@ -42,6 +42,10 @@
42
42
 
43
43
 
44
44
 
45
+ wb.Close savechanges:=False
46
+
47
+
48
+
45
49
  set wb = nothing
46
50
 
47
51
 

1

こちらかがいいかも

2020/07/31 01:09

投稿

mako1972
mako1972

スコア383

test CHANGED
@@ -3,6 +3,24 @@
3
3
 
4
4
 
5
5
  wwbとはなんでしょうか・・。
6
+
7
+
8
+
9
+ マクロを実行したファイルを見失いために、
10
+
11
+ Thisworkbook.sheets(1).range("XX")
12
+
13
+ 開いたファイルはwb.sheets(1).range("XX")
14
+
15
+ とするなどして見失わないようにします。
16
+
17
+
18
+
19
+ マクロの延長で考えるとselect とかactive copyなどの命令で記述しがちですが
20
+
21
+
22
+
23
+ 下記のように記述するとよろしいかと思います。
6
24
 
7
25
 
8
26