| 
    
     |  | ▼bridgesbook さん 今日は 
 >検索では探し出せなく、質問させてください。
 
 形式をしてして貼付をマクロ記録してみてください。
 参考までにマクロ記録したものを少し変えたものです。
 
 Sub Macro1()
 Range("A1:B3").Copy 'copy元
 Range("D3").PasteSpecial Paste:=xlValues  '貼り付け先
 Application.CutCopyMode = False
 End Sub
 
 
 >ActivesheetにVBAに必要な入力欄を設けています。
 >(変数とか、処理する行を指定するとか)
 >以下のように色や罫線を使用し、見やすくしております。
 >
 >入力セルは      無色 罫線で囲う
 >見出し・説明のセルは 有色 罫線で囲う
 >空きスペース     有色 罫線無し
 >
 >その為、シートの保護をしているのですが、
 >コピー→貼り付けをすると、セル色や罫線が変化してしまいます。
 >貼り付けをする場合、強制的に、
 >「形式を選択して貼り付け」→「値」
 >にしてしまうことは可能でしょうか?
 >
 >よろしくお願いいたします。
 >
 >
 >↓これではぜんぜんだめでした。
 >Private Sub Worksheet_Change(ByVal Target As Range)
 > If Application.CutCopyMode <> False Then Application.CutCopyMode = False
 >End Sub
 
 
 |  |