admin

帅气的我简直无法用语言描述!

VBS 批量Ping的项目实现(vb word批量编辑)深度揭秘

'判断当前VBS脚本是否由CScript执行 If InStr(LCase(WScript.FullName), "cscript.exe")=0 Then ?'若不是由CScript执行,则使用C...
3年前
2560

vbs 复制指定文件到指定目录下(vb文本复制怎么编程)奔走相告

 Set fso=CreateObject("Scripting.filesystemobject") Function CopyFileToPath() SrcPATH=createobject(...
3年前
2520

vbs ping实现的两种方式(vbs简单命令)真没想到

 'url="www.baidu.com" url="119.75.217.109" strComputer="." Set objWMIService=GetObject("winmgmts:{i...
3年前
2920

VBA解决Windows空当接龙的617局(win10空当接龙11982破解步骤)不要告诉别人

 Declare Function FindWindow Lib "user32" Alias _ "FindWindowA" (ByVal lpClassName As String, ByVal...
3年前
3050

VBA工程加密PJ方式(两种)

 Option Explicit Private Declare Sub MoveMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination A...
3年前
3160

VBA将excel数据表生成JSON文件(vba能生成exe文件吗)快来看

 Sub ToJson() '创建UTF8文本文件 myrange=Worksheets("sheet1").UsedRange '通过有效数据区来选择数据 'myrange=ActiveWorkb...
3年前
2710

vba将excel按照某一列拆分成多个文件(Vba将excel 数据写入xml 文件)真没想到

? Dim arr, d As Object, k, t, i&, lc%, rng As Range, c% ? c=Application.InputBox("请输入拆分列号", , 4...
3年前
2850

VBA处理数据与Python Pandas处理数据案例比较分析(python vs vba)原创

 Option Base 1 Option Explicit Sub main() On Error GoTo error_handling Dim wb As Workbook Dim wb_ou...
3年前
2680

VBA中的Timer函数用法(vba timevalue函数)全程干货

 第1.40例 Timer 函数 一、题目: 要求编写一段代码,运用 Timer 函数来计算本代码运行所化的时间。 二、代码: Sub 示例_1_040() Dim t, i&, a t=T...
3年前
2560

VBA(vba do while循环语句举例)这样也行?

详情>> Visual Basic for Applications(VBA)是Visual Basic的一种宏语言,是微软开发出来在其桌面应用程序中执行通用的自动化(OLE)任务的编程...
3年前
2570