VBA选择性粘贴.docx
- 文档编号:23538949
- 上传时间:2023-05-18
- 格式:DOCX
- 页数:8
- 大小:169KB
VBA选择性粘贴.docx
《VBA选择性粘贴.docx》由会员分享,可在线阅读,更多相关《VBA选择性粘贴.docx(8页珍藏版)》请在冰豆网上搜索。
VBA选择性粘贴
ExcelVBA教程:
PasteSpecial方法
应用于Range对象的PasteSpecial方法。
将剪贴板中的Range对象粘贴到指定区域中。
(Paste,Operation,SkipBlanks,Transpose)
expression 必需。
该表达式返回一个Range对象。
Paste XlPasteType类型,可选。
指定要粘贴的区域部分。
Operation XlPasteSpecialOperation类型,可选。
指定粘贴操作。
SkipBlanks Variant类型,可选。
若为True,则不将剪贴板上区域中的空白单元格粘贴到目标区域中。
默认值为False。
Transpose Variant类型,可选。
若为True,则粘贴区域时转置行和列。
默认值为False。
应用于Worksheet对象的PasteSpecial方法。
以指定格式将剪贴板中的内容粘贴到工作表上。
可用本方法从其他应用程序中粘贴数据,或以特定格式粘贴数据。
(Format,Link,DisplayAsIcon,IconFileName,IconIndex,IconLabel,NoHTMLFormatting)
expression 必需。
该表达式返回一个Worksheet对象。
Format Variant类型,可选。
指定数据的剪贴板格式的字符串。
Link Variant类型,可选。
若为True,则建立与被粘贴数据的源之间的链接。
如果源数据不适于链接,或源应用程序不支持链接,将忽略本参数。
默认值为False。
DisplayAsIcon Variant类型,可选。
若为True,则将粘贴内容显示为图标。
默认值为False。
IconFileName Variant类型,可选。
如果DisplayAsIcon为True,则指定包含所用图标的文件名。
IconIndex Variant类型,可选。
图标文件内的图标索引号。
IconLabel Variant类型,可选。
图标的文本标签。
NoHTMLFormatting Variant类型,可选。
若为True,则从HTML中删除所有的格式设置、超链接和图像。
若为False,则完整粘贴HTML。
默认值为False。
说明
注意 当Format=“HTML”时,NoHTMLFormatting才起作用。
在所有其他情况下,NoHTMLFormatting将被忽略。
必须在使用本方法之前选定目标区域。
本方法可能会更改工作表的选定区域,这取决于剪贴板中的内容。
ExcelVBA教程:
PasteSpecial方法·示例
应用于Range对象。
本示例用Sheet1上单元格区域C1:
C5和单元格区域D1:
D5原有内容的和来取代单元格区域D1:
D5中的数据。
WithWorksheets("Sheet1")
.Range("C1:
C5").Copy
.Range("D1:
D5").PasteSpecial_
Operation:
=xlPasteSpecialOperationAdd
EndWith
应用于Worksheet对象。
本示例将剪贴板中的MicrosoftWord文档对象粘贴到Sheet1上的单元格D1中。
Worksheets("Sheet1").Range("D1").Select
format:
=_
"MicrosoftWordDocumentObject"
本示例粘贴相同的MicrosoftWord文档对象,并将其显示为图标。
Worksheets("Sheet1").Range("F5").Select
_
Format:
="MicrosoftWordDocumentObject",_
DisplayAsIcon:
=True
ExcelVBA教程:
Paste方法
应用于Chart对象的Paste方法。
将剪贴板中的图表数据粘贴到指定的图表中。
(Type)
expression 必需。
该表达式返回一个Chart对象。
Type Variant类型,可选。
如果剪贴板中有图表,本参数指定要粘贴的图表信息。
可为以下XlPasteType常量之一:
xlFormats、xlFormulas或xlAll。
默认值为xlAll。
如果剪贴板中是数据不是图表,则不能使用本参数。
说明
本方法将更改当前的选定区域。
应用于Floor、Point、Series和Walls对象的Paste方法。
对于Floor和Walls对象,将剪贴板中的图片粘贴到选定图表的基底或背景墙上。
对于Point和Series对象,将剪贴板中的图片作为标志粘贴到选定的数据点或系列上。
本方法可用于柱形图、条形图、折线图或雷达图,并且将MarkerStyle属性设置为xlMarkerStylePicture。
expression 必需。
该表达式返回上面的对象之一。
应用于SeriesCollection对象的Paste方法。
将剪贴板中的数据粘贴到指定的系列集合中。
(Rowcol,SeriesLabels,CategoryLabels,Replace,NewSeries)
expression 必需。
该表达式返回一个SeriesCollection对象。
Rowcol XlRowCol类型,可选。
指定对应于特定数据系列的数值是处于行中还是列中。
SeriesLabels Variant类型,可选。
若为True,则用每一行的第一列(或每一列的第一行)中的单元格内容作为该行(或列)中数据系列的名称。
若为False,则用每一行的第一列(或每一列的第一行)中的单元格内容作为数据系列的第一个数据点。
默认值为False。
CategoryLabels Variant类型,可选。
若为True,则用选定区域的第一行(或第一列)中的内容作为图表的分类。
若为False,则用选定区域的第一行(或第一列)中的内容作为图表的第一个数据系列。
默认值为False。
Replace Variant类型,可选。
若为True,则在用被复制区域的信息取代现有的分类时应用分类。
若为False,则插入新分类而不替换任何原有分类。
默认值为True。
NewSeries Variant类型,可选。
若为True,则将数据作为新系列粘贴。
若为False,则将数据作为原有系列的新数据点粘贴。
默认值为True。
应用于Worksheet对象的Paste方法。
将剪贴板中的内容粘贴到工作表上。
(Destination,Link)
expression 必需。
该表达式返回一个Worksheet对象。
Destination Variant类型,可选。
Range对象,指定用于粘贴剪贴板中内容的目标区域。
如果省略本参数,就使用当前的选定区域。
仅当剪贴板中的内容能被粘贴到某区域时,才能指定本参数。
如果指定了本参数,就不能使用Link参数。
Link Variant类型,可选。
若为True,就建立与被粘贴数据的源之间的链接。
如果指定了本参数,就不能使用Destination参数。
默认值为False。
说明
如果未指定Destination参数,那么必须在使用本方法之前选定目标区域。
本方法可能会修改工作表的选定区域,这取决于剪贴板中的内容。
ExcelVBA教程:
Paste方法·示例
应用于Chart对象。
本示例将Sheet1上单元格区域B1:
B5中的数据粘贴到Chart1中。
Worksheets("Sheet1").Range("B1:
B5").Copy
Charts("Chart1").Paste
应用于Point或Series对象。
本示例将剪贴板中的图片粘贴到Chart1上的第一个系列中。
Charts("Chart1").SeriesCollection
(1).Paste
应用于SeriesCollection对象。
本示例将剪贴板中的图片粘贴到Chart1上的第一个系列中。
Worksheets("Sheet1").Range("C1:
C5").Copy
Charts("Chart1").
应用于Worksheet对象。
本示例将Sheet1上单元格区域C1:
C5中的数据复制到单元格区域D1:
D5中。
Worksheets("Sheet1").Range("C1:
C5").Copy
Destination:
=Worksheets("Sheet1").Range("D1:
D5")
自己测试:
一、选择性粘贴——全部:
Range("D8").Select
Range("D11").Select
Paste:
=xlPasteAll,Operation:
=xlNone,SkipBlanks:
=_
False,Transpose:
=False
EndSub
二、选择性粘贴——数值
Range("D14").Select
Paste:
=xlPasteValues,Operation:
=xlNone,SkipBlanks_
:
=False,Transpose:
=False
EndSub
三、选择性粘贴——公式
Range("D8").Select
Paste:
=xlPasteFormulas,Operation:
=xlNone,_
SkipBlanks:
=False,Transpose:
=False
EndSub
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VBA 选择性 粘贴