VBAなしでセルの内容をコピーする方法

Question

Targetを受け取り、別のセルにセルを正確に貼り付ける方法を書いています。セルは、いくつかの華やかなformatingと出荷ラベルです。私はそれを行う方法がありますか？

もともと私はこれ持っている：それは、プレーンテキストのために働い

Worksheets("Label").Range("A1").Value = Worksheets("Get Address").Range("A28").Value 

を。しかし、私は最初の行の後に、スタイルが異なっているので、彼らは異なっている、私が作成したスタイリングを失った：

、私はまた、マクロレコーダーを使用しようと、私は.Selectを用いて溶液を得ました可能であれば、私はそれを使用しないでください。read this question私に何ができる？

' Created by the Macro Recorder 
Range("A28:A33").Select 
Range("A33").Activate 
Selection.Copy 
Sheets("Label").Select 
Range("A1").Select 
ActiveSheet.Paste 

Answer 1

Worksheets("Get Address").Range("A33").Copy _ 
     Destination := Worksheets("Label").Range("A1") 

Answer 2

Worksheets("Label").Range("A1").value = _ 
    Worksheets("Get Address").Range("A33").value 

以下、この文はあなたのコードは、単一の行 `レンジ（で再writtennことができるクリップ・ボード