| 
    
     |  | Statis さん へっぽこ侍 さん 
 こんばんは。
 
 >一応できましたが、コピー側の数値及び、文字が変化した場合、
 >ペースト側の値も同時に変化させたいのです。
 
 リンク貼り付けですか?
 マクロの記録からです。
 
 Sub Macro1()
 '
 ' Macro5 Macro
 ' マクロ記録日 : 2005/9/15 ユーザー名 : ponpon
 '
 
 '
 Sheets("Sheet1").Range("A1:F2000").Copy
 Sheets("Sheet2").Select
 Range("A1").Select
 ActiveSheet.Paste Link:=True
 Selection.PasteSpecial Paste:=xlPasteFormats
 Selection.PasteSpecial Paste:=xlPasteColumnWidths
 Application.CutCopyMode = False
 End Sub
 
 >それと、数値が全くコピーされませんが、どうすればよいでしょうか?
 リンク貼り付けですから大丈夫だと思います。
 
 >また、間違ってペースト側の値を消してしまった場合、復活させたい
 >のですが、できますでしょうか?
 元に戻すでは?
 
 
 |  |