Excel单元格日期格式转换成文本格式.doc

《Excel单元格日期格式转换成文本格式.doc》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、Excel单元格日期格式转换成文本格式1.Excel单元格日期格式转换成文本格式如“2008年7月18日”或“2008-7-18”的日期格式转换成“20080718”的8位文本格式。公式“=text(A2,"yyyymmdd")”（注：如果日期中还包含时、分、秒，则公式可改成“=text(A2,"yyyymmddhhmmss")”。其中的文本格式可以按自己的要求灵活运用，如“yymmddh:m:s”表示只要年份的后两位、时间中用冒号将时分秒隔开并且不满两位时前面不加“0”。2.Excel返回行号、列号函数返回行号：=row()返回列号：=column(

2、)3.Excel页脚底端标题行设置方法选择页脚区域，按住Shift键，编辑—复制图片，再把图片插入到自定义页脚里（2003版可以，2000没有这个功能）。4.Excel如何录制宏执行宏？简单的方法：自己可练习创建一个“宏”，（就是录下自已需要做的操作步骤）方法：点击——工具——宏——录制新宏——弹出窗口——确认宏名称——这时就会弹出一个录像框，你就可以一步一步点击你要做的操作，按下“停止”，就结束了宏录制！你再进入工具——宏——选择刚录下的宏名称——点击“编辑”——这里面就是你要的宏代码了，自已可以研究了！如下面就是一个宏，执行后会自己打开：工作表3代

3、码是：Sub按钮1_单击()Sheet(Sheet3)EndSub5.Excel打开工作薄自动执行宏？先录制宏，再宏名字改成subauto_open就变成自动了6.Excel击活工作表自动执行宏？SubMacro适合行高()………..宏名'ZYC录制时间:2014-9-23………….注释行'PrivateSubworksheet_activate()Cells(1,1)=Now()Rows("3:3").SelectRows("3:3").EntireRow.AutoFit5EndSub先打开对应工作表，操作alt+F11，在视图中选正代码窗口，然后复

4、制粘贴上面代码。1.Excel击活工作表6-10行自动执行最适合的行高，然后选正单元格A6的宏？PrivateSubworksheet_activate()Rows("6:10").SelectRows("6:10").EntireRow.AutoFitRange("A6").SelectEndSub2.Excel隐藏单元格中的数据？有时候，我们可能不希望别人看到Excel某些单元格或者区域中的数据内容，可以选定这些单元格内容，然后按下“Ctrl+1”组合键，在弹出的“单元格格式”对话框中，单击“数字”选项卡，然后选择“自定义”分类，在其中的“类型”文

5、本框中输入半角符号“;;;”即可，这样即便是修改字体颜色也无法显示隐藏的内容了。3.Excel统计空白单元格、数字单元格、数字及非空单元格个数？=countBlank(A1:A100)'统计空白单元格数量=count(A1:A100)'统计数字单元格个数=counta(A1:A100)'统计数字及非空单元格个数=countif(A1:A100,A1)'条件统计统计区域中A1同值的个数4.Excel提取文件夹中的所有文件名称1、在那个文件夹内新建一个.TXT文件（如wenjian.txt），用记事本单开输入dir>1.txt保存退出将刚才的.TXT（we

6、njian.txt）更名为.bat文件（wenjian.bat）双击wenjian.bat文件运行一次，在文件夹内多出一个1.txt文件打开1.txt文件，将其中的内容粘贴到Excel中，数据——分列处理就可以得到你要的文件名列表了！2、VBA（2003版）在那个文件夹下新建Excel文件，打开新建的Excel文件，右击工作表标签（如Sheet1），查看代码——在代码编辑器中输入以下代码SubTest()DimiAsIntegerDimstrPathAsStringstrPath=ThisWorkbook.PathWithApplication.Fil

7、eSearch.LookIn=strPath.SearchSubFolders=True.Filename="*.*"If.Execute>0Then5Fori=1To.FoundFiles.CountRange("A"&i)=.FoundFiles(i)NextiEndIfEndWithEndSub回到Excel表格中，工具——宏——宏——选择Sheet1.Test——执行看看效果吧！1.Excel单元格中显示该文件夹内的文件数量或名称假设这个文件夹是D:fda1、插入]-[名称]-[定义]，或按CTRL+F3，打开excel→名称管理器→定义一个

8、名称→比如：aaa引用位置输入：=FILES("d:fda*.*")&T(NOW())2、