回答編集履歴

2

間違い修正

2021/11/04 01:04

投稿

hatena19
hatena19

スコア34075

test CHANGED
@@ -4,12 +4,12 @@
4
4
 
5
5
  行番号はオブジェクトではないのでSetの代わりにLetにしてください。Letは省略可能です。
6
6
 
7
- あと、worksheets(1). を二重に指定しているので一つにしてください。
7
+ あと、worksheet(1) は削除してください。
8
8
 
9
9
 
10
10
 
11
- `Let row_num =.worksheet(1).Columns("L").Find(What:=ActiveCell.Value).Row`
11
+ `Let row_num =.worksheets(1).Columns("L").Find(What:=ActiveCell.Value).Row`
12
12
 
13
13
  または、
14
14
 
15
- `row_num = worksheet(1).Columns("L").Find(What:=ActiveCell.Value).Row`
15
+ `row_num = worksheets(1).Columns("L").Find(What:=ActiveCell.Value).Row`

1

説明追記

2021/11/04 01:04

投稿

hatena19
hatena19

スコア34075

test CHANGED
@@ -4,10 +4,12 @@
4
4
 
5
5
  行番号はオブジェクトではないのでSetの代わりにLetにしてください。Letは省略可能です。
6
6
 
7
+ あと、worksheets(1). を二重に指定しているので一つにしてください。
7
8
 
8
9
 
10
+
9
- `Let row_num = worksheets(1).worksheet(1).Columns("L").Find(What:=ActiveCell.Value).Row`
11
+ `Let row_num =.worksheet(1).Columns("L").Find(What:=ActiveCell.Value).Row`
10
12
 
11
13
  または、
12
14
 
13
- `row_num = worksheets(1).worksheet(1).Columns("L").Find(What:=ActiveCell.Value).Row`
15
+ `row_num = worksheet(1).Columns("L").Find(What:=ActiveCell.Value).Row`