質問編集履歴

2

gozi

2021/09/29 03:25

投稿

aaaskw123123
aaaskw123123

スコア13

test CHANGED
File without changes
test CHANGED
@@ -136,7 +136,7 @@
136
136
 
137
137
      'もしA列に東京という文字が入っていたら
138
138
 
139
-  IF wb.Sheets(1). InStr(ws.Range("A" & i), "東京") Then
139
+  IF wb.Sheets(1). InStr(wb.Sheets(1).Range("A" & i), "東京") Then
140
140
 
141
141
 
142
142
 

1

誤字

2021/09/29 03:25

投稿

aaaskw123123
aaaskw123123

スコア13

test CHANGED
File without changes
test CHANGED
@@ -136,7 +136,7 @@
136
136
 
137
137
      'もしA列に東京という文字が入っていたら
138
138
 
139
-  IF wb.Sheets(1). InStr(ws.Range("A" & i), "東京")
139
+  IF wb.Sheets(1). InStr(ws.Range("A" & i), "東京") Then
140
140
 
141
141
 
142
142