可以借助VBA来强行选择复制，方法如下： 一、按ALT+F11 打开VB编辑器； 二、双击左边靠上的【工程资源管理器】中的【Microsoft Excel 对象】中的ThisWorkbook(如果找不到【工程资源管理器】请按CTRL+R)，在右边的代码窗口贴入下面的代码：（根据实际情况按代码说明修改a、b的值，""中的内容） Sub 强行复制() '修改以下两行""中的工作表名字 Dim a As String: a = "Sheet1" '修改成你需要复制的表名 Dim b As String: b = "Sheet2" '修改成粘贴的空白表名 '以下不需要修改 Sheets(a)CCopy Sheets(b)Range("A1")Select ActiveSPaste End Sub 三、回到EXCEL表，运行菜单 【工具】－【宏】－【宏】，选择 强行复制 这条宏，然后按执行。 四、假如有提示说宏的安全性被限制此类的信息，请在工具栏－【宏】－【安全性】里面把【安全级】设置为【中】。
旅游新四力
