BLACK HAWK DOWN (MARK BOWDEN) の中の
Dowdy had been maintaining and flying in army choppers for a third of his life. の
"for a third of his life" の部分が?
よろしくお願いします。
エクセル2002使用です。
VBAのFindNextメソッドについて教えていただけますでようか?不定期の行ごとに存在する○から△までの表を抽出するために次のようなコードをつくりました。
A B C D
1 ○ × ×
2 × × ×
3 △ × ×
4
5 ○ × ×
6 × × ×
7 △ × ×
Sub 表の抜き出し()
Dim myr1 as range
Dim myr2 as range
Dim firstmyr1 as String
Set myr1 = Columns("A").Find(What:="○")
firstmyr1 =myr1.adress
Set myr2 = Columns("A").Find(What:="△")
Do
処理・・・・
Set myr1 = Columns("A").FindNext(after:=myr1)
Set myr2 = Columns("A").FindNext(after:=myr2)
Loop until myr1.adress = firstmyr1
End Sub
上記のようなコードで、処理の後のSetステートメントでFindNextを使うと、A5の○とA7の△を見つけてほしいのに、1回目の処理・・・の後の読み込みでウオッチで見るとmyr1値が△になってしまって2回目の読み込みにいけません。Setステートメントが2つ以上あるときのFindNextメソッドの使い方で何か注意点があるのでしょうか?
よろしくお願いします。
エクセル2002使用です。
VBAのFindNextメソッドについて教えていただけますでようか?不定期の行ごとに存在する○から△までの表を抽出するために次のようなコードをつくりました。
A B C D
1 ○ × ×
2 × × ×
3 △ × ×
4
5 ○ × ×
6 × × ×
7 △ × ×
Sub 表の抜き出し()
Dim myr1 as range
Dim myr2 as range
Dim firstmyr1 as String
Set myr1 = Columns("A").Find(What:="○")
firstmyr1 =myr1.adress
Set myr2 = Columns("A").Find(What:="△")
Do
処理・・・・
Set myr1 = Columns("A").FindNext(after:=myr1)
Set myr2 = Columns("A").FindNext(after:=myr2)
Loop until myr1.adress = firstmyr1
End Sub
上記のようなコードで、処理の後のSetステートメントでFindNextを使うと、A5の○とA7の△を見つけてほしいのに、1回目の処理・・・の後の読み込みでウオッチで見るとmyr1値が△になってしまって2回目の読み込みにいけません。Setステートメントが2つ以上あるときのFindNextメソッドの使い方で何か注意点があるのでしょうか?
よろしくお願いします。
エクセル2002使用です。
VBAのFindNextメソッドについて教えていただけますでようか?不定期の行ごとに存在する○から△までの表を抽出するために次のようなコードをつくりました。
A B C D
1 ○ × ×
2 × × ×
3 △ × ×
4
5 ○ × ×
6 × × ×
7 △ × ×
Sub 表の抜き出し()
Dim myr1 as range
Dim myr2 as range
Dim firstmyr1 as String
Set myr1 = Columns("A").Find(What:="○")
firstmyr1 =myr1.adress
Set myr2 = Columns("A").Find(What:="△")
Do
処理・・・・
Set myr1 = Columns("A").FindNext(after:=myr1)
Set myr2 = Columns("A").FindNext(after:=myr2)
Loop until myr1.adress = firstmyr1
End Sub
上記のようなコードで、処理の後のSetステートメントでFindNextを使うと、A5の○とA7の△を見つけてほしいのに、1回目の処理・・・の後の読み込みでウオッチで見るとmyr1値が△になってしまって2回目の読み込みにいけません。Setステートメントが2つ以上あるときのFindNextメソッドの使い方で何か注意点があるのでしょうか?
よろしくお願いします。