(自动复制U盘文件) NO.1

Excel VBA代码的复制功能,使用Range对象PasteSpecial方法实现。

其实和右键复制、粘贴一样功能。

其参数有点多,功能也相对复杂。

下面详细介绍使用方法。

NO.2

本示例使用方法很简单,两个按钮,复制和粘贴。

语法

Range.PasteSpecial(Paste、 Operation、 SkipBlanks、Transpose)

参数

电脑

Paste可选值

电脑

Operation可选值

使用不同参数值,获得不同复制效果。

NO.3

复制按钮代码

Private Sub CopyCode()Application.ScreenUpdating = FalseWith Selection .CopyEnd WithApplication.ScreenUpdating = TrueEnd Sub

粘贴按钮代码

Private Sub PasteCode()With Selection .PasteSpecial Paste:=xlPasteAll, operation:=xlPasteSpecialOperationNoneEnd WithEnd SubNO.4

粘贴方法使用相对简单,唯一有点复杂的地方,在于想要复制什么内容相应选择什么参数,如复制后要原内容相加,相乘,相减,或不变,都可以。

重点在于多练习,对于应用场景需求进行不电脑同的参数设置。


电脑