VBA复制带格式的区域时怎么样才能既复制内容也可以复制格式？

山间竹笋 2015-07-18 11:28:40

VBA复制带格式的区域时怎么样才能既复制内容也可以复制格式？我用的这个只能复制内容,需要在2个不同的工作簿之间复制。
ThisWorkbook.Sheets("汇总").Cells(2, 2).Resize(10,10) = wk.Sheets(“学生A”).Cells(2, 2).Resize(10,10).Value

...全文

3136 9 打赏收藏转发到动态举报

写回复

用AI写文章

9 条回复

切换为时间正序

请发表友善的回复…

发表回复

山间竹笋 2015-07-20

打赏
举报

ThisWorkbook.Sheets("汇总").Cells(2, 2).Resize(10, 10).Copy wk.Sheets("学生A").Paste Destination:=wk.Sheets("学生A").Cells(2, 2).Resize(10, 10) 每次都要弹出对话框

山间竹笋 2015-07-20

打赏
举报

Tiger_Zhao 2015-07-20

打赏
举报

    ThisWorkbook.Sheets("汇总").Cells(2, 2).Resize(10, 10).Copy

    wk.Sheets("学生A").Paste Destination:=wk.Sheets("学生A").Cells(2, 2).Resize(10, 10)

of123 2015-07-20

打赏
举报

Sheets("Sheet2").Range("A1").Copy Sheets("Sheet1").Range("B4").Select ActiveSheet.Paste

山间竹笋 2015-07-20

打赏
举报

能详细点吗？

of123 2015-07-20

打赏
举报

用 Range 或 Cells 对象的 Cpoy、Paste 方法试试。

Tiger_Zhao 2015-07-20

打赏
举报

最后加一句

    Application.CutCopyMode = False

山间竹笋 2015-07-19

打赏
举报

ThisWorkbook.Sheets("汇总").Cells(2, 2).Resize(10,10) = wk.Sheets(“学生A”).Cells(2, 2).Resize(10,10).Value 只能复制数值，人民币的符号、百分号都复制不了

山间竹笋 2015-07-19

打赏
举报

求高手，高手在哪里？

利用EXCEL VBA 实现复制自动筛选后的数据区域程序

Excel-VBA宏编程实例源代码-快速复制指定单元格区域.zip

本课程主要结合Excel VBA介绍VBA语言的基本语法，为后面学习Office和WPS Office办公自动化打下基础。相关套餐：所属系列课程：Python+VBA办公自动化系列课程-CSDN程序员研修院。20+课程，不断增加和更新。讲师：童大谦图书《代替VBA！用Python轻松实现Excel编程》和《对比VBA学Python 高xiao实现数据处理自动化》作者。致力于Office和WPS Office办公自动化，提供VBA和Python全系列视频课程。熟悉Power BI, Python, R, SPSS, MATLAB等数据分析软件。有多年VB和.NET软件开发经验。

Excel-VBA宏编程实例源代码-转置复制单元格区域.zip

VBA常用技巧目录第1章 Range（单元格）对象 3 技巧1 单元格的引用方法 3 1-1 使用Range属性 3 1-2 使用Cells属性 4 1-3 使用快捷记号 4 1-4 使用Offset属性 5 1-5 使用Resize属性 6 1-6 使用Union方法 7 1-7 使用UsedRange属性 7 1-8 使用CurrentRegion属性 8 技巧2 选定单元格区域的方法 8 2-1 使用Select方法 8 2-2 使用Activate方法 9 2-3 使用Goto方法 10 技巧3 获得指定行、列中的最后一个非空单元格 10 技巧4 定位单元格 13 技巧5 查找单元格 14 5-1 使用Find方法 14 5-2 使用Like运算符 18 技巧6 替换单元格内字符串 19 技巧7 复制单元格区域 20 技巧8 仅复制数值到另一区域 23 8-1 使用选择性粘贴 23 8-2 直接赋值的方法 24 技巧9 单元格自动进入编辑状态 25 技巧10 禁用单元格拖放功能 25 技巧11 单元格格式操作 26 11-1 单元格字体格式设置 26 11-2 设置单元格内部格式 28 11-3 为单元格区域添加边框 29 11-4 灵活设置单元格的行高列宽 31 技巧12 单元格中的数据有效性 32 12-1 在单元格中建立数据有效性 32 12-2 判断单元格是否存在数据有效性 33 12-3 动态的数据有效性 34 12-4 自动展开数据有效性下拉列表 36 技巧13 单元格中的公式 37 13-1 在单元格中写入公式 37 13-2 检查单元格是否含有公式 38 13-3 判断单元格公式是否存在错误 39 13-4 取得单元格中公式的引用单元格 40 13-5 将单元格中的公式转换为数值 41 技巧14 单元格中的批注 42 14-1 判断单元格是否存在批注 42 14-2 为单元格添加批注 43 14-3 删除单元格中的批注 44 技巧15 合并单元格操作 45 15-1 判断单元格区域是否存在合并单元格 45 15-2 合并单元格时连接每个单元格的文本 46 15-3 合并内容相同的连续单元格 47 15-4 取消合并单元格时在每个单元格中保留内容 49 技巧16 高亮显示单元格区域 50 技巧17 双击被保护单元格时不显示提示消息框 51 技巧18 重新计算工作表指定区域 53 技巧19 录入数据后单元格自动保护 53 技巧20 工作表事件Target参数的使用方法 55 20-1 使用单元格的Address 属性 55 20-2 使用Column属性和Row属性 56 20-3 使用Intersect方法 56

VBA

2,463

社区成员

10,807

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

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

+ 用AI写文章