精华内容
下载资源
问答
  • 上回书说到,如何用EXCEL建立自己的工作台(导航与日志),有朋友说,自己的文件太多了,做起导航很费劲。别急,其实我们可以快速提取文件名,以便于我们批量建立超链接。延伸阅读:点墨楼:高效秘技!用EXCEL制作...

    e28216de-7c14-eb11-8da9-e4434bdf6706.png

    e48216de-7c14-eb11-8da9-e4434bdf6706.png

    上回书说到,如何用EXCEL建立自己的工作台(导航与日志),有朋友说,自己的文件太多了,做起导航很费劲。别急,其实我们可以快速提取文件名,以便于我们批量建立超链接。

    延伸阅读:

    点墨楼:高效秘技!用EXCEL制作导航页和日志表管理日常工作zhuanlan.zhihu.com
    e88216de-7c14-eb11-8da9-e4434bdf6706.png

    1. 无门槛通用bat法——用批处理脚本提取文件名

    >>>>提取当前文件夹下的文件、文件夹名称(不含子文件夹)

    新建一个文本文档,命名为“提取文件名”。

    打开文本文档,输入公式:dir *.*/b>文件清单.txt

    eb8216de-7c14-eb11-8da9-e4434bdf6706.png
    dir为列表命令,/b为只保留文件名和扩展名参数,>为将命令结果导入到指定文件内

    将文本文档的文件类型改为bat,即将“提取文件名.txt”更改为“提取文件名.bat”。如果你的电脑没有显示文件扩展名,另存为.bat文件即可。

    注:bat文件就是批处理文件,DOS年代的命令,不挑系统。

    双击bat文件运行,即可得到文件清单:

    ef8216de-7c14-eb11-8da9-e4434bdf6706.png

    >>>>提取当前文件夹下的文件、文件夹名称(包括子文件夹),输出文件树

    上述方法有时候并不能满足我们,比如,有的同事就喜欢将文件分门别类都放到文件夹下。然后,我去查一个文件,就需要一个个文件夹去找,点了十几下,最后发现还是个空文件夹,真是让人心累。

    有没有办法能够将文件夹下所有文件的名称都提取出来?
    有!而且可以提取成文件树!

    步骤同上,公式替换成:tree /F > 文件树1.txt

    f08216de-7c14-eb11-8da9-e4434bdf6706.png

    运行结果如下:

    f18216de-7c14-eb11-8da9-e4434bdf6706.png

    瞧,我就在某人的电脑下发现了秘密文件(上图倒数第三行),抓他个现行。

    点开一看

    .

    .

    .

    .

    .

    .

    .

    f28216de-7c14-eb11-8da9-e4434bdf6706.png
    这什么标题党?

    >>>>仅提取当前文件夹名称(包含子文件夹)

    步骤同上,公式替换成:tree > 文件树2.txt

    f48216de-7c14-eb11-8da9-e4434bdf6706.png

    运行结果如下(不提取文件的名称):

    f78216de-7c14-eb11-8da9-e4434bdf6706.png

    方法小结:

    f98216de-7c14-eb11-8da9-e4434bdf6706.png

    上述三种方法输出文件都可以改变类型,扩展名“.txt”替换成对应的文件扩展名就可以了,比如替换成“.xls”就生成EXCEL文件。

    2. WIN10党福利——复制路径

    新系统带来新功能,WIN10系统可以直接选中文件,复制路径。

    ff8216de-7c14-eb11-8da9-e4434bdf6706.png

    粘贴到EXCEL表格中:

    028316de-7c14-eb11-8da9-e4434bdf6706.png

    EXCEL 2016及以上版本可以用快速填充命令,得到文件名。

    048316de-7c14-eb11-8da9-e4434bdf6706.png

    EXCEL版本低也没关系,可以用替换,将“文件名之前的路径”替换为“空”。

    058316de-7c14-eb11-8da9-e4434bdf6706.png

    3. 高阶VBA大法——用EXCEL提取文件名

    上面两种方法简单快捷,但有一个缺点,每次文件有变化,还需要重新运行一次批处理命令,再粘贴到EXCEL中。

    能不能将更简单一点?
    可以,用EXCEL的VBA功能即可。

    VBA是微软的一种宏语言,EXCEL学会使用VBA就相当于打开了一片新天地。

    具体方法:

    1)插入一个长方形,输入名称,然后制定宏。(此步骤是为了方便运行,非必须)

    098316de-7c14-eb11-8da9-e4434bdf6706.png

    2)新建宏。

    0b8316de-7c14-eb11-8da9-e4434bdf6706.png

    3)将下面的代码复制代码框中:

    Sub 提取文件名()
    On Error GoTo 100
    Dim wsh As Object, mypath As String, ar, i&, br
    mypath = CreateObject("shell.application").BrowseForFolder(0, "请选择要搜索的文件夹", 0).Items.Item.Path '在此指定目录
    Set wsh = CreateObject("wscript.shell")
    mypath = wsh.exec("cmd /c tree /f " & Chr(34) & mypath & Chr(34)).StdOut.ReadAll
    mypath = Left(mypath, Len(mypath) - 1)
    ar = Split(mypath, vbCrLf)
    ReDim br(1 To UBound(ar) + 1, 1 To 1)
    For i = 0 To UBound(ar)
    br(i + 1, 1) = ar(i)
    Next
    Range("a1").Resize(UBound(br)) = br
    Set wsh = Nothing
    100:
    End Sub

    以上代码来自EXhome论坛@yangyangzhifeng(学习VBA编程还是颇耗时间的,网上很多代码可以借鉴)

    0f8316de-7c14-eb11-8da9-e4434bdf6706.png

    4)点击长方形按钮运行,选择制定提取文件树的文件夹。

    118316de-7c14-eb11-8da9-e4434bdf6706.png

    得到文件树:

    148316de-7c14-eb11-8da9-e4434bdf6706.png

    也有代码可以实现只提取文件名(类似dir批处理命令的效果),下期告诉你。

    总结

    158316de-7c14-eb11-8da9-e4434bdf6706.png

    文件名提取成功了,那如何快速建立超链接呢?且听下回分解!

    展开全文
  • 如何自学coreldraw VBA以我的经验来看,编程都靠自学。1.如何打开coreldraw VBA?...2.如何建立一个宏文件?在coreldraw的安装路径下,有一个文件夹gms,一般路径为C:\Program Files\Corel\Core...

    如何自学coreldraw VBA

    以我的经验来看,编程都靠自学。

    1.如何打开coreldraw VBA?

    打开coreldraw 按alt+f11,可以打开visual basic编辑器。路径为工具——visual

    basic——visual basic编辑器。

    2.如何建立一个宏文件?

    在coreldraw的安装路径下,有一个文件夹gms,一般路径为C:\Program Files\Corel\CorelDRAW

    Graphics Suite X5\Draw\GMS,coreldraw12及以上版本支持VBA功能。

    在gms文件夹下面,新建一个文本文档,例如宏.txt,把这个文本文档的后缀名改为gms就可以,例如宏.gms。

    显示文件拓展名,看菜单栏,工具——文件夹选项——查看——隐藏已知文件的拓展名前面的对号去掉。

    3.如何编辑这个宏文件?

    当然不能用记事本打开,在里面写东西。

    如1所说,打开visual basic编辑器,选中这个宏工程,插入——插入模块、用户窗体等。

    例如插入模块“显示窗体”,插入窗体名称为userfrm,显示名称为“郎郎好伟大!”。

    在模块“显示窗体”的代码窗口输入如下代码,效果是运行之后显示窗体。

    Sub 显示窗体()

    Userfrm.show

    End sub

    举一个最简单的例子,编程要靠自学。

    4.如何学习VBA?

    这点比较关键,虽然要靠自学,但是自学也要有参考,编程又不像吃饭睡觉,是本能。

    分类介绍一下。

    A,最简单的,工具——visual

    basic——记录,记录一个宏,注意宏名和存储位置,宏名随意,存储位置一般都是globalmacros,这样不会破坏其他的宏,把你需要达成的效果,都在窗口中编辑一次,然后visual

    basic——停止。

    我在窗口中画了一个矩形,并且写了一行美术字“铁血阿郎map”,然后在Microsoft visual

    basic窗口中打开globalmacros(globalmacros.gms)——模块——recordedmacros,查看代码窗口,可以在代码窗口中看到,画矩形的操作被录制成了代码,activelayer.createrectangle,但是写美术字的操作没有,而且提示not

    supported。

    这是很正常的,就是是office的宏录制也做不到把所有动作都转化成代码,但是宏录制也是非常简单、高效、有针对性的学习VBA的方法。

    B,在Microsoft visual

    basic窗口,视图——对象浏览器(快捷键F2),在对象浏览器窗口可以浏览所有的对象,点击上角的问号,可以调出“visual

    basic参考”的帮助文档,这是第二有用的自学资料,是中文的哦!

    C,开始——所有程序——CorelDRAW Graphics Suite X3——文档——CorelDRAW X3 VBA

    编程指南 (PDF),这是最有用的自学资料,可惜是英文的,里面有大量的例子。

    D,司连法有一本书,《基于Coreldraw_10进行VBA二次开发和实例解析》,老是老了一点(coreldraw升级换代,有些代码已经没有用了),但很有指导性,适合初学者。

    最后一点,编程靠自学,要勤动手,善思考。

    展开全文
  • 大家好,今天继续讲解《VBA数据库解决方案》,今日讲解的是第37讲,利用ADO,实现同一文件夹下多个EXCEL工作表的数据汇总。最近的内容实用性比较强,如今日的内容,只把需要汇总的EXCEL文件放在同一个文件夹下,而且...

    大家好,今天继续讲解《VBA数据库解决方案》,今日讲解的是第37讲,利用ADO,实现同一文件夹下多个EXCEL工作表的数据汇总。最近的内容实用性比较强,如今日的内容,只把需要汇总的EXCEL文件放在同一个文件夹下,而且格式一致,那么利用ADO汇总这几个文件的数据是非常快的,这讲的内容和第32讲的内容是类似的,不过第32讲的内容是要事先知道文件的名称,然后建立一个数组来分别对应每个文件,通过循环来实现从每个文件中提取数据的目的,本讲的内容是事先不知道每个文件的名称。

    实例:在一个文件夹下有若干个文件,如下图:

    aa30f481a08eb4ee124897e7d4e11613.png

    我们现在,需要把上面的文件夹中除了"VBA与数据库操作"之外的各个文件的内容一次性汇总出来,这个VBA程序该如何写呢?代码如下:

    Sub mynzexcels_6()

    '第37讲,利用ADO,实现同一文件夹下EXCEL工作表数据的汇总

    Dim cnADO As Object

    Dim strPath, strTable, strSQL, Z As String

    Set cnADO = CreateObject("ADODB.Connection")

    Range("a:g").ClearContents

    Range("a1:e1") = Array("日期

    展开全文
  • Excel_VBA教程

    2014-09-22 11:36:34
    第八章 利用VBA操纵文件和文件夹 144 1.获取当前文件夹的名称(CURDIR函数) 144 2.更改文件或文件夹名称(NAME函数) 145 3.检查文件或文件夹是否存在(DIR函数) 145 4.获得文件修改的日期和时间(FILEDATETIME...
  • VBA常用技巧

    2014-12-21 16:39:28
    12-1 在单元格中建立数据有效性 12 12-2 判断单元格是否存在数据有效性 12 12-3 动态的数据有效性 12 12-4 自动展开数据有效性下拉列表 12 技巧13 单元格中的公式 12 13-1 在单元格中写入公式 12 13-2 检查单元格...
  • VBA编程技巧大全

    2013-08-05 09:03:19
    VBA常用技巧 目录 VBA常用技巧 1 第1章 Range(单元格)对象 10 技巧1 单元格的引用方法 10 1-1 使用Range属性 10 1-2 使用Cells属性 11 1-3 使用快捷记号 11 1-4 使用Offset属性 12 1-5 使用Resize属性 13 1-6 使用...
  • ExcelVBA程序设计.doc

    2011-04-05 21:32:51
    第八章 利用VBA操纵文件和文件夹 144 1.获取当前文件夹的名称(CURDIR函数) 144 2.更改文件或文件夹名称(NAME函数) 145 3.检查文件或文件夹是否存在(DIR函数) 145 4.获得文件修改的日期和时间(FILEDATETIME...
  • Excel VBA 基础教程

    2019-01-01 18:51:06
    目 录 一、VBA语言基础...................................................................................................................1 第一节 标识符....................................................
  • EXCEL编程VBA高级教程

    2015-04-16 11:40:55
    一、VBA语言基础...................................................................................................................1 第一节标识符...........................................................
  • Access 2007 VBA宝典 4/4

    2012-03-31 08:36:49
    首先介绍各种Office组件及其用途,然后详细介绍了这些组件,以及如何在组件之间共享各种数据;最后介绍了更为高级的主题,包括VB 6.0、Access加载项、Visual Studio 2005共享加载项、使用XML实现自定义Office 2007...
  • Access 2007 VBA宝典 2/4

    2012-03-31 08:22:16
    首先介绍各种Office组件及其用途,然后详细介绍了这些组件,以及如何在组件之间共享各种数据;最后介绍了更为高级的主题,包括VB 6.0、Access加载项、Visual Studio 2005共享加载项、使用XML实现自定义Office 2007...
  • Access 2007 VBA宝典 3/4

    2012-03-31 08:31:46
    首先介绍各种Office组件及其用途,然后详细介绍了这些组件,以及如何在组件之间共享各种数据;最后介绍了更为高级的主题,包括VB 6.0、Access加载项、Visual Studio 2005共享加载项、使用XML实现自定义Office 2007...
  • Access 2007 VBA宝典 1/4

    2012-03-31 08:12:09
    首先介绍各种Office组件及其用途,然后详细介绍了这些组件,以及如何在组件之间共享各种数据;最后介绍了更为高级的主题,包括VB 6.0、Access加载项、Visual Studio 2005共享加载项、使用XML实现自定义Office 2007...
  • 大家好,我们今日讲解“VBA信息获取与处理”教程中第十八个专题“FSO对象对文件及文件夹的处理”的第四节“利用FSO对象读取文本文件的信息”,这个专题是非常实用的知识点,希望大家能掌握利用。教程会提供配套的...

    e82fcb14279a024e1e1798fd143725ad.png

    大家好,我们今日讲解“VBA信息获取与处理”教程中第十八个专题“FSO对象对文件及文件夹的处理”的第四节“利用FSO对象读取文本文件的信息”,这个专题是非常实用的知识点,希望大家能掌握利用。教程会提供配套的程序文件。

    第四节 利用FSO对象读取文本文件的信息

    大家好,我们继续讲解利用FSO对象获取信息的知识,今日的内容是利用FSO对象读取文本文件的信息。读取文件的信息是我们经常会利用到的操作,这讲我就将这一内容详细地讲解并提供使用的代码供大家参考。

    1 获取文件信息的基本语句讲解

    1)OpenTextFile方法,打开指定的文件, 并返回一个TextStream对象, 该对象可用于对文件进行读取、写入或追加。

    语法:object.OpenTextFile (filename, [ iomode, [ create, [ format ]]])

    参数:

    object 必需,始终是FileSystemObject的名称。

    filename必需,标识要打开的文件的字符串表达式。

    iomode可选,指示输入/输出模式。可以是以下三种常量之一:ForReading、ForWriting或ForAppending。

    Create可选,Boolean值。指示当指定的filename不存在时是否可以创建新文件的,如果创建新文件,则该值为“True”;否则,为“False”。默认值为“False”。

    format 可选。用于指示已打开文件的格式的三个“Tristate”值之一。如果省略了,该文件则打开为 ASCII。

    备注1:在上述参数中, iomode可以用下面常量代替:

    ForReading 1 只为了要读取而打开文件。不能写入该文件。.

    ForWriting 2 打开文件以进行只写。使用此模式将现有文件替换为新数据。无法读取此文件。

    ForAppending 8 打开文件,然后写入到文件的末尾。无法读取此文件。

    备注2:format可以用下面常量代替:

    TristateUseDefault -2 使用系统默认值打开文件。

    TristateTrue -1 打开该文件为 Unicode。

    TristateFalse 0 打开该文件为 ASCII。

    备注3:下面为此方法的应用示例代码:

    Const ForReading = 1, ForWriting = 2, ForAppending = 8

    Set fs = CreateObject("Scripting.FileSystemObject")

    Set f = fs.OpenTextFile("c:testfile.txt", ForAppending, TristateFalse)

    f.Write "Hello world!"

    f.Close

    2)TextStream对象,Facilitates sequential access to file,可以理解为顺序文件。上面的OpenTextFile方法返回的就是一个TextStream对象。

    在实际使用中, TextStream将替换为表示从FileSystemObject返回的TextStream对象的变量占位符。

    这个对象的方法和属性我这里先介绍一下,后面会有针对的进行讲解:

    方法 说明

    Close 关闭打开的TextStream文件。

    Read 从TextStream文件中读取指定数量的字符并返回结果。

    ReadAll 读取整个TextStream文件并返回结果。

    ReadLine 从TextStream文件中读取一行, 并返回结果。

    Skip 在读取TextStream文件时跳过指定数量的字符。

    SkipLine 当读取TextStream文件时跳过下一行。

    Write 将指定的文本写入TextStream文件。

    WriteBlankLines 将指定数量的新行字符写入TextStream文件。

    WriteLine 将指定的文本和新行字符写入TextStream文件。

    属性 说明

    AtEndOfLine 如果文件指针放置在TextStream文件中的行尾标记之前, 则返回 true; 如果不是, 则返回 false。

    AtEndOfStream 如果文件指针位于TextStream文件的末尾, 则返回 true, 如果不是, 则返回 false。

    Column 返回输入流中当前字符位置的列号。

    Line 返回TextStream文件中的当前行号。

    3)AtEndOfStream属性,如果文件指针位于TextStream文件的末尾,则只读属性返回 True;否则将返回 False。

    语法:object.AtEndOfStream

    参数:

    Object,始终是TextStream对象的名称。

    备注:AtEndOfStream属性仅适用于打开以进行读取的TextStream文件;否则将发生错误。

    4)ReadLine方法,读取“TextStream”文件中的整行(直至换行符,但不包括换行符),并返回结果字符串。

    语法:object.ReadLine

    参数:

    Object,始终是TextStream对象的名称。

    5)Read方法,从TextStream文件读取指定数量的字符并返回结果字符串。

    语法:object.Read (characters)

    参数:

    object 必需,始终是TextStream对象的名称。

    characters 必需,要从文件中读取的字符数。

    2 获取文件信息的实际应用代码

    我们要读取本地文件夹下的“018文本测试.txt”文件,可以利用下面代码的各种方法:

    Sub mynzC() '利用FS0读取文件

    Dim objFso As Object

    Dim objStream As Object

    Sheets("sheet3").Select

    Cells.ClearContents

    Set objFso = CreateObject("Scripting.FileSystemObject")

    '打开一个文本文件

    Set objStream = objFso.OpenTextFile(ThisWorkbook.Path& "018文本测试.txt", 1)

    '返回文件的信息1

    Do Until objStream.AtEndOfStream

    strTemp = strTemp&objStream.ReadLine() &vbCrLf

    Loop

    Cells(1, 1) = "第一次读取文件的内容:"

    Cells(2, 1) = strTemp

    objStream.Close

    '打开一个文本文件

    Set objStream = objFso.OpenTextFile(ThisWorkbook.Path& "018文本测试.txt", 1)

    '返回文件的信息2

    strTemp = objStream.ReadAll

    Cells(4, 1) = "第二次读取文件的内容:"

    Cells(5, 1) = strTemp

    objStream.Close

    Set objStream = objFso.OpenTextFile(ThisWorkbook.Path& "018文本测试.txt", 1)

    '返回文件的信息3

    strTemp = objStream.Read(15)

    Cells(7, 1) = "第三次读取文件的内容(10个字符):"

    Cells(8, 1) = strTemp

    strTemp = strTemp&objStream.Read(FileLen(ThisWorkbook.Path& "018文本测试.txt"))

    Cells(10, 1) = "第四次读取文件的内容:"

    Cells(11, 1) = strTemp

    objStream.Close

    Set objStream = Nothing

    Set objFso = Nothing

    MsgBox ("ok!")

    End Sub

    代码截图:

    df9cba39419ae1709b77de6748cc3195.png

    代码讲解:

    1)上述代码利用了四种方案读取给定的“018文本测试.txt”文件

    2)Do Until objStream.AtEndOfStream

    strTemp = strTemp&objStream.ReadLine() &vbCrLf

    Loop

    以上代码第一次读取文件,利用的是循环语句

    2)objStream.ReadAll第二种方案就是直接读取整个文件

    3)objStream.Read(15)第三种方案是读取文件的15个字符

    4)strTemp&objStream.Read(FileLen(ThisWorkbook.Path& "018文本测试.txt"))第四次读取,大家要注意第四次读取的时候,利用的是第三次的打开文件,在第三次读取的时候读取了15个字符,这次读取如果要读取整个文件要把上面的15个字符补上。

    3 获取文件信息实际代码的应用效果

    我们可以点击运行按钮,然后查看运行的效果:

    a213c10de5087e5b4277d2e7983db3b1.png

    从上面的实现效果可看,利用FSO对象,读取文件信息是非常方便可行的。

    本节知识点回向:

    ① 本例中利用FSO对象读取文件利用的语句有哪些?

    ② 读取文件的四种方法中各有什么不同?

    本讲代码参考文件:018工作表.xlsm

    8ba75d44d45070f9f0ac98f09e183aa7.png

    积木编程的思路内涵:

    在我的系列书籍中一直在强调“搭积木”的编程思路,这也是学习利用VBA的主要方法,特别是职场人员,更是要采用这种方案。其主要的内涵:

    1 代码不要自己全部的录入。你要做的是把积木放在合适的位置然后去修正代码,一定要拷贝,从你的积木库中去拷贝,然后修正代码,把时间利用到高效的思考上。

    2 建立自己的“积木库”。平时在学习过程中,把自己认为有用的代码放在一起,多积累,在用到的时候,可以随时拿来。你的积木库资料越多,你做程序的思路就会越广。

    8ba75d44d45070f9f0ac98f09e183aa7.png

    VBA的应用界定及学习教程:

    VBA是利用Office实现个人小型办公自动化的有效手段(工具)。这是我对VBA的应用界定。在取代OFFICE新的办公软件没有到来之前,谁能在数据处理方面做到极致,谁就是王者。其中登峰至极的技能非VBA莫属!

    我记得20年前自己初学VBA时,那时的资料甚少,只能看源码自己琢磨,真的很难。20年过去了,为了不让学习VBA的朋友重复我之前的经历,我根据自己多年VBA实际利用经验,推出了六部VBA专门教程,目前教程均通过32位和64位两种OFFICE系统测试。

    第一套:VBA代码解决方案 是VBA中各个知识点的讲解,教程共147讲,覆盖绝大多数的VBA知识点,提供的程序文件更是一座不可多得的代码宝库,是初学及中级人员必备教程;目前这套教程提供的版本是修订第二版,程序文件通过32位和64位两种OFFICE系统测试。

    第二套:VBA数据库解决方案 数据库是数据处理的专业利器,教程中详细介绍了利用ADO连接ACCDB和EXCEL的方法和实例操作,适合中级人员的学习。目前这套教程提供的是修订第一版教程,程序文件通过32位和64位两种OFFICE系统测试。

    第三套:VBA数组与字典解决方案 数组和字典是VBA的精华,字典是VBA代码水平提高的有效手段,值得深入的学习,是初级及中级人员代码精进的手段。目前这套教程提供的版本是修订第一版,程序文件通过32位和64位两种OFFICE系统测试。

    第四套:VBA代码解决方案之视频 是专门面向初学者的视频讲解,可以快速入门,更快的掌握这门技能。这套教程是第一套教程(修订一版)的视频讲解,听元音更易接受。这套教程还会额外提供通过32位和64位两种OFFICE系统测试的程序文件。

    第五套:VBA中类的解读和利用 这是一部高级教程,讲解类的虚无与肉身的度化,类的利用虽然较少,但仔细的学习可以促进自己VBA理论的提高。这套教程的领会主要是读者的领悟了,领悟一种佛学的哲理。目前这套教程提供的版本是修订第一版,程序文件通过32位和64位两种OFFICE系统测试。

    第六套教程:《VBA信息获取与处理》是一部高级教程,涉及范围更广,实用性更强,面向中高级人员。教程共二十个专题,包括:跨应用程序信息获得、随机信息的利用、电子邮件的发送、VBA互联网数据抓取、VBA延时操作,剪切板应用、Split函数扩展、工作表信息与其他应用交互,FSO对象的利用、工作表及文件夹信息的获取、图形信息的获取以及定制工作表信息函数等等内容。程序文件通过32位和64位两种OFFICE系统测试。

    上述教程的学习顺序:1→3→2→6→5或者4→3→2→6→5。提供的程序文件更是一座巨大的代码库,供读者使用,如需要可以WeChat: NZ9668

    26cf1d02c881a41da714fd990377af14.png

    学习VBA是个过程,也需要经历一种枯燥的感觉

    “众鸟高飞尽,孤云独去闲。相看两不厌,只有敬亭山”。学习的过程也是修心的过程,修一个平静的心。在代码的世界中,心平静了,心情好了,身体自然而然就好。心静则正,内心里没有那么多邪知邪见,也就没有那么多妄想。利人就是利己。我的教程助力给正在努力的朋友。

    “水善利万物而不争”,绵绵密密,微则无声,巨则汹涌。学习亦如此,知道什么是自己所需要的,不要蜷缩在一小块自认为天堂的世界里,待到暮年时再去做自欺欺人的言论。要努力提高自己,用一颗充满生机的心灵,把握现在,这才是进取。越是有意义的事情,困难会越多。愿力决定始终,智慧决定成败。不管遇到什么,都是风景。看淡纷争,看轻得失。学习时微而无声,利用时则巨则汹涌。“路漫漫其修远兮,吾将上下而求索”

    每一分收获都是成长的记录,怎无凭,正是这种执着,成就了朝霞的灿烂。最后将一阙词送给致力于VBA学习的朋友,让大家感受一下学习过程的枯燥与执着:

    浮云掠过,暗语无声,

    唯有清风,惊了梦中啼莺。

    望星,疏移北斗,

    奈将往事雁同行。

    阡陌人,昏灯明暗,

    忍顾长亭。

    多少VBA人,

    暗夜中,悄声寻梦,盼却天明。

    怎无凭!

    分享我多年工作实际经验的成果,随喜这些有用的东西,给确实需要利用VBA的同路人。回向学习利用VBA的历历往事,不胜感慨,谨以这些文字以纪念,

    分享成果,随喜正能量

    展开全文
  • 大家好,我们今日讲解“VBA信息获取与处理”教程中第十八个专题“FSO对象对文件及文件夹的处理”的第五节“用FSO对象向文本文件中写入信息”,这个专题是非常实用的知识点,希望大家能掌握利用。教程会提供配套的...
  • 编按:哈喽,大家好!前段时间我们和大家分享了使用...在实际工作中,出于建立目录或者核查表格收集进度等目的,我们经常需要提取文件夹内所有文件的名称。在不使用VBA的情况下,我们该如何实现这一需求呢?方法有很...
  • 编按:哈喽,大家好!前段时间我们和大家分享了使用...在实际工作中,出于建立目录或者核查表格收集进度等目的,我们经常需要提取文件夹内所有文件的名称。在不使用VBA的情况下,我们该如何实现这一需求呢?方法有很...
  • 编按:哈喽,大家好!前段时间我们和大家分享了使用...在实际工作中,出于建立目录或者核查表格收集进度等目的,我们经常需要提取文件夹内所有文件的名称。在不使用VBA的情况下,我们该如何实现这一需求呢?方法有很...
  • 在实际工作中,出于建立目录或者核查表格收集进度等目的,我们经常需要提取文件夹内所有文件的名称。在不使用VBA的情况下,我们该如何实现这一需求呢?方法有很多,今天小花就和各位小花瓣分享其中比较实...
  • 在实际工作中,出于建立目录或者核查表格收集进度等目的,我们经常需要提取文件夹内所有文件的名称。在不使用VBA的情况下,我们该如何实现这一需求呢?方法有很多,下面就和各位分享其中比较实用的五种。1定义名称...
  • 其中还包含了其它的许多技巧(32KB) 20,dyncontrol.zip 动态建立控件的范例(3KB) 21,listitemdrag.zip 演示如何将列表框中的条目拖放到另外一个列表框中(2KB) 22,ownerdrawmenu.zip 演示建立...
  • 11.1 对汇总、细节以及综合这二者的报表建立同一报表 305 11.2 用按窗体查询来创建同一报表的动态分组 312 11.3 复杂的特征:创建迂回报表 316 11.3.1 查看前面的报表 318 11.3.2 "列”页面的属性 318 ...
  • 11.1 对汇总、细节以及综合这二者的报表建立同一报表 305 11.2 用按窗体查询来创建同一报表的动态分组 312 11.3 复杂的特征:创建迂回报表 316 11.3.1 查看前面的报表 318 11.3.2 "列”页面的属性 318 11.3.3 ...
  • 文件夹 2-8 编辑器 2-9 组件 2-10 将组件添加到应用项目中 2-11 重命名、移去和删除组件 2-12 重命名组件 2-12 移去组件 2-13 删除组件及文件 2-13 命名组件 2-13 避免名称与命令或者宏冲突 2-14 使用编辑器的一些...
  • FMLDATA的源码

    2014-06-02 15:57:42
    3、在DZH安装目录下建立一个名为FMLDATA的文件夹,如c:\dzh2\fmldata(这一步是必须的,否则无法使用)。DLL公式读取或写入的数据都在这个文件夹。 至此,安装完成,下面就是如何使用了。 四、使用方法: FMLDATA....
  • 【新建工作表】 批量新建或者复制工作表,依指定存储格内容可以瞬间建立/复制1到255个。还可以在新建或复制时全自动命名。分为自动新增方式与依指定存储格内容两种方式。 【插入批注背景】 可以选定任意一幅图片为...
  • 382.5 探索窗体设计视图和VBA类模块 392.6 现实世界—所学知识的透视 40第3章 Access导航 423.1 理解Access功能和模式 423.1.1 定义Access功能 423.1.2 定义Access操作模式 443.2 理解Access的表显示 443.2.1 最大化...
  • 382.5 探索窗体设计视图和VBA类模块 392.6 现实世界—所学知识的透视 40第3章 Access导航 423.1 理解Access功能和模式 423.1.1 定义Access功能 423.1.2 定义Access操作模式 443.2 理解Access的表显示 443.2.1 最大化...

空空如也

空空如也

1 2 3 4
收藏数 65
精华内容 26
关键字:

vba如何建立文件夹