word单击图片运行代码

⑴ word文档里插入的图片或超链接显示为代码

如果是想临时切换，就在代码处点右键，选择“切换域代码”，如果是想总是不显示为代码，[工具]-[选项]-[视图]，把”显示“那里的”域代码“前面的勾取消掉。

⑵ word文档中复制图片到里面显示代码怎么办

你这不是插入图片，而是插入了一个文件对象。如果你想在Word里面直接插入图片，就选择“插入”-“图片”然后选择要插入的图片文件。这样就能直接在Word里面显示图片内容而不是一个文件对象。或者你用画笔或其他什么工具直接打开这个图片文件，拷贝图片内容再到Word里面粘贴。

⑶ word宏代码--选中的图片修改尺寸 代码，不是批量处理

1. VB语言中对图片大小的设置是以原图的长宽等比在缩放，统一设置时默认优先对齐所有图片的“宽度”。
2. ActiveDocument.InlineShapes(n).Range.ParagraphFormat.Alignment= wdAlignParagraphCenter '设置图片居中 可以让图片居中，Left、Right可以分别设置左对齐、右对齐。
3. 全文如果有“手动换行符”↓（代码是^l），设置某一部分居中时会影响漆上下部分的居中与否，因而，如果需要只对图片进行居中，则需先将全文中的↓替换成“段落标记符”（常规回车键，代码是^p）。
4. 这里的Shapes（InlineShapes）不仅仅是指图片，也包含其它的，自选图形、任意多边形、OLE 对象、ActiveX 控件、图片等。
5. InlineShapes类型图片与Shapes类型图片的区别有待研究。
按比例缩放篇代码
Sub setpicsize() '设置图片大小 Dim n
Dim picwidth Dim picheight
On Error Resume Next '忽略错误
For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes类型图片 picheight = ActiveDocument.InlineShapes(n).Height picwidth = ActiveDocument.InlineShapes(n).Width

ActiveDocument.InlineShapes(n).Height = picheight * 0.6 '设置高度为0.6倍
ActiveDocument.InlineShapes(n).Width = picwidth * 0.6 '设置宽度为0.6倍 Next n
For n = 1 To ActiveDocument.Shapes.Count 'Shapes类型图片 picheight = ActiveDocument.Shapes(n).Height picwidth = ActiveDocument.Shapes(n).Width
ActiveDocument.Shapes(n).Height = picheight * 0.6 '设置高度为0.6倍 ActiveDocument.Shapes(n).Width = picwidth * 0.6 '设置宽度为0.6倍 Next n End Sub

⑷ word文档中复制图片到里面显示代码怎么办

这不是代码，是照片名字，你直接把照片拉到word里面的话word是连接到这个图片的。解决方法：在word里面点击，插入---图片。这样插进去的图片就不是连接上去的了。