说明（2017.3.22）：1. 根据兰色幻想VBA80集视频教学，总结2. 大部分可以用自带函数处理，不过复制文件夹需要用到FileSystemObject对象，打开文件夹用到shell1 Public Sub test1()
2 '1. 判断文件夹是否存在，dir第二个参数为vbDirectory，不然只判断文件是否存在
3 If Dir(ThisWorkbook.path &am
转载
2023-07-03 13:06:37
560阅读
⽤VBA代码删除空⾏
原创
2022-08-17 14:23:47
1804阅读
文件监控之查找/删除/下载/上传 这两节主要实现四个功能：文件查找，删除，下载，上传。 这节主要做客户端： FileSpy类: 1.首先创建一个FileSpy类。 2.遍历目录/文件夹函数： std::vector<std::string> FileSpy::getDirs(std::string dir)
{
WIN32_FIND_DATAA findData;
转载
2024-04-08 07:25:33
37阅读
'ret = Shell("C:\ExportSheetTxtFiles\DF.EXE C:\ExportSheetTxtFiles\t.txt C:\ExportSheetTxtFiles\t2.txt", 1)
Public Sub CompareFiles(ByVal filePath1 As String, ByVal filePath2
原创
2012-05-10 09:22:57
1269阅读
第一种情况保留不重复的记录行，重复的只保留一行。
1、打开有重复数据的EXCEL 2、Alt+F11 打开宏的VB编辑器 3、左边双击：ThisWorkBook 4、贴入以下代码并运行即可： Sub 删除重复数据() '删除col列的重复数据 '本例是删除标题为sheet1的EXCEL表中A列（从A2单元格开始）的重复数据 Application.ScreenUpdating = False
转载
2024-04-05 12:39:35
269阅读
大家好，今日继续和大家分享VBA编程中常用的常用"积木"过程代码。这些内容大多是我的经验和记录，来源于我多年的经验。今日分享的是NO.225-NO.226，内容是：NO. 225：数组的赋值和回填工作表NO. 226：将数组的值批量回填给工作表的办法 VBA过程代码225：数组的赋值和回填工作表Sub Mynz ()'创建数组，并赋值Dim arr(1 To 60000), i As
转载
2024-05-10 16:49:30
144阅读
工作表操作' 关闭警告，否则删除工作表时将出现提示信息
Application.DisplayAlerts = False
' 删除以字母“C”开头的临时模板
For Each a In Worksheets
If Left(a.Name, 1) = "C" Then a.Delete
' If InStr(a.Name, ".") > 0 Then a.Delete
Next
转载
2024-05-29 00:57:02
121阅读
VBA 生成文件方法：使用 ADODB.Stream 生成文件，通过控制文件的后缀，应该是什么文件都可以生成。Dim WriteStream2 As Object '定义一个对象
Set WriteStream2 = CreateObject("ADODB.Stream") '创建一个 ADODB.Stream 对象
With WriteStream2
.Type = 2
转载
2024-05-19 08:30:50
175阅读
Option Explicit '清空数据 Private Sub CommandButton1_Click() Dim qknum As Integer '选择是或者否 来确认删除数据 '中对话框类型 16+4 ：16指图标类型是停止图标，4指出现的按钮是“是”“否”按钮 If (MsgBox("
原创
2022-06-17 05:12:41
1454阅读
VBA神键手智能输入提示神键手功能说明VBA神键手输入提示通过对预置关键词代码短语，以及VBA代码库的模糊搜索提示，实现VBA极速编程体验，且支持VBA代码库中文拼音首字母搜索，常用VBA代码块1秒输入，节省更多时间用来思考，而不是花费在敲字母以及记忆单词上，词库和代码库均可根据个人喜好习惯自由定制，达到最佳使用效果！关键字+空格触发输入提示输入 IF空格 就会弹出如下图所示神键手提示按下Tab
转载
2023-12-08 15:12:58
337阅读
一、更改标题名称 点击右上角的黑色方块 计时器触发：每次要执行的代码 计时器间隔：每次执行代码的间隔 '计时器触发代码 Private Sub Form_Timer() Caption = "当前时间：" & Time() 'caption表示标题 End Sub 二、模块 模块分为类模块和标准模块
原创
2021-12-29 15:08:57
3829阅读
大家好,我们今日继续讲解VBA数据库解决方案的第27讲内容：利用VBA，把数据表中特殊的记录删除的方法。这讲的内容比较简单，在理解和掌握了前几讲内容的基础上很容易掌握。为什么要提出这讲的课题呢？其实，我们在实际的工作中有各式各样的问题会遇到，我只能尽可能多的给大家多举些实例来说明。今天的话题是，在数据库员工信息的数据表中有些人的记录是要删除的，因为这些人退休了啊，而退休的条件又是比较
转载
2024-04-22 20:10:25
197阅读
——将EXCEL VBA代码移植到VB.NET.NET是微软公司在2002年推出的全新编程框架，支持多种语言应用程序开发。使用Visual Basic在Microsoft .NET Framework上编程，这就是Visual Basic.NET，简称VB.NET。VB.NET是Microsoft Visual Studio .NET组件中的重要组成部分，是VB6.0的后续版本，VB.NET仍使用
转载
2024-01-03 20:47:55
274阅读
Sub Del_Dable() Dim c As Worksheet For Each c In Worksheets If Right(c.Name, 6) = "有限责任公司" Or Right(c.Name, 4) = "有限公司" Then &nb
原创
2014-08-01 15:02:18
1292阅读
关于“vba 删除mysql数据”的问题，本文将深入探讨如何通过VBA实现对MySQL数据库数据的删除操作。我们将把整个过程分为多个结构部分，以便清晰且系统地记录解决方案及其背后的思考过程。
### 背景定位
在实现企业管理系统的过程中，数据的维护尤为重要。我们需要定期对MySQL数据库中的数据进行清理，以确保系统高效且准确地运行。这一需求的增长也代表了企业的不断发展，因此我们需要有条不紊地进
当你辛辛苦苦开发出的程序作品后
,
是不是想过怎样来保护好程序的源代码呢
!,
保护好程序源码
,
在大多会员来看都是非常关心的问题
.
遗憾的是
,Excel
不像其他的开发软件一样
,
在加密上很容易被各种密码破解软件破译
.
尽管这样
,
我们也应尽可能来保护
Excel
工作簿和
VBA
源码。
一、为VBA工程设置密码
限制别人查看VBA源代码
转载
2024-04-28 20:02:36
162阅读
初次看见网上大神们的 VLisp 作品，其中对 Excel 的操作感觉很复杂，先是一大堆 OLB 类型库声明代码，不太懂，然后各种自定义函数，也有点蒙。 幸好，本人 Excel 使用中经常录制和修改宏，对 Excel Vba 还算有一点点的了解。所以，如果你有一点 vba 的基础，本文将对你有一种豁然开朗的感觉。创建 Excel 的 ActiveX 对象在 AutoCAD 中创建一个 Excel
转载
2023-11-30 09:10:58
217阅读
文章目录1. 建数据透视表2. 添加行标签2.1 设置行标签的显示方式2.2 关闭分类汇总3. 添加列标签3.1 如果是时间格式标签，可以按照不同的周期分组3.2 关闭列标签中的折叠按钮 +/-4. 配置值对应的字段5. 添加筛选标签5.1 单选5.2 多选6. Excel右侧的配置栏的操作参考 1. 建数据透视表import win32com.client as win32
from win3
转载
2024-10-17 07:54:56
130阅读
VBA 对 文件和文件夹的操作
2010年06月24日
我们在使用Excel VBA进行处理数据时，或多或少会涉及到如何操作文件和文件夹。本节将重点讲述如何新建、打开、删除、复制、移动和重命名文件和文件夹操作等。
对于文件和文件夹操作，我们一般通过下面方法：
。VB命令
。EXCEL对象
。引用其他动态库对象
。API
转载
2024-04-02 11:29:04
188阅读
以下为当年整理出来的小部分资料列表，有很多子目录都没有编录进来（包括这几年的代码和文档，还有做启动盘的源程序）。再次提醒各位朋友，对于重要的资料一定要经常备份啊。文件夹 G:/05_Teach Info/02_Computer 列表├─<DIR> .├─<DIR> ..├─<DIR> 00_Programming｜
