时间:2020-06-28 15:37作者:admin来源:未知人气:1263我要评论(0)
本文将讲述如何只将选中的数据区域中的内容和格式到Excel中的另一个区域。如何在Excel 2013/2016中通过使用VBA宏脚本来只复制选中区域中的内容和格式。
假设您要将选定区域中的所有单元格复制到另一个区域中,并且您只想在复制所选单元格范围内内容值和格式。那么您可以使用“选择性粘贴”功能或使用新的VBA宏来完成复制。
要在Excel中仅将值和格式从一个选中区域复制到另一个区域,您可以执行以下步骤:
步骤1:选择一个想要复制的区域,然后按键盘上的Ctrl + C键复制选定的单元格。
步骤2:选择一个要放置拷贝内容的的空白单元格,例如:Cell E1。右键单击它,从右键弹出菜单中选择“选择性粘贴”,然后单击“值和源格式”。
步骤3:您将看到所有值和格式都已复制到另一个范围。
您还可以使用Excel VBA宏仅将选定范围的单元格中的值和格式复制到另一个区域中。只需执行以下步骤:
步骤1:打开您的Excel工作簿,然后单击开发工具选项卡下的“Visual Basic”命令,或者只需按“ALT + F11”快捷方式。
步骤2:然后将出现“Visual Basic编辑器”窗口。
步骤3:单击“插入” – >“模块”以创建新模块。
步骤4:将以下VBA代码粘贴到代码窗口中。然后单击“保存”按钮。
Sub CopyOnlyValuesAndFormat()
Set selectedRange = Application.Selection
Set selectedRange = Application.InputBox("Select one range that you want to copy :", "CopyOnlyValuesAndFormat", selectedRange.Address, Type:=8)
Set dRange = Application.InputBox("Select one blank Cell to palce values:", "CopyOnlyValuesAndFormat", Type:=8)
selectedRange.Copy
dRange.Parent.Activate
dRange.PasteSpecial xlPasteValuesAndNumberFormats
dRange.PasteSpecial xlPasteFormats
Application.CutCopyMode = False
End Sub
Sub CopyOnlyValuesAndFormat()
Set selectedRange = Application.Selection
Set selectedRange = Application.InputBox("Select one range that you want to copy :", "CopyOnlyValuesAndFormat", selectedRange.Address, Type:=8)
Set dRange = Application.InputBox("Select one blank Cell to palce values:", "CopyOnlyValuesAndFormat", Type:=8)
selectedRange.Copy
dRange.Parent.Activate
dRange.PasteSpecial xlPasteValuesAndNumberFormats
dRange.PasteSpecial xlPasteFormats
Application.CutCopyMode = False
End Sub
步骤5:返回当前工作表,然后运行上面的excel宏。点击运行按钮。
步骤6:选择一个要复制的范围。单击确定按钮。
步骤7:选择一个空白单元格来放置值。单击确定按钮。
步骤8:让我们看看结果:
相关阅读 Excel表格数据设置到期自动销毁的方法Excel数据分列的详细使用方法Excel数字乱码怎么办?这样处理1秒解决,完美!Excel办公小技巧,全学会了让你的效率一秒提升!如何解决Excel删除/添加行列序号不会自动排序excel快速合并单元格的3种方法,最后一种效率最高excel如何将阿拉伯数字快速转换为中文大小写格式?excel如何利用公式快速在表格中批量输入五角星的方法如何利用Excel的强大抠图功能,简单2步抠出透明手写艺术签名!分享Excel中的一个神操作,掌握后可快速提高工作效率!
热门文章 excel柏拉图折线如何从0开始Excel 如何将默认粘贴模式改为匹配目标格式Excel表格一格分两格的方法图解教程excel 如何使用数据透视表(Pivot Table)
最新文章
Excel表格数据设置到期自动销毁的方法Excel数据分列的详细使用方法
Excel数字乱码怎么办?这样处理1秒解决,完美!Excel办公小技巧,全学会了让你的效率一秒提升!如何解决Excel删除/添加行列序号不会自动排序excel快速合并单元格的3种方法,最后一种效率最高
人气排行 excel柏拉图折线如何从0开始Excel 如何将默认粘贴模式改为匹配目标格式Excel表格一格分两格的方法图解教程excel 如何使用数据透视表(Pivot Table)Excel中如何插入PDF文件Excel表格在一页A4纸上打印不下去,怎么办?excel保存了却不见了怎么办excel如何将两列数据一一对应
盖楼回复X
(您的评论需要经过审核才能显示)
查看所有0条评论>>