具体方法如下:
1、点击WORD左上角的“工具”按钮,在下拉菜单中点击“选项”;
2、点击“选项”中的“编辑”,在下拉菜单中点击“四周型”;
3、点击上方标题栏中的“插入”,在下拉菜单中选择“图片”—“来自文件”;
4、在出现的“插入图片“对话框中,选择需要插入的图片,点击确定;
5、插入图片后,双击任意一图片,在右上角的格式里,就可以批量设置了。
怎样批量排版Word格式
稍微解释下,就是根据一定的规则将相应单元格位置的值显示出来
先确定数据a列的第一个数字的位置,比如B2,
另外选择一个区域,做横向的数字序列表头,1、2、3、4、5、6、...依次类推,根据有多少行数字/6后取最大的整数,比如21个数字就是1 2 3 4,4个表头,这里1的位置是E2,表格竖向则是固定的6行
在单元格E3 (E2下一行) 里输入公式 =INDIRECT(ADDRESS(ROW($B2)+6*(E$2-1),COLUMN($B2))),注意$符号必须保留且位置正确
横向竖向拖拉公式到其他单元格即可
选中新生成的表格区域,复制,在其他合适的区域,选中单元格,点击右键,直接点击选择性粘贴,选中数值、转置,确定即可
如下图
WORD如何快速排版,整洁漂亮
Word常用排版操作(本人的排版习惯)
假如你从网上下载一篇文章:
1、网上的复制内容,最好是“选择性粘贴”为“无格式”。
2、把所有的空格替换为无。
3、通过数次的替换,把2个回车(段落)(^p)替换为1个。
4、把标题设为:二号、黑体、居中,并与正文空一行。
5、正文设置为:四号、段落首行缩进为2字符,行间距为固定值25磅。
6、若有多页,要设置页码。
7、也可通过设置页边距,调整上下与左右的距离。
word文档批量排版工具或方法
有这中东西一半DTP都失业了
不清楚你都要改哪些东西
可以考虑用宏来实现,或者多利用模板
word怎么把全文排版整齐?
全选文本:
1.编辑—清除—格式。
2.打开替换,上框输入空格,直接全部替换,删除所有多余空格(如果是英文时,只对汉字使用此项)。再在上框中输入^p^p,下框输入^p,全部替换,多替换几次。可批量删除空行。
3.设置段落格式—特殊格式—首行缩进—2字符。设置正文字体和字号。
4.设置各级标题样式
5.设置页眉和页脚。
word 标题排版问题
这可能是标尺上有制表符,办法如下:
1。打开标尺,视图-标尺,可以看到文档上方有一行标尺;
2。将光标移到三级标题文字前面,看一下标尺上有没有黑色的小角
你这样可以调,但是只能一个一个的调,如何批量的调呢(比如点一下标题3,自动把两者之间的距离变成正常)? 另外我觉得出现这个的情况是word给三级标题自动套用了格式,不知道是不是这样。
双击标尺上的制表符,然后,全部清除,重新设置项目编号与文字的制表位置,最后用格式刷将其它的三级编号刷一篇,试试,记住双击格式刷可以使用多次,最后再点一下取消,如果只是单击格式刷,只能用一次。
这其实不是三级标题的问题,而是项目编号的设置问题。
如何快速地排版一篇排版很乱的Word
说起了容易做起来难啊,靠的还是熟能生巧啊!!!!
1、版面结构化:排版者首先要有清晰版面概念,明确文档的版面要求,建立标题、正文、表格、图片、抬头、落款、边框修饰等版面结构要素的样式模板,排版时可以一键到位。结构化要遵循两个原则,一是层次化,即整 篇文档的版面结构要有层次感和立体感,标题是标题,正文是正文,插件是插件,一目了然。二是统一化,既版面结构虽然要有层次区分,但不能太过繁杂,比如字体的样式、大小、颜色设置一般最多两三款,字距行距要统一,整体看起来要干净整洁。
2、操作程序化:遵循先内容后版式的操作顺序。一篇没有多余字符的word文档是进入排版作业前最理想的初始条件,平时要养成习惯,编辑word文档时要先完成所有内容录入工作,不要一边录入一边排版,一般最初录入word文档的文字,保证只有简单分段文字(包括表格),仅此而已。如果上手的文档完全不是你要的版面,你需要做是就是清理,把所有的格式全部清理掉,一般文字处理软件都有一键还原的功能。通常不规范的原始文档还会包含很多与内容无关的字符,比如空格符,占位符,以及其他形形色色的字符,这些字符都可以执行编辑替换指令进行批量清理(参照前面有朋友已经作过的详细介绍)。清理工作完成后你得到的就是一篇素净的文档,也正是你着手排版前所需要的天然原料了。
如何把一个排版类似、较长的word文件,分页批量保存
通常的办法就是把Word每两页拷贝,再新建空白Word文档,粘贴。如果文档页数不算多,也可采用,但是在页数很大的情况下,就不宜采用手工操作。
另外可用VBA来实现批量自动处理。在文档的ThisDocument的代码页中输入以下代码,然后执行Sub SaveParagraph() 即可:
Option Explicit
Sub SaveParagraph()
Dim i As Integer, PageNo As Integer
Dim aDoc As Document
Dim myDoc As Document
Dim sPage As String
Set myDoc = ThisDocument
'文档视图设定为页面方式
ActiveWindow.View.Type = wdPageView
myDoc.Repaginate
'获得文档页数并赋值给变量 PageNo
PageNo = myDoc.BuiltInDocumentProperties(wdPropertyPages)
For i = 1 To PageNo
myDoc.Activate
' 光标移动到文档某一页的开始
Selection.GoTo What:=wdGoToPage, Which:=wdGoToNext, Name:=i
' 全选文档某一页的所有内容
Selection.EndKey Unit:=wdStory, Extend:=wdExtend
sPage = Selection.Text
'保存到一个文件中
Set aDoc = Documents.Add
aDoc.Content.Text = sPage
aDoc.SaveAs FileName:="c:\" & CInt(i) & ".doc"
aDoc.Close
Next
End Sub
楼主可试试这个VBA.
我是了下,第一此提示没有 end sub 我在最后加了一个,然后运行提示for 没有next,请高手测试下,谢谢
转载请注明出处51数据库 » word批量排版标题 word如何排版批量图片
用户65077202





