| 
    
     |  | 質問します。私はVBAの知識が無いに等しい者ですが、どうしても自動処理したく、下記の処理VBAの教示を御願い致します。 「C列に数値を指示、E列はある処理(外部から入力)により刻々数値が上下変わる。セルE5の値が、たまたまセルC5の数値と合致した時、セルC5の数値をセルD5にコピーする。同様に上下動いているセルE6の数値がセルC6の数値と合致した時、C6の値をD6にコピーする。」
 
 C列    D列    E列
 5行     240    240    240 <------数値が合致でセルD5にコピー
 6行     50        46
 
 マクロとif〜thenを合体してマクロを動かしても駄目でした。
 
 If Range("E5") = Range("C5") Then
 Range("C5").Select
 Selection.COPY
 Range("D5").Select
 ActiveSheet.Paste
 End If
 If Range("E6") = Range("C6") Then
 Range("C6").Select
 Application.CutCopyMode = False
 Selection.COPY
 Range("D6").Select
 ActiveSheet.Paste
 Application.CutCopyMode = False
 End If
 End Sub
 
 
 |  |