04 2022 档案
摘要：Sub dfads() For Each file In fso.GetFolder(ThisWorkbook.path).Files If InStr(file.Name, "xiyouji") Then Debug.Print file.Name Exit For End If Next End
阅读全文
摘要：VBA activesheet没有智能提示
阅读全文
摘要：Function getfilelist(path As String) As Variant '返回文件夹的所有文件，输出位getfilelist数组 Dim ifolder As Folder Dim ifile As file Dim filelist As New ArrayList Set
阅读全文
摘要：一开始感觉VBA的FilesystemObject挺高级挺麻烦，其实非常简单。 查看文件是否存在，添加，删除，移动文件等等，非常便捷。比VBA的Dir功能好用太多。DIR功能经常忘记怎么使用。 全局定义public os as FileSystemObject 然后在任何地方可以直接使用os.功能了
阅读全文
摘要：返回 VBA 代码示例 VBA 通配符 在本文中 在 VBA 中使用 Asterix (*) 通配符 在 VBA 中使用问号 (?) 通配符 使用 [char list] 作为通配符 在 VBA 中使用哈希 (#) 通配符 本教程将演示如何在 VBA 中使用通配符。 通配符用于所有编程语言和数据库应
阅读全文
摘要：Sub savetoPDF() ActiveDocument.ExportAsFixedFormat Split(ActiveDocument.Path, "F")(0) & "_Onsite_Photos.pdf", wdExportFormatPDF, True End Sub 把当前Wordw
阅读全文
摘要：浏览器调试模式，输入： document.designMode = 'on' 也可以把此下面代码拖进去收藏夹，需要用时，点击该收藏，就可以把任意网页变成“随意编辑”模式，可以任意修改网页上的内容。 javascript:document.body.contentEditable='true'; do
阅读全文
摘要：'split函数把字符串分割成一个数组，指定用","来分割。 Sub test() arr = Split("素胚勾勒出青花 笔锋浓转淡,瓶身描绘的牡丹 一如你初妆", ",") For i = 0 To UBound(arr) Debug.Print arr(i) Next i End Sub
阅读全文
摘要：split函数把字符串分割成一个数组，默认按照空格来分割。 Sub test() arr = Split("素胚勾勒出青花 笔锋浓转淡,瓶身描绘的牡丹 一如你初妆") For i = 0 To UBound(arr) Debug.Print arr(i) Next i End Sub split函数
阅读全文
摘要：前言 VBA数组在Excel开发应用中，作用还是很明显的，用好数组可以提高工作效率，下面就开始揭开VBA数组的神秘面纱。 具体操作 1、VBA数组的定义方法 下面是几种数组常用的定义方法，一维数组的定义、二维数组的定义 直接赋值定义、调用Array函数定义、调用Excel工作表内存数组 ''''''
阅读全文
摘要：If the recent-files.lst file is hidden, Python will fail to access it properly. You most likely tried to hide the .idlerc folder and applied the same
阅读全文
摘要：https://www.canon.com.cn/supports/download/simsdetail/8203236300.html?modelId=457&channel=1 这一步是关键；
阅读全文
摘要："C:\Program Files\Google\Chrome\Application\chrome.exe" --remote-debugging-port=9222 --user-data-dir="C:\Users\xyz\OneDrive\templates and tools\myChro
阅读全文
摘要：excel函数升级，导致原来设定的表格内容自动翻译（有道翻译API），失效。点击该单元格函数，摁下回车后，可以使用。 =@FILTERXML(WEBSERVICE("http://fanyi.youdao.com/translate?&i="&H74&"&doctype=xml&version"),
阅读全文
摘要：?Environ("USERPROFILE")C:\Users\wxy ?environ("OneDrive")C:\Users\wxy\OneDrive ?environ("appdata")C:\Users\wxy\AppData\Roaming
阅读全文
摘要：在旧电脑执行： pip freeze > requirements.txt 然后在新电脑执行： pip install -r requirements.txt 新电脑上会自动下载。 很顺利。 反而excel搬家不顺利，excel不同版本支持不同的函数，在新电脑上，有几个函数不支持，挺麻烦。
阅读全文
