word文档怎么缩放剪贴画

1.Office文档缩放打印三招具体是什么呢

最近，小贾碰到了一个难题，事先编辑好的一张Excel表格，恰好容纳在一张B4纸上，现在需要将纸型改为A4，但仍要打印在一张纸上，这可让小贾犯难了。

因为通过缩小字号、调整列宽、行距等常规手段将文件缩小到A4的纸面上，实在有些麻烦。于是，小贾选择了一个笨办法，将表格打印到B4纸上，再使用复印机缩小到A4纸上。

其实，当遇到这样的问题时，大家不必如此兴师动众，因为我们有以下简单的处理方法。 让Excel按照纸张的宽度和高度打印 1。

启动Excel，打开需要的工作簿文件，单击相应的工作表。 2。

在“文件”菜单上，单击“页面设置”，再单击“页面”选项卡。 3。

在“纸张大小”框中，将原来的B4设置为A4，然后在“缩放”栏下，选中“调整为”，将“页宽”和“页高”两个输入框中的数字都设为“1”（图1）。 图1 4。

单击“确定”按钮。现在，再打印这张Excel表格，一张A4纸即可容纳下整个表格内容了。

实际上，在进行上述设置后，Excel会按照需要缩小打印图像和文本。具体的缩小百分比，可以通过打开“页面设置”对话框，在“页面”选项卡上的“缩放比例”框中查看。

如果文件中有手动分页设置，那么在使用“调整为”选项后，它们将被忽略。 让Word按纸张大小“缩放”打印 小贾遇到的问题是Excel表格的“缩放”打印，如果你编辑的Word表格遇到了同样的问题，解决的办法与Excel有所不同。

具体方法如下： 1。启动Word，打开需要的文档。

2。在“文件”菜单中，单击“打印”命令。

图2 4。单击“确定”按钮。

当为了打印而“缩放”文档时，改动只发生在打印时，Word并未更改文档本身的设置，这一点与Excel不同，因为Excel同时改变了对工作表的设置。 对Word而言，上述过程仅调整本次打印的文档比例。

若要以这种方式调整所有打印时段的文档比例，可在“工具”菜单上单击“选项”，然后单击“打印”选项卡，选中“允许重调A4/Letter纸型”项。 让打印机自动按纸张大小打印 或许，你编辑表格所用的软件没有提供“缩放”打印的功能，比如有的财务软件生成的B4纸型的会计报表怎样打印到A4纸上呢？此时，我们可以直接求助所用的打印机，将打印机设置为缩小打印。

现在，我们以EPSON Stylus Photo 1290打印机（操作系统为Windows XP SP2）为例进行说明。 1。

单击“开始”，选择“设置”，单击“打印机和传真”。 2。

右键单击EPSON Stylus Photo 1290打印机，然后选择快捷菜单中的“属性”。 3。

在“常规”选项卡中单击“打印首选项”按钮。 4。

进入“版面”选项卡，勾选“缩放”项，同时选中“充满”，然后在“输出纸张尺寸”框中选择A4纸型。 5。

依次单击“确定”按钮，关闭各个对话框。 经过上述设置之后，当进行打印时，系统将自动对打印的内容进行“缩放”以便将它打印在A4纸上。

特别要提醒大家的是，如果以后不需要将打印内容“缩放”到A4纸上，需要按上述操作取消对“缩放”项的选择，否则打印机将一直进行“缩放”打印。 将文档进行“缩放”打印既省去了调整的麻烦，又能够减少纸张的浪费，何乐而不为呢？。

2.如何在word中批量修改图片大小Word中怎么批量修改图片固定大

如何在word中批量修改图片大小 Word中怎么批量修改图片固定大小。

相信很多人都使用过电脑中的word文档功能，因为这对于很多人来说都会经常用到的，非常的具有实用性。 解决：按alt F11。

然后在project右键插入模块，然后粘贴Sub Macro() Mywidth = 4。 13 Myheigth = 5。

48 For Each iShape In ActiveDocument。InlineShapesiShape。

Height = 28。345 * Myheigth iShape。

Width = 28。345 * Mywidth Next iShape End Sub 再按F5，就行了。

其中Mywidth = 4。13,Myheigth = 5。

48这里的数字你自己改大小。 固定长宽方法： 1、打开word，工具-宏-宏（或者直接按Alt F8）进入宏的界面，如下面所示，输入一个宏名，宏名自己起，能记住就行！ 2、宏名起好了，单击“创建”进入Visual Basic 编辑器，输入如下代码并保存Sub setpicsize（) '设置图片大小 Dim n '图片个数 On Error Resume Next '忽略错误 Forn = 1 ToActiveDocument。

InlineShapes。Count 'InlineShapes类型图片ActiveDocument。

InlineShapes(n)。Height = 400 '设置图片高度为 400pxActiveDocument。

InlineShapes(n)。 Width = 300 '设置图片宽度 300pxNextn Forn = 1 ToActiveDocument。

Shapes。Count 'Shapes类型图片ActiveDocument。

Shapes(n)。Height = 400 '设置图片高度为 400pxActiveDocument。

Shapes(n)。Width = 300 '设置图片宽度 300pxNextn End Sub 3、返回word，工具-宏-宏（或者直接按Alt F8），再次进入宏的界面，选择刚才编辑好的宏，并单击“运行”按钮，就可以了！（图片多时，可能会花一些时间）按比例缩放方法 这部分要说的是把word中的所有图片按比例缩放！ 具体操作同上，只是代码部分稍做修改，代码如下： Sub setpicsize（) '设置图片大小 Dim n '图片个数 Dimpicwidth Dimpicheight On Error Resume Next '忽略错误 For n = 1 ToActiveDocument。

InlineShapes。Count 'InlineShapes类型图片picheight = ActiveDocument。

InlineShapes(n)。Heightpicwidth = ActiveDocument。

InlineShapes(n)。 WidthActiveDocument。

InlineShapes(n)。Height = picheight * 1。

1 '设置高度为1。1倍ActiveDocument。

InlineShapes(n)。Width = picwidth * 1。

1 '设置宽度为1。1倍Nextn For n = 1 To ActiveDocument。

Shapes。Count 'Shapes类型图片picheight = ActiveDocument。

Shapes(n)。Heightpicwidth = ActiveDocument。

Shapes(n)。WidthActiveDocument。

Shapes(n)。Height = picheight * 1。

1 '设置高度为1。1倍ActiveDocument。

Shapes(n)。Width = picwidth * 1。

1 '设置宽度为1。1倍Nextn End Sub 若还想使所有图片居中对齐，可在循环中加入下面的语句： ActiveDocument。

InlineShapes(n)。Range。

ParagraphFormat。Alignment= '左对齐：wdAlignParagraphLeft 注意：这里的Shapes(InlineShapes)不仅仅是指图片，也包含其它的，自选图形、任意多边形、OLE 对象、ActiveX 控件、图片等。

好了，word批量修改图片大小的方法就是这样的了，这两种方法各有千秋，大家可以根据情况自行选择哦。