比如 复制 A1 单元格，粘贴到 别处。 可以 看看 下面的 语句：Sheets("1601051U4").Select Range("A1").Copy '（该行是我 加的，你看看就行。不要轻易 执行它，以免覆盖了 有用的文件信息）Range("A2057").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks ...