在word中怎么变形状

1.如何将word中的图片尺寸改为480*720

可以用Ctrl 鼠标左键逐个点击有所图片，然后在任意一个上面双击，图片——大小——高度——输入50，确定！ 万能方法： 我知道通过宏可以批量完成一个word中所有图片大小的修改，在次与大家共享，也希望可以给大家参考。

1、Alt F8调出宏编辑窗口 2、点创建按钮，创建新宏，setpicsize，内容如下： Sub setpicsize（) '设置图片大小 ' 宏在 2008-3-31 由 hero_thm 录制 ' Dim j '计数图片个数 For j = 1 To ActiveDocument。 InlineShapes。

Count '文件中图片总个数，图片类型为inlineshapes ActiveDocument。InlineShapes(j)。

Height = 362 '设置高度 ActiveDocument。 InlineShapes(j)。

Width = 481。87 '设置宽度 Next j End Sub 3、保存退出，点运行setpicsize宏，word中所有的图片统一调整为宽17cm，高12。

77cm Sub setpicsize（) '设置图片大小 ' 宏在 2008-3-31 由 hero_thm 录制 ' Dim j '计数图片个数 For j = 1 To ActiveDocument。 InlineShapes。

Count '文件中图片总个数，图片类型为inlineshapes If ActiveDocument。InlineShapes(j)。

Width > 480 Then ActiveDocument。 InlineShapes(j)。

Width = 400 '设置宽度 End If Next j End Sub我知道通过宏可以批量完成一个word中所有图片大小的修改，在次与大家共享，也希望可以给大家参考。 1、Alt F8调出宏编辑窗口 2、点创建按钮，创建新宏，setpicsize，内容如下： Sub setpicsize（) '设置图片大小 ' 宏在 2008-3-31 由 hero_thm 录制 ' Dim j '计数图片个数 For j = 1 To ActiveDocument。

InlineShapes。Count '文件中图片总个数，图片类型为inlineshapes ActiveDocument。

InlineShapes(j)。Height = 362 '设置高度 ActiveDocument。

InlineShapes(j)。Width = 481。

87 '设置宽度 Next j End Sub 3、保存退出，点运行setpicsize宏，word中所有的图片统一调整为宽17cm，高12。 77cm Sub setpicsize（) '设置图片大小 ' 宏在 2008-3-31 由 hero_thm 录制 ' Dim j '计数图片个数 For j = 1 To ActiveDocument。

InlineShapes。Count '文件中图片总个数，图片类型为inlineshapes If ActiveDocument。

InlineShapes(j)。Width > 480 Then ActiveDocument。

InlineShapes(j)。Width = 400 '设置宽度 End If Next j。

2.word文本被转成图片后,怎样才能重新变回去?

我有更简单的办法： 1. 需要安装MS OFFICE2003软件，必须安装Microsoft Office Document Imaging软件。

2.使用Microsoft Office Document Imaging软件打开WORD文本转成的图片，然后应用“工具”菜单中的“用OCR识别文本”，识别后用WORD打开即可大告成功。 特点：因为图片是用WORD转成的，现在应用MS OFFICE软件进行识别，一方面不需要进行扫描，直接就可打开图片格式文件；另一方面识别率非常高。

采用我的办法，保你事半功倍，祝你成功。