求助：Excel中出现奇怪的图片，无法删除

fallegend · 发表于 2004-7-8 10:07

gJsI3gQ8.zip (2.62 KB, 下载次数: 56)

fallegend · 发表于 2004-7-8 10:38

哦，原来是有限的啊，我删了几次觉得没变化呐，多谢啦。

gdliyy · 发表于 2004-7-8 12:17

还可以打开绘图工具栏，点选“左下角”的选择图型的“箭头”按钮，直接框选后，删除即可。

办公之星 · 发表于 2004-7-8 12:39

　　　编辑//定位//对象，确定，即完成了全选。删除即可。

fallegend · 发表于 2004-7-8 13:53

以下是引用办公之星在2004-7-8 12:39:00的发言： 　　　编辑//定位//对象，确定，即完成了全选。删除即可。

Sorry，没有找到对象

fallegend · 发表于 2004-7-8 13:54

以下是引用gdliyy在2004-7-8 12:17:00的发言： 还可以打开绘图工具栏，点选“左下角”的选择图型的“箭头”按钮，直接框选后，删除即可。

无法实现这个操作。

fallegend · 发表于 2004-7-8 13:55

以下是引用Emily在2004-7-8 11:19:00的发言：

你可用這方法刪除圖案

Dim Sh As Shape With ActiveSheet TotalShapes = ActiveSheet.Shapes.Count ' 數有多小圖案 For Each Sh In .Shapes If Not Application.Intersect(Sh.TopLeftCell, .Range("A1:B13")) Is Nothing Then Sh.Delete Next Sh End With

Emily，是宏吗？我不会。[em03]我直接存为文本文件，再复制到Excel中。

[此贴子已经被作者于2004-7-8 14:25:24编辑过]

fallegend · 发表于 2004-7-8 14:09

w6NastzP.zip (13.8 KB, 下载次数: 34)

完整的表在这里，帮我看看怎么回事。

Thx

[em04]

fallegend · 发表于 2004-7-8 14:25

我会了，谢谢你！

Emily · 发表于 2004-7-8 17:04

以下是引用fallegend在2004-7-8 13:55:00的发言：

Emily，是宏吗？我不会。[em03]我直接存为文本文件，再复制到Excel中。

抱歉！這是慣性，用上 VBA

		自动登录	找回密码
密码			免费注册