有啊,photoshop就可以同想操作,
具体操作:
在photoshop打开你要改的第一张图片,按F9新建一个动作,把快捷键设成F2-F9随便你,然后你把你要改的最精彩的电影下载改成你要改的内容,改好了以后你就可以把动作记录结束,
后面的图片你就可以打开一张安下你设定的快捷键就会自动改了,
还可以更快,那就是在文件→自动→批量处理
打开批量处理后,你选取你要改的文件夹(装着你所有要改的图片的文件夹)
在目的里面选文件夹(就是你要保存的文件夹最好重建一个,你原来的文件不要变)保险一些,
希望对你有帮助
同一个word文档页眉页脚如何批量修改,一个一个修改太麻烦,有批量修改么
方法1、如果你的页眉页脚是统一的一致的,那么你可以将文档中的分节符替换为分页符,替换方法是:ctrl+h调出替换对话框
查找内容输入:^m
替换为输入:^m
高级或更多选择“使用通配符”,点击全部替换
方法2、如果你的页眉页脚是不完全一致的,而你需要修改的内容是一直的,那么直接用替换命令进行替换,但要注意的是,需要逐个查找后替换,避免将正文中的内容也替换掉了。
谢谢你的帮助哦 可是还有个问题 替换是能替换了 但是源文档一个页眉页脚均有两个地方填写的 一个是电话 一个是QQ 替换的时候 QQ那框架不够大 我新修改的页眉页脚显示不完整咋办呢
这个就比较麻烦了,你只能手动将文本框一个一个的调大些。
怎么实现批量的word文档的替换,替换的都是页眉上一样的内容?具体该怎么操作啊?
你是有很多的 word文档?都需要替换?
百度“Word文档批量处理大师软件 V7.3.6 官方免费版 ”
提供了30多个批量任务选项,如:内容替换、格式设置、页面设置、页眉页脚水印处理、属性设置、图片设置及替换、超链接替换及清除、word转图片、word转PDF、打印、插入、合并、权限及密码设置、文件更名等
公司给usb接口禁了不让用,网卡也禁了,没法下软件啊.....
那你们公司的电脑资料 从不出内网??你在哪里上网呢??
要不,下载后刻光盘(自己刻也就1元钱),用光驱安装。
你也可以和公司管理员联系,让他临时启用USB接口。
批量修改WORD文件的页眉页脚
材料/工具:word2010
1、打开文档页面。随意打开文档其中的一个页面,如图所示,接下来将“经典故事大讲堂”改成“小故事大讲堂”。
2、进入页眉修改页面。将鼠标移到所示位置,也就是说移到页边距的中间位置,不能离开这个区域太远,否则双击无效。
3、修改页眉。将鼠标选中要修改的内容,将“经典故事”改为“小故事”即可。
4、返回页面。修改完之后将鼠标移到空白区域,双击鼠标,可以看到如下图所示内容。说明该页修改成功。
5、浏览其他页面。修改完了之后浏览其他页面,如图所示为文档第二页,看看是否修改成功。
怎样批量更改WORD文件的页眉和页脚
录制一个插入页眉的宏,设置为auto_open名,到管理器中把此宏复制到NORMAL.dot中,然后逐个文件打开,保存就可。试一试
多个word文档可以批量修改页眉页脚吗?
每个文档需要单独修改页眉页脚。
每个文档的页眉页脚修改是批量的,修改一个,至少一节的页眉页脚都统一了。
修改时注意两个地方,如果不想后面的页眉与前面的一样,要取消链接到前一条页眉
如果要修改页码顺序,注意修改页码格式。
各位大侠们,求批量替换文件夹内所有Word文档页眉中的Logo图片得宏代码
假如我手上有500个word文档需要删除页眉页脚
先把需要删除页眉页脚的500个word文档放在一个文件夹下,然后打开其中一个文档
在打开的文档中,选择在“工具”菜单中选择“宏”--“宏”
随后弹出“宏”对话框,在宏名中输入"Application",最后点击"创建"按钮
随后弹出“Microsoft visual basic”设计,在编辑处输入如下代码
Sub 批量删除Word页眉页脚()
Application.ScreenUpdating = False
Dim MyPath As String, i As Integer, myDoc As Document
With Application.FileDialog(msoFileDialogFolderPicker)
.Title = "选择要处理目标文件夹" & "——(删除里面所有Word文档的页眉页脚)"
If .Show = -1 Then
MyPath = .SelectedItems(1)
Else
Exit Sub
End If
End With
With Application.FileSearch
.LookIn = MyPath
.FileType = msoFileTypeWordDocuments
If .Execute > 0 Then
For i = 1 To .FoundFiles.Count
Set myDoc = Documents.Open(FileName:=.FoundFiles(i))
' B可以替换的宏
' 以下是处理格式所录制的宏,可根据所需录制
If ActiveWindow.View.SplitSpecial <> wdPaneNone Then
ActiveWindow.Panes(2).Close
End If
If ActiveWindow.ActivePane.View.Type = wdNormalView Or ActiveWindow. _
ActivePane.View.Type = wdOutlineView Then
ActiveWindow.ActivePane.View.Type = wdPrintView
End If
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
Selection.WholeStory
Selection.Delete Unit:=wdCharacter, Count:=1
Selection.WholeStory
With Selection.ParagraphFormat
.Borders(wdBorderLeft).LineStyle = wdLineStyleNone
.Borders(wdBorderRight).LineStyle = wdLineStyleNone
.Borders(wdBorderTop).LineStyle = wdLineStyleNone
.Borders(wdBorderBottom).LineStyle = wdLineStyleNone
With .Borders
.DistanceFromTop = 1
.DistanceFromLeft = 4
.DistanceFromBottom = 1
.DistanceFromRight = 4
.Shadow = False
End With
End With
With Options
.DefaultBorderLineStyle = wdLineStyleSingle
.DefaultBorderLineWidth = wdLineWidth075pt
.DefaultBorderColor = wdColorAutomatic
End With
If Selection.HeaderFooter.IsHeader = True Then
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter
Else
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
End If
Selection.WholeStory
Selection.Delete Unit:=wdCharacter, Count:=1
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
Selection.Sections(1).Footers(1).PageNumbers.Add PageNumberAlignment:= _
wdAlignPageNumberRight, FirstPage:=True
' 以上可以换成是你自己录制的宏
' C公共部分的代码
Application.DisplayAlerts = False '强制执行“是”
'ActiveDocument.Saved = True'强制执行“否”
ActiveDocument.Close '退出
Next
End If
End With
Application.ScreenUpdating = True
MsgBox "所选Word文档的页眉页脚已删除!!!", 64, "☆★批量处理完毕★☆"
End Sub
Sub ConvertEqns()
'
' ConvertEqns Macro
' 宏在 2014-6-25 由 USER 创建
'
End Sub
输入代码后,关闭窗口返回文档,重新选择在“工具”菜单中选择“宏”--“宏”,在弹出的宏名中选择"批量删除Word页眉页脚",最后点击“运行”---确认即可快速地删除500个Word页眉页脚
资源来自网络
转载请注明出处51数据库 » 批量替换word页眉 批量替换word文档页眉上的字