文档详情

Excel提取文件夹中的所有文件名称[优质课].doc

发布:2017-04-19约3万字共6页下载文档
文本预览下载声明
Excel提取文件夹中的所有文件名称 Excel提取文件夹中的所有文件名称 1、在那个文件夹内新建一个.TXT文件(如wenjian.txt),用记事本单开输入 dir 1.txt 保存退出 将刚才的.TXT(wenjian.txt)更名为.bat文件(wenjian.bat) 双击wenjian.bat文件运行一次,在文件夹内多出一个1.txt文件 打开1.txt文件,将其中的内容粘贴到Excel中,数据——分列处理就可以得到你要的文件名列表了! 2、VBA(2003版) 在那个文件夹下新建Excel文件,打开新建的Excel文件,右击工作表标签(如Sheet1),查看代码——在代码编辑器中输入以下代码 Sub Test() Dim i As Integer Dim strPath As String strPath = ThisWorkbook.Path With Application.FileSearch .LookIn = strPath .SearchSubFolders = True .Filename = *.* If .Execute 0 Then For i = 1 To .FoundFiles.Count Range(A i) = .FoundFiles(i) Next i End If End With End Sub 回到Excel表格中,工具——宏——宏——选择Sheet1.Test——执行 看看效果吧! Excel单元格中显示该文件夹内的文件数量或名称 假设这个文件夹是 D:\fda 1、插入]-[名称]-[定义],或按CTRL+F3,打开excel→名称管理器→定义一个名称→比如:aaa 引用位置输入:=FILES(d:\fda\*.*) T(NOW()) 2、然后在任一工作表某一单元格输入:=COUNTA(aaa) 则返回文件个数。 3、如果在任一工作表某一单元格输入: =if(row(a1)counta(aaa),,index(aaa,row(a1))) 4、再下拉公式进行填充,则依序填充文件名。 Excel一列中输入文件名,另一列自动生成指定文件夹同名文件超链接 A列为输入文件名,B列返回超链接 B1中输入:=HYPERLINK(D:\FDA\A1,A1) 其中d:\fda\为指定文件夹路径。 Excel中怎么把行转换成列 复制需转换的单元格行,选择性粘勾选“转置”。 在页面投置工作表选项中勾选单色打印,可以不打印底纹图案。 Excel高亮显示光标所在行或列? 在Excel中选择菜单“格式——条件格式”命令,弹出“条件格式”对话框。 在“条件”下拉框中选择“公式”并在右侧中输入下面相应的公式,然后点击“格式”按钮,设置相应的格式,完成后,按“确定”按钮。 不过当前单元格编辑过才行,按过回车。 高亮单元格: 条件格式:=CELL(address)=ADDRESS(ROW(),COLUMN()) 高亮行 条件格式:=ROW()=CELL(row) 或者: =CELL(row)=ROW() 高亮行和列 条件格式:=(row()=cell(row))+(column()=cell(col)) 高亮当前单元格为止的相应行和列,呈反L形 条件格式:=OR(AND(CELL(row)=ROW(),CELL(col)+1COLUMN()),AND (CELL(col)=COLUMN(),CELL(row)+1ROW())) 高亮当前单元格为止的相应行和列,呈反L形,且当前单元格背景色改变、字体加粗: 条件格式:=CELL(address)=ADDRESS(ROW(),COLUMN())”“=OR(AND(CELL (row)=ROW(),CELL(col)+1COLUMN()),AND(CELL(col)=COLUMN(),CELL(row)+1ROW())) Excel单元格中插入页码方法 (以Excel 2003版本为基础,下文中所有“填写”后跟的内容不包括内容最外侧的全角引号) 一、定义引用项(以下定义方法通过单击菜单“插入/名称/定义”弹出定义对话框操作) 1、定义“页码”:“名称”中填写“页码”,“引用位置”中填写“=IF(ISERROR(MATCH(ROW(),GET.DOCUMENT(64),1)),1,MATCH(ROW(),GET.DOCUMENT(64),1)+1)” 2、定义“总页数”:“名称”中填写“总页数”,“引用位置”中填写“=GET.DOCUMENT(50)+RAND()*0”。 3、定义“第 N 页”:“名称”中填写“第 N
显示全部
相似文档