EXCEL批量重命名

利用EXCEL为照片批量重命名

一、准备照片。事前将扫描好的图片按顺序排好序列，将图片文件拷到电脑上备用，如存放在“D：\\订单\\1.20”文件夹内。

二、巧用EXCEL填充柄，批量建立改名命令行。第一步：打开EXCEL软件。在A列中输入图片名“DSCN0001．JPG”，然后用填充柄向下拖动，一直到合适的数字为止。然后，在B列中“命名字”等信息输入“13118120100001．JPG”并用填充柄向下拖动直到合适的位置停止。第二步：在C列中输入以下内容“=\\\下输入）后按下回车键，即可出现相应结果。第三步：向下拖动该单元格的填充柄，直至对应左侧的内容。最终效果如图所示。最后将C列中的全部内容选中并进行复制。●这是利用EXCEL填充句柄批量生成的重命名命令。

四、建立“重命名”批处理命令。

在D：\\订单\\1.20文件夹下单击鼠标右键，选择新建“文本文档”命令。然后将该文件名改为“重命名．BAT”。右击该文件，选择“编辑”命令，进入该批处理文件的编辑状态。在编辑空白区右击，选择“粘贴”，将刚才EXCEL文件中C列中的内容复制到这里。然后存盘并退出。 五、运行“重命名．BAT”进行批量更名。

回到“D：\\订单、1.20”文件夹后，直接双

简要介绍资料的主要内容,以获得更多的关注

EXCEL中如何批量删除超链接

从网上复制出来的资料 难免总是有很多超链接 会让文件很大 而且如果不用outlook时 还非常不方便

而一个个删除又太麻烦

方法一：

一：选择“工具”—“宏”—“录制新宏”

二：在“录制新宏”的对话框中给宏取个名字，比如就叫“批量去除超级链接”

三：然后按“确定”后出现一个录制宏的小方框，小方框内只有“停止录制”“与相对引用”两个按钮

四：为了方便省事，直接按“停止录制”，因为在后面我们可以对宏进行直接编辑

五：选择“工具”—“宏”—“宏”

六：在“宏”名中选择之前取的那个宏名“批量去除超级链接”，然后点右边的“编辑”

七：在接下来出现的对话框中输入以下的代码然后关闭对话框

（清空之前的内容输入:）

Sub 批量删除自动生成的链接()

Cells.Hyperlinks.Delete

End Sub

八：选择“工具”—“宏”—“宏”，然后按“执行”就可以批理删除当前的工作表中所有超级链接 方法二：

按下“Alt+F8”打开宏窗口，在“宏名”处输入一个名称后单击“创建”（注意创建命令的要能使用的前提是当前没有任何宏，如果之前已经创建了一个宏，那么这个“创建”按钮将是灰色的不可用，方法是可以先将之前的创建的所

UG二次开发中主模型重命名实现

瞿文燕

摘要:UG文件引用关系使得UG文件重命名成为问题，本文介绍可以用于UG文件重命名的三种方法，根据装配件及其他引用文件同步更改的要求，最终选定装配克隆操作。本文详细介绍了包括图纸文件和装配文件的克隆装配实现方法。 关键词：UG/Open；装配克隆；重命名

Abstract: It makes UG file renaming as a problem because the rename lost the reference information in the file. It introduce three methods which been used in UG file rename. We choose the assemble clone method for reference information altered synchronous in assemble file and other file which relates to it. We introduce the draft and assemble clone method carefully.

Keywords: UG/

UG二次开发中主模型重命名实现

瞿文燕

摘要:UG文件引用关系使得UG文件重命名成为问题，本文介绍可以用于UG文件重命名的三种方法，根据装配件及其他引用文件同步更改的要求，最终选定装配克隆操作。本文详细介绍了包括图纸文件和装配文件的克隆装配实现方法。 关键词：UG/Open；装配克隆；重命名

Abstract: It makes UG file renaming as a problem because the rename lost the reference information in the file. It introduce three methods which been used in UG file rename. We choose the assemble clone method for reference information altered synchronous in assemble file and other file which relates to it. We introduce the draft and assemble clone method carefully.

Keywords: UG/

关键词：Excel;批量插入/添加图片;数据分析;张立良老师;数据小兵工作中经常需要在excel表格中插入对应的图片,一张、两张、三张、、、一张一张的插入你觉得已经够完美的了,遗憾的是,如果你遇到需要一次性大批量插入100张、1000张图片时,也是重复插入100次、1000次么？答案是你可以这么做,等到手抽筋的时候你大概会想,要是有一种方法大批量插入该有多好!——有!

Excel中如何实现批量插入图片？

关键词：Excel；批量插入/添加图片；数据分析；张立良老师；数据小兵

实际需求是推动持续学习与创新的最大动力。工作中经常需要在excel表格中插入对应的图片，一张、两张、三张、、、一张一张的插入你觉得已经够完美的了，遗憾的是，如果你遇到需要一次性大批量插入100张、1000张图片时，也是重复插入100次、1000次么？答案是你可以这么做，等到手抽筋的时候你大概会想，要是有一种方法大批量插入该有多好！——有！

我自己惯性的插入三张图片后，我开始抱怨微软太不尽人意了。为什么没有批量插入图片的功能？于是我把问题推给了百度和谷歌，两位老大哥很快给出了答案——批量插入图片的宏、批量插入图片的小插件，惊喜下，试了各种方法，新浪博主ahzll的excel工具箱（

简要介绍资料的主要内容,以获得更多的关注

EXCEL中如何批量删除超链接

从网上复制出来的资料 难免总是有很多超链接 会让文件很大 而且如果不用outlook时 还非常不方便

而一个个删除又太麻烦

方法一：

一：选择“工具”—“宏”—“录制新宏”

二：在“录制新宏”的对话框中给宏取个名字，比如就叫“批量去除超级链接”

三：然后按“确定”后出现一个录制宏的小方框，小方框内只有“停止录制”“与相对引用”两个按钮

四：为了方便省事，直接按“停止录制”，因为在后面我们可以对宏进行直接编辑

五：选择“工具”—“宏”—“宏”

六：在“宏”名中选择之前取的那个宏名“批量去除超级链接”，然后点右边的“编辑”

七：在接下来出现的对话框中输入以下的代码然后关闭对话框

（清空之前的内容输入:）

Sub 批量删除自动生成的链接()

Cells.Hyperlinks.Delete

End Sub

八：选择“工具”—“宏”—“宏”，然后按“执行”就可以批理删除当前的工作表中所有超级链接 方法二：

按下“Alt+F8”打开宏窗口，在“宏名”处输入一个名称后单击“创建”（注意创建命令的要能使用的前提是当前没有任何宏，如果之前已经创建了一个宏，那么这个“创建”按钮将是灰色的不可用，方法是可以先将之前的创建的所

利用Excel批量快速发送电子邮件，分两步：

1. 准备待发送的数据：

a.) 打开Excel，新建Book1.xlsx b.) 填入下面的内容，

第一列：接收人，第二列：邮件标题，第三列：正文，第四列：附件路径 注意：附件路径中可以有中文，但是不能有空格

这里你可以写更多内容，每一行作为一封邮件发出。

注意：邮件正文是黑白文本内容，不支持加粗、字体颜色等。（如果你需要支持彩色的邮件，后面将会给出解决办法）

2. 编写宏发送邮件

a.) Alt + F11 打开宏编辑器，菜单中选：插入->模块 b.) 将下面的代码粘贴到模块代码编辑器中：

?代码list-1

Public Declare Function SetTimer Lib \

(ByVal hwnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerfunc As Long) As Long

Public Declare Function KillTimer Lib \

(ByVal hwnd As Long, ByVal nIDEvent A

替换word文本框内容

创建以下宏

Sub 替换word文本框内容()

Dim mShape As Shape

Dim tmpString As String

For Each mShape In ActiveDocument.Shapes If mShape.Type = msoTextBox Then

tmpString = mShape.TextFrame.TextRange.Text

mShape.TextFrame.TextRange.Text = Replace(tmpString, "查找内容", "替换内容") End If

Next

End Sub

将查找内容跟替换内容更换即可

替换EXCEL文本框内容 Sub 文本框批量修改文字()

Dim tb As Object

For Each tb In ActiveSheet.Shapes If tb.Type = msoTextBox Then

tb.DrawingObject.Caption = Replace(tb.DrawingObject.Caption, "查找内容", "替换内容")

通过EXCEL宏和SAP Script进行批量业务处理

SAP提供了很多批量导入的工具，但问题是一般情况下不会赋予普通用户这些权限，因此我结合EXCEL VBA和SAP Script功能整理出一个简易的批量业务处理方式，供大家参考 ? 使用SAP Script Recording功能录制SAP操作，生成代码块 1. 激活SAP Script Recording

2. 选择存放路径和script代码块文件名称

3. 点击开始录制SAP操作，建议以”/N”+事务代码，以保存为结尾。生成如下程序

代码文件，可以用文本编辑器打开

? 通过EXCEL VBA编写宏代码，用于读取数据模板和导入SAP 1. 进入VBA编辑视图

2. 复制Script代码块中的代码，并做以下适当修改：

a) 在两个\和 \之前加入\

b) 修改录制中的固定值，改为模板中的相应字段，如 Range(\等 c) 如有更为复杂的数据处理需求，可以在宏代码中加入适当的判断或者循环语句

? 以下代码用于修改物料主数据的，前段和末端代码可以沿用，只需用script代码覆盖

病修改中段原代码即可。供参考。

Sub EXCEL_to_SAP()

yes_No = MsgBox(\If yes

Excel 2003：

1.准备数据。

由于要在最后一步要一次删除所有数据透视表，因而除了在A列中准备工作表名称外，还需在B列中准备一些数据，其中B1为列标题，从B2开始的数据可以为任意数值，本例为一些简单的数字，如图。

2.选择上述某个已输入数据的单元格，单击菜单“数据→数据透视表和数据透视图”，在弹出的对话框中单击“完成”。Excel会在一个新工作表中建立数据透视表

。

3.在“数据透视表字段列表”中，将“城市”字段拖动到上方的“页面区域”中。将另一个字段拖到“数据区域”中。

这时的数据透视表如下图：

4.保持数据透视表的选择状态，在“数据透视表”工具栏中单击“数据透视表→分页显示”。如果“数据透视表”工具栏没有出现，可以单击菜单“视图→工具栏→数据透视表”让其显示出来。

弹出“分页显示”对话框，单击“确定”。

这时Excel会自动在工作簿中插入相应数量的新工作表，工作表的名称为步骤1中A列所指定的名称。

5.删除数据透视表。

这时每个新工作表中都包含一个数据透视表，需将其全部删除。选择第一张工作表，然后按照Shift键，单击最后一个新插入的工作表，同时选择这些新插入的工作表，使其成为一个工作组。如果最后一个新插入的工作表不可以见，可以单击工作表标签左侧的箭头