word里面如何放特别长的图

1.word里面怎么放特别长的图

1、首先在打开的Word文档页面上方工具栏中点击“插入”选项，并点击“图片”选项。

2、选择一张图片插入页面中即可发现此时图片只显示一部分，此时点击图片右上角的布局选项。

3、然后在打开的布局选项窗口中点击“文字环绕”中的一种样式。

4、例如选择了“浮于文字上方”选项，点击后即可将图片完整显示出来了。

2.word怎么将一张图片放到另一张上

word里要把图片浮在另一张图片上，以word2003为例，具体步骤如下：打开word文档，点击菜单栏里的“插入”，选中“图片”，再点击“来自文件”；从电脑上点击选中特定的图片，将两张图片插入到word页面上；双击图片，弹出来“设置图片格式”的窗口，点击“版式”，在“环绕方式”里选择任意一种非嵌入型的方式，比如点击选中“四周型”后，点击“确定”；设置好图片的环绕方式之后，直接用鼠标移动一张图片到另一张图片上去；然后根据实际需要，选中特定的图片，右击鼠标，选中“叠放次序”，在的列表里选择特定的位置选项即可。

3.怎么把许多图片放到word文档中

1、acdsee可以打印缩略图，带文件路径的2、也可以用如下的word宏 Sub 宏1（) ' '成都豺狼 ' pth = "C:\\My Pictures\\" '读入文件的路径 fln = Dir(pth & "*.jpg") '文件类型，没有其它文件，可以只用路径 wdth = ActiveDocument.PageSetup.PageWidth - ActiveDocument.PageSetup.LeftMargin - ActiveDocument.PageSetup.RightMargin hght = ActiveDocument.PageSetup.PageHeight - ActiveDocument.PageSetup.TopMargin - ActiveDocument.PageSetup.BottomMargin a = ActiveDocument.Paragraphs.LineSpacing cnt = 0 Do While Len(fln) > 0 If cnt Mod 6 = 0 Then Selection.MoveRight Unit:=wdCharacter, Count:=1 Selection.TypeParagraph'Selection.InsertBreak Type:=wdPageBreak ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=3, NumColumns:= _ 4, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _ wdAutoFitFixed Selection.Tables(ActiveDocument.Tables.Count).Select Selection.SelectCell Selection.ParagraphFormat.Alignment = Selection.Cells.VerticalAlignment = ActiveDocument.Tables(ActiveDocument.Tables.Count).AllowAutoFit = False ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(3).Select Selection.Orientation = ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(1).Select Selection.Orientation = ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(1).Width = wdth * 0.05 ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(2).Width = wdth * 0.45 ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(3).Width = wdth * 0.05 ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(4).Width = wdth * 0.45 ActiveDocument.Tables(ActiveDocument.Tables.Count).Rows.Height = (hght - a - a) * 0.33 tablebili = ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(2).Width / ActiveDocument.Tables(ActiveDocument.Tables.Count).Rows.Height End If Selection.TypeText Text:=fln Selection.MoveRight Unit:=wdCharacter, Count:=1 Selection.InlineShapes.AddPicture FileName:= _ pth & fln, LinkToFile:=False, _ SaveWithDocument:=True cnt = ActiveDocument.InlineShapes.Count bili = ActiveDocument.InlineShapes(cnt).Width / ActiveDocument.InlineShapes(cnt).Height If tablebili > bili Then '控制图形按纵横比例显示，要拉伸就直接用行高列宽 ActiveDocument.InlineShapes(cnt).Height = ActiveDocument.Tables(ActiveDocument.Tables.Count).Rows.Height ActiveDocument.InlineShapes(cnt).Width = ActiveDocument.InlineShapes(cnt).Height * bili Else ActiveDocument.InlineShapes(cnt).Width = ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(2).Width ActiveDocument.InlineShapes(cnt).Height = ActiveDocument.InlineShapes(cnt).Width / bili End If Selection.MoveRight Unit:=wdCharacter, Count:=1 fln = Dir DoEvents Loop End Sub。