急!类range的PasteSpecial方法无效?

weikunlun 2006-05-11 04:08:52

vb代码写的
xlSheetB.Range("A5:AV56").Select
xlSheetB.Range("A5:AV56").Copy
xlSheetA.Range("A" & 5).Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False

另如何将xlSheetB的第56行的求和公式(sum)也能复制到xlSheetA.我录制的宏是xlSheetA.Paste,但是只有数字,没有公式.vb代码控制复制粘贴

...全文

743 1 打赏收藏转发到动态举报

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

zechenli 2006-05-11

打赏
举报

回复

要先Group并set为新的Shape，再copy和 pastespecial就可以了

04190复制单元格的值（PasteSpecial方法） 04191复制单元格的值（Value属性） 04192复制单元格的数据和公式（去掉前缀字符） 04193复制单元格的数据和公式（保留前缀字符） 04194复制单元格的格式 04195复制单元格的...

环境说明： VS2013(C#) + Office2013 Bug说明： ...range2.PasteSpecial(Excel.XlPasteType.xlPasteValues, Excel.XlPasteSpecialOperation.xlPasteSpecialOperationNone, false, false); 其中 r...

问题：导出excel时，提示“类range的select方法无效”。解决方法：在Range.Select();方法前添加this.worksheet.Activate();

Sub online() Windows("bondCahed.xls").Activate If ActiveSheet.FilterMode = True Then... ActiveSheet.Range("A:AH").AutoFilter Field:=21, Criteria1:=Array( _ "结清", "结清代偿", "正常")

使用此方法进行粘贴时，出现了1004 range类 paste special error.当复制文本进行粘贴时，此方法会报1004的错误。当复制单元格进行粘贴时，此方法运行不会报错。

Office开发/ VBA

5,140

社区成员

17,886

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章