| 
    
     |  | ▼シンク さん: 
 >とても参考になりました。
 >申し訳ないのですが、最後に質問させてください。
 >
 >c(1, 2).Value = Replace(c(1, 2), "●●", dic(c.Value))
 >IPアドレスを基準に置き換えていると思いますが、
 >下記のように●●の位置になった場合、
 >どのように対処すればよろしいでしょうか?
 >Sheet2
 >   A       B
 >1 04:14      ●●にてメール受信。
 >2 1.222.333.2   KKKLLLGGG:DDDRRR:TTT
 >3
 >
 Sheet2 のIPアドレスは [A2] セルだけですか?
 [B1] に ●●を含む文字列があるということですか?
 
 [A2] が 変数c のセルだとすると、 [B2]セルは c(1, 2) です。
 [A2] が 変数c のセルだとすると、[B1]セルは c(0, 2) です。
 つまり、
 c(0, 2).Value = Replace(c(0, 2), "●●", dic(c.Value))
 または、Offsetを使えば、
 c.Offset(-1, 1).Value = _
 Replace(c.Offset(-1, 1).Value, "●●", dic(c.Value))
 と表しても 同じことです。
 
 |  |