私の説明が下手で大変申し訳ありません。 A B C D E F G H I〜L列 区分物件名 部屋 所在地 価格 価格変更 完成日 状況 A社〜L者 ** ** 空白 ** ** *** *** ** ** ** ** ** *** *** ・ A〜Gまでは、別シートのデータを抽出して貼り付けられたものです。 データは、行が可変します。 貼り付けられた時にH列には決まった文字、I列〜L列に○が挿入される というようにしたいのですが、
A B C D E F G H I〜L列 区分物件名 部屋 所在地 価格 価格変更 完成日 状況 A社〜E社 ** ** 空白 ** ** *** *** 商談・済 ○〜 ○ ** ** ** ** ** *** *** 商談・済 ○〜 ○
質問が理解できているか心配ですが・・・
どこかのセルに入力したら、その行の F列のセルに何か表示したい
ということでしょうか?
このコードは1〜5行目で反応します。
詳細は http://www.eurus.dti.ne.jp/~yoneyama/Excel/vba/vba_event.html#change
のChangeイベントをご覧ください。
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 1 Or Target.Row > 6 Then Exit Sub
Application.EnableEvents = False
Cells(Target.Row, 6).Value = "この行に入力されました"
Application.EnableEvents = True
End Sub