ICode9

精准搜索请尝试: 精确搜索
  • vba2022-08-13 13:33:12

    VBA VBA是VB的一个子集,主要用于office软件中。 1. 数据类型 数字 byte 0 ~ 255 integer -32768 ~ 32767 long -2,147,483,648 ~ 2,147,483,648 single 负值:-3.402823E+38 ~ -1.401298E-45,正值: 1.401298E-45 ~ 3.402823E+38 double 负值:-1.79769313486232e+308 ~ -4.9406564

  • VBA 生成文件 xml,xlsx2022-08-02 10:31:39

    VBA 生成文件方法: 使用 ADODB.Stream 生成文件,通过控制文件的后缀,应该是什么文件都可以生成。 Dim WriteStream2 As Object  '定义一个对象 Set WriteStream2 = CreateObject("ADODB.Stream")   '创建一个 ADODB.Stream 对象 With WriteStream2  .Type = 2 'adTypeText  '点

  • VBA错误:批量删除PPT的Shape对象时发现漏删了2022-07-22 13:10:17

    问题描述:   在ppt vba中如果要循环批量删除Shape对象,会遇到很多困难。比如当执行如下For Each … In 的vba代码删除ppt中第一页的所有图片后,会发现并没有将图片全部删除: Sub DeleteBrandLogo() Dim pre As PowerPoint.Presentation, shp As PowerPoint.Shape, Sli As Powe

  • python运行excel的VBA代码2022-07-12 21:02:40

    import os, os.path import win32com.client if os.path.exists("ceshi.xlsm"): xl=win32com.client.Dispatch("Excel.Application") wb = xl.Workbooks.Open(os.path.abspath("ceshi.xlsm"), ReadOnly=1) #打开excel文件,只读模式 xl

  • 《SeleniumBasic 3.141.0.0 - 在VBA中操作浏览器》其他文章之二:无需管理员权限部署SeleniumBasic2022-07-06 07:00:24

    根据《SeleniumBasic 3.141.0.0 - 在VBA中操作浏览器》系列文章之一:SeleniumBasic的下载和部署 SeleniumBasic通常是使用管理员身份运行regasm.bat实现注册,并且该电脑的所有用户都可以使用SeleniumBasic。 最近很多网友说公司电脑不允许使用管理员权限,因此本帖给大家讲解如何将Sel

  • VBA中引用单元格区域的几种方式2022-07-01 07:32:11

    range对象既可以引用某个单元格,也可以引用多个不连续的区域,或者是两个区域围成的公共区域,较为灵活。 range("a1:a10") 引用固定的区域 range("a1:c5  c3:c22") 引用两个单元格区域的公共部分 range("a1:a5,c2:c5,d8:d12,f2:f6") 引用多个不连续的区域 range("a1","c5") 引用由两

  • VBA 遍历指定目录下所有Excel文件并读取文件名2022-06-28 09:01:30

    Sub GetSheetName() Dim Path As String Dim File As String Dim WB As Workbook Dim sht As Worksheet Application.ScreenUpdating = False Path = ThisWorkbook.Path & "/" File = Dir(Path & "*.xls

  • VBA_OutLook_代码2022-06-27 14:33:58

    Sub Get2FACode() Dim objApp As Outlook.Application Dim objItem As Object ' MailItem Dim myOlItems As Object Set objApp = Outlook.Application '获取选中的(或打开的)邮件 ' Set objItem = objApp.ActiveExplorer.Selection.ite

  • Excel 判断是否日期格式2022-06-22 10:32:42

    因为Excel并没有提供”IsDate“这类判断日期格式的函数,所以通过VBA添加自定义函数 Function IsDate(myRange As Range) If VBA.IsDate(myRange.Value) Then IsDate = "true" Else IsDate = "false" End If End Function 步骤如截图 1.打开VBA编辑器快捷键为:Alt + F11 2.第 5 步

  • vba 选择文件,文件夹,判断是否存在2022-06-21 14:05:16

    打开文件夹:Public Function ChooseFolder(Rg As Range) With Application.FileDialog(msoFileDialogFolderPicker) If .Show Then Rg = .SelectedItems(1) End If End WithEnd Function   打开文件: Public Function ChooseFile(Rg As Range)

  • 货币汇率查询vba2022-06-19 11:04:17

    '1 ex exchange to how many curFunction GetExchangeRate(ex As String, cur As String) As String On Error GoTo Err Dim url, oHttp, responseText, result, exchangeRate As String If ex = "" Then ex = "USD" If cur = "

  • VBA类模块完全教程(www.accessoft.com软件网)2022-06-18 08:04:17

    这份礼物送给现在想学习类知识或曾经学过但因为各种原因没有“修成正果”的朋友,我期望的结果是这篇文章后,您可以在类模块中像在标准模块中写代码一样熟练,我也期望不至于太乏味而使您没有耐心看完整篇文章,或者说期望您学习的过程是轻松愉悦的,但愿我可以做到。   文章构划为8部分:1.

  • VBA删除代码2022-06-14 09:02:22

    Sub compact_code() On Error Resume Next Dim Element As Object For Each Element In ActiveWorkbook.VBProject.VBComponents ActiveWorkbook.VBProject.VBComponents.Remove Element Next End Sub 这将删除所有模块,包括 ClassModules 和 UserForms,

  • VBA驱动SAP GUI实现办公自动化(一)2022-06-13 22:36:07

      小爬之前写过一系列Python驱动SAP GUI实现办公自动化的文章,其实如果我们的实际业务不是太复杂,且我们对VBA语法比较熟悉的话,我们完全可以借助Excel VBA来驱动SAP GUI做很多自动化操作了。而无论是python还是VBA来驱动SAP,本质都是利用SAP对外开放的SAP GUI Scripting API。今天,

  • 2022-06-13 VBA代码实现word文档批量转pdf2022-06-13 21:33:05

    VBA代码: 代码第7行,文件位置需要改成自己需要转换的文件所在路径。 1 Sub doc2pdf() 2 ' 3 ' doc2pdf 宏 4 ' 5 ' 6 Dim file As String 7 ChangeFileOpenDirectory "C:\Users\jskzls\Desktop\测试\" '文件夹位置 8 9 file = Dir("*.doc") 10 Do

  • 《SeleniumBasic 3.141.0.0 - 在VBA中操作浏览器》高级技术之十五:Chrome浏览器禁止更新2022-06-10 20:35:31

    Chrome浏览器默认会自动更新版本,这样造成已有的Selenium项目必须重新下载相应的驱动文件,才能正确运行。 下面介绍一种禁止浏览器更新的方法。 Chrome浏览器通常安装在如下两个位置: "C:\Program Files\Google\Chrome\Application\chrome.exe" 或者 "C:\Users\用户名\AppData\Loc

  • 2022-06-06 excel 中VBE编辑器无法打开问题的解决2022-06-06 13:34:24

    问题:打开excel中的VB编辑器时,弹出错误提示:vbe6ext.olb不能被加载,内存溢出。 电脑系统:win7,64位。 office版本:2016版本。 解决过程,供参考: 首先打开目录1: C:\Program Files (x86)\Microsoft Office\root\VFS\ProgramFilesCommonX86\Microsoft Shared\VBA\VBA7.1 再打开目录2: C:\Progr

  • VBA中Selection.TypeText长度限制的替代写法2022-06-05 12:02:12

    阅文时长 | 0.06分钟 字数统计 | 100字符 主要内容 | 1、引言&背景 2、解决方案 3、声明与参考资料 『VBA中Selection.TypeText长度限制的替代写法』 编写人 | SCscHero 编写时间 | 2022/6/5 AM11:34 文章类型 | 系列 完成度 | 已完成 座右铭 每一个伟大的事业,都

  • VB/VBA,可能超乎你的想象2022-05-24 21:31:30

    VB/VBA,可能超乎你的想象 播报文章 BtOfficer 2022-05-14 09:38四川教育领域创作者 关注   前言   为什么VB/VBA如此易用?   一提起VB/VBA,大家会想起什么?开发快速而方便,只是性能不咋地。VB/VBA太过陈旧,缺乏现代编程工具的很多特性,比如单一平台的深度依赖(不能跨

  • Excel VBA合并一列中的同类项2022-05-23 16:32:44

    合并一列中内容相同单元格 Sub MergeRange() Dim Rng As Range Dim i&, Col&, Fist, Last Set Rng = Application.InputBox("请选择单列数据列!", Type:=8) Set Rng = Intersect(Rng.Parent.UsedRange, Rng) Col = Rng.Column Fist = Rng.Row Last = Fist

  • VBA键码常数2022-05-22 11:35:10

    VBA键码常数 MSDN:键码常数键码 常数   值   描述  vbKeyLButton   1   鼠标左键  vbKeyRButton   2   鼠标右键  vbKeyCancel   3   CANCEL   键  vbKeyMButton   4   鼠标中键  vbKeyBack   8   BACKSPACE   键  vbKeyTab   9  

  • VBA的sql distinct无法区分大小写的另一种解决方法2022-05-20 23:04:38

    VBA 的SQL是无法区分大小写的,比如distinct和两个表连接用ON的时候,这个时候也是不区分大小的 模拟Sheet,Shee名字为Test ---------Test--------------         A       1  Name            2  Joker 3  joker 4  jokeR------------------------------ strsql =

  • VBA中十六进制转换问题2022-05-13 07:00:15

    VBA语言中,数字表示的方法还有八进制、十六进制、科学计数法。例如 Dim a As Integer Dim b As Integer a = &O111 b = &HA 对于科学计数法,如果书写代码时录入 a = 1.2E-3,VBA编辑器会自动改写为0.0012 预先了解的英语知识 二进制BIN、八进制OCT、十进制DEC、十六进制HE

  • Excel VBA 批量插入批注2022-05-07 10:34:55

    有个需求,想实现类似下面的效果,当鼠标移动到单元格时会浮动显示对应的图片: 其实这个效果可以使用批注插入图片来实现,但如果想要加图片批注的数目太多则需要批量插入,这时候就需要使用Excel VBA来实现。 在Excel里右键Sheet,弹出的菜单中选择“查看代码”,将如下的代码复制进去。 Sub

专注分享技术,共同学习,共同进步。侵权联系[[email protected]]

Copyright (C)ICode9.com, All Rights Reserved.

ICode9版权所有