本文为《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案
要解决本例的问题，可以用下面的过程：
Sub 获取文件名称()
Dim Irow As Integer, FileName As String
Irow = 1
FileName = Dir("D:\我的文件\*.xlsx")
Do While FileName <> ""
Cells(Irow, "A").Value = FileName
Irow = Irow + 1
FileName = Dir
Loop
End Sub
工作中我们会用到各种各样的表格数据相加求和，之前小汪老师也有讲过许多种求和，今天，再来分享一下“隔行求和”。 演示表格 如下图所示，我们经常会根据部门来录入每个销售人员的销售业绩，然后求出每个部门的和。像这种隔行数据，我们应该如何快速的求和呢？这里为了更好的演示效果，我将空白...
想必大家已经看到了今天，要教大家的「字中字」效果。以前只有会一些设计软件的朋友才可以完成的效果。现在任何人，就算不懂设计软件也可以轻松的完成。 当然，这种效果被称为「字云」。 看完本篇教程后，相信你也可以自己动手制作各种文字或者图形的字云效果。 准备工作 在开始之前，我们要准备好...
今天和大家分享几个Excel 365中的新函数，看看这些函数是如何化解各种疑难杂症的。 1、根据指定条件，返回不连续列的信息 如下图所示，希望根据F2:G2单元格中的部门和学历信息，在左侧数据表提取出符合条件的姓名以及对应的年龄信息。 F5单元格输入以下公式： =CHOOSECOLS(FI...
PPT工作汇报之图片传奇...
1.单击工具栏插入下的形状，在下拉菜单下选择椭圆。 2.按住shift键画出一个正圆，选中此圆形，单击工具栏绘图工具下的填充，在下拉菜单下选择图片或纹理，在下拉菜单中选择本地图片。 3.弹出选择图片的对话框，找到需要插入的图片，单击打开。 4.图片就已经填充...
点击右键并选择"设置背景格式"选项。在弹出的对话框中，选择"图片或纹理填充"选项，然后点击"来自文件"按钮，选择您需要的图片作为背景。 插入一个手机的样式。您可以使用PPT软件中的手机形状或者自己绘制一个手机形状。然后，在该手机上插入一个覆盖在屏幕上的形状。 再次点击右键...
