excel - VBA如何在没有.Select的情况下复制单元格的内容

Question

我正在编写一个方法，可以获取Target并将单元格准确地粘贴到另一个单元格。该单元格是一个带有一些奇特格式的运输标签。有什么办法可以做到吗？

原来我有这个:

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")