中英vba
谷歌浏览器 f12 控制台中英文显示切换
1、按 f12 键打开控制台，点击右边的“小齿轮” 2、在设置里面找到“Chinese-中文”【要英文就选择“英语”】，然后点击X掉控制台 3、最后浏览器提示“Reload DevTools”，我们点击这个提示就可以切换控制台语言了 ......
QRCode.js无法识别中英文混合字符的解决办法
开源在此：https://github.com/davidshimjs/qrcodejs 引用：//static.runoob.com/assets/qrcode/qrcode.min.js 这篇文章讲解了使用方法： QRCode.js：使用 JavaScript 生成二维码 ： https://w ......
Excel中用VBA将不规律的行高分别设置为指定的值
Excel表格中，如果存在不同的行高的话， 可以采用自适应的方式设置行高，但是这样设置完之后，看起来很挤且凌乱 这是自适应设置的结果，如下图 如果设置为固定行高的话，行数太多就显示不完整，如下图 遇到这种情况，可以使用VBA设置行高，步骤如下： 1.在工作表上点击右键，选择查看代码 2.依次选择【S ......
vscode 配置中英对照表
文件路径： ~/.vscode/extensions/ms-ceintl.vscode-language-pack-zh-hans-1.80.2023072409/translations > 1.80.2023072409 是 vscode 版本，每人可能不一样 (在界面: 帮助--关于 里可以看 ......
SAP GUI Scripting VBA Code Snippet to Detect all IDs of the UI Elements
'-Begin Option Explicit Dim gColl() As String Dim j As Integer Sub GetAll(Obj As Object) ' '- '- Recursively called sub routine to get the IDs of all ......
VBA宏编程批量修改PPT字体
纯英文： 点击查看代码 ``` Sub ChangeFont() Dim slide As slide Dim shape As shape ' 设置目标字体名称 Dim newFont As String newFont = "新字体名称" ' 替换为您希望使用的字体名称 ' 遍历每一页 For ......
xlwings 代替Excel VBA，原来真的可以
https://blog.51cto.com/u_13389043/6229675 这里要给大家重点推荐的是表中的win32com包和xlwings包。win32com包将Excel、Word和Powerpoint等软件的所有对象打包成一个COM组件提供给Python调用，所以，它使用的对象模型跟V ......
VBA清除所有Textbox
Private Sub CommandButton2_Click() Dim c For Each c In UserForm2.Controls If TypeName(c) = "TextBox" Then c.Text = "" Next End Sub 资料来源https://zhidao. ......
奥运体育项目 中英文对照
奥运体育项目中英对照 作者：wjw 发布会员：kuangshiyi 版权：原创 添加时间：2007-9-12 阅读：8254次 【字体：大中小】 奥运体育项目中英对照 acrobatic gymnastics 技巧运动 athletics/track & field 田径 beach 海滩 boat ......
在块级元素中英文字符以及数字不会自动换行
这是因为连续的英文或者连续的数字中间没有空格字符时，会把其中的内容识别成一个单词或者连续的一段字符串，不会强制换行 换行的两个方法： 1、word-wrap : break-word ;（推荐用第一种） 2、word-break:break-all; ......
参考网上例子，在PPT中批量设置m3的3为上标的VBA
1 Sub Replace_m3_to_supscript() 2 Dim sld As Slide 3 Dim shp As Shape 4 Dim txtRng As TextRange 5 Dim i As Long 6 For Each sld In ActivePresentation.S ......
vba-类
1.基本使用 ' 长方体的类Cuboid Private are Private hig Property Get area() area = are End Property Property Get high() high = hig End Property Function volume() ......
EXCEL VBA实现工作簿中每个sheet的首行添加数据筛选和窗格冻结
为什么发这篇博客嘞，因为昨天在搞数据模板校验的时候，测试前辈姐姐让我们检查excel模板中的每个sheet的第一行都要设置数据筛选和窗格冻结，为了便于同事们之后更简易的工作吧 我起初也是一个一个sheet的看，有遗漏的手动补上，数量一多，我就感觉像机器一样，于是懒驱使着我，想着有没有自动化的操作可以 ......
NET-10-其他-VSTO+VBA
[TOC](VSTO+VBA) # 前言 主要用于Excel插件。 # VSTO 外接程序介绍： Excel、Word、PowerPoint、Project、Visio等等Office应用程序 相对简单 ## VSTO参考链接： [知乎教程](https://www.zhihu.com/column ......
VBA判断系统系统语言
Private Declare Function GetSystemDefaultLCID Lib "yifang" () As Long Function language() As Boolean language = (GetSystemDefaultCID = &H409) End Func ......
【VBA】Word打开文件
在VBA中经常要用到文件对话框来进行打开文件、选择文件或选择文件夹的操作。用Microsoft Office提供的文件对话框比较方便。用法如下Application.FileDialog(fileDialogType)fileDialogType MsoFileDialogType 类型，必需。文件 ......
VBA对=的解释
在 VBE 中，= 运算符的解释取决于它在表达式中的上下文。 赋值运算符：当=运算符用于将右侧的值赋给左侧的变量时，它被解释为赋值运算符。例如： a = 10 ' 将10赋值给变量a 判断运算符：当=运算符用于比较两个值是否相等时，它被解释为判断运算符。例如： If a = 10 Then ' 如果 ......
Excel VBA 窗体UserForm制作菜单栏与添加窗体最大化最小化功能(转载)
窗体 ' '->Forms ' Module ' ClassModules ' Option Explicit Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As Str ......
access VBA 当变量会被当成参数进行传递时,最好不要在声明过程偷懒
Dim a, b, c As String 不用讲,大家都这么玩过.实际上,它只将 c 声明为 String 类型，而 a 和 b 实际上是未声明的 Variant 类型。然后，当你尝试将未声明类型的变量 a 作为参数传递给 ByRef 参数的函数时，会导致类型不匹配的错误。 Sub MySub(B ......
关于VBA的RecordSet.GetRows方法
总结自：https://club.excelhome.net/thread-1384590-1-1.html?_dsign=b6dd5a30 1.VBA调用ADO执行SQL语句获取查询结果，通过RecordSet.GetRows方法获取到的数组是行列转置后的数组。 2.如果通过application ......
VBA利用transform函数和ADO实现交叉汇总
VBA中transform函数基本语法： Creates a crosstab query. Syntax TRANSFORM aggfunction selectstatement PIVOT pivotfield [IN (value1[, value2[, ...]])] The TRANSF ......
PageOffice在线打开office文件通过js调用vba可实现的功能
pageoffice封装的js接口有限，某些比较复杂的设置用到的客户不多，所以没有提供直接的js方法，但是pageoffice提供了Document属性和RunMacro方法，可以调vba或直接运行宏指令实现比较小众的一些需求 ![image](https://img2023.cnblogs.com ......
转载：PageOffice在线打开office文件通过js调用vba可实现的功能
pageoffice封装的js接口有限，某些比较复杂的设置用到的客户不多，所以没有提供直接的js方法，但是pageoffice提供了Document属性和RunMacro方法，可以调vba或直接运行宏指令实现比较小众的一些需求 Word相关功能 1、给word表格中的单元格赋值 document.g ......
vba-常用代码记录
一些代码优化： 1.Range("B5:C6").Copy Destination:=Range("B8") 2.使用mid$函数而不是mid 3.把整个sheet保护，需要操作时，后台先关闭保护。 4.Excel中自带的Sum函数是将整个区域转换为数组，在内存中进行求和，速度快多了。 Dim re ......
键盘符号中英文名称大全
键盘符号中英文名称大全 From: http://www.fhdq.net/bd/16.html 符号 英文名 中文名 ~ tilde or swung dash 波浪字符或代字号 ! exclamation mark 惊叹号 @ at sign or commercial at 爱特或小老鼠 # ......
VBA延时
Application.Wait method (Excel) Wait 方法暂停 Microsoft Excel 的所有操作，并且，Wait 起作用时可能禁止您对计算机做其他操作。 不过，后台操作（如打印和重新计算）将继续进行。 语法：Application.Wait(你想要恢复宏的时间，采用 M ......
AE cc 2017 和 2018 中英文切换的方法
AE cc 2017中文切换英文的方法 找到AE的安装文件目录下的“Support Files”文件夹，路径为 C:\Program Files\Adobe\Adobe After Effects CC 2017\Support Files进入“zdictionaries”文件夹，找到该文件夹里的中 ......
VBA常用的文本函数 instr、mid
InStr 函数 Dim SearchString, SearchChar, MyPos SearchString ="XXpXXpXXPXXP" ' String to search in. SearchChar = "P" ' Search for "P". ' A textual compar ......
VBA自定义排序
SortField.clear 方法 清除所有 SortFields 对象。 SortFields.Add 方法 创建新的排序字段，并返回一个 SortFields 对象。 语法：expression.SortFields.add(key、 SortOn、 Order、 CustomOrder、 D ......
WORD VBA 删除分节符和分页符1
Sub 删除分节符和分页符1() ActiveDocument.Content.Find.Execute FindText:="^b", ReplaceWith:="", Replace:=wdReplaceAll '删除分节符 ActiveDocument.Content.Find.Execute ......