ここから本文です

マクロについて教えて下さい。 シート名:A シート名:B 特定文字:東京 ...

gri********さん

2020/2/1813:09:38

マクロについて教えて下さい。

シート名:A
シート名:B
特定文字:東京

【条件】
シート名AのA列より、特定文字"東京"の1つ下の行数を取得。

シート名AのCells(取得行数,10)が、△だった場合、
シート名BのA1に、△を入力

この場合、どのようなマクロになるのでしょうか?

閲覧数:
15
回答数:
1
お礼:
25枚

違反報告

回答

1〜1件/1件中

プロフィール画像

カテゴリマスター

2020/2/1813:51:09

Sub test()
Dim fnd As Range
Set fnd = Sheets("A").Range("A:A").Find("東京", LookAt:=xlPart)
If Not fnd Is Nothing Then
If fnd.Offset(1, 9) = "△" Then Sheets("B").Range("A1") = "△"
End If
End Sub

こういう。完全一致なら、
xlPart -> xlWhole
にしてください。

この質問につけられたタグ

みんなで作る知恵袋 悩みや疑問、なんでも気軽にきいちゃおう!

Q&Aをキーワードで検索:

Yahoo! JAPANは、回答に記載された内容の信ぴょう性、正確性を保証しておりません。
お客様自身の責任と判断で、ご利用ください。
本文はここまでです このページの先頭へ

「追加する」ボタンを押してください。

閉じる

※知恵コレクションに追加された質問は選択されたID/ニックネームのMy知恵袋で確認できます。

不適切な投稿でないことを報告しました。

閉じる