vba专题
Weibull概率分布纸（EXCEL VBA实现）
在学习Weibull分布理论的时候，希望有一张Weibull概率纸，用来学习图解法。但是在度娘上没有找到的Weibull概率纸的电子版。在书上看到的Weibull概率纸，只能复印下来使用。于是萌生了自己制作Weibull概率纸的想法，帮助自己更好地学习。 本人擅长使用各种计算机语言，C，C++，Matlab，Scilab等等，但是始终钟爱与VBA，认为VBA可以实现一切你想要的东西，由于在企业里不
如何在Excel中创建一个VBA宏，并设置一个按钮来执行这个宏
下面是一个详细的步骤指南 步骤1：创建VBA宏 1. 打开Excel并按 `Alt + F11` 打开VBA编辑器。 2. 在VBA编辑器中，选择 `Insert` > `Module` 来插入一个新的模块。 3. 将以下代码粘贴到模块中： ```vba Sub CreateNewSheet()' 声明一个工作表对象Dim newSheet As Worksheet' 添加一个新的工作表S
VBA 调用打印机实战开发
VBA 调用打印机实战开发 Public Type POINTAPIX As LongY As LongEnd Type#If Win64 ThenPublic Declare PtrSafe Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As LongPublic Declare PtrSafe Function Get
VBA 根据单元格改变的值改变对应单元格的值
VBA 根据单元格改变的值改变对应单元格的值 Private Sub Worksheet_Change(ByVal Target As Range)10 On Error GoTo er:20 Application.EnableEvents = False30 If Intersect(Target, Range("I6")) Is Nothing = Fals
VBA Excel 出报表
源数据 目标 PS:调休 以高亮颜色区分 整理一下 CMDBUT命令 VBA代码 Private Sub CommandButton1_Click()Dim ps As IntegerDim pe As IntegerDim srcs As IntegerDim srce As IntegerDim i As IntegerDim j As IntegerD
在VBA中，对Excel单元格的操作方法
在VBA（Visual Basic for Applications）中，对Excel单元格的操作方法非常丰富，包括但不限于赋值、数字格式设置、复制粘贴、自动填充、公式填充、选中单元格、合并和解除合并单元格、排序等。以下是一些具体的操作方法： 赋值：可以使用Range对象的Value属性给单元格赋值，例如Range("A1").Value = 3.1415。 数字格式：通过Numb
批量修改海量cad文件名——vba实现
如果需要修改大量dwg文件名，可将dwg文件放入一个文件夹，采用此dvb插件加载到cad ，输入 vbaman加载插件，输入vbarun运行插件，根据提示选择文件夹，即可一键完成海量文件名的自动复制修改。具体需求可专门代写代码、插件。 部分代码如下: Sub 批量dwg改名() 'yngqq Dim folderPath As String Dim counter As In
VBA字典与数组第十八讲:VBA中静态数组的定义及创建
《VBA数组与字典方案》教程（10144533）是我推出的第三套教程，目前已经是第二版修订了。这套教程定位于中级，字典是VBA的精华，我要求学员必学。7.1.3.9教程和手册掌握后，可以解决大多数工作中遇到的实际问题。 这套字典教程共两册，一共八十四讲，今后一段时间会给大家陆续推出修订后的教程内容。今日的内容是：VBA字典与数组第十八讲:VBA中静态数组的定义及创建 【分享成果，随喜正能量
VBA代码解决方案第十七讲:如何选择一个工作表，选择多个工作表
《VBA代码解决方案》(版权10028096)这套教程是我最早推出的教程，目前已经是第三版修订了。这套教程定位于入门后的提高，在学习这套教程过程中，侧重点是要理解及掌握我的“积木编程”思想。要灵活运用教程中的实例像搭积木一样把自己喜欢的代码摆好。 这套教程共三册，一百四十七讲，内容覆盖较广，也是初级和中级间的过渡教程，改版后的内容主要是提供程序源码文件及代码修正为32位和64位兼用代码。今后一段
VBA学习(66)：Excel VBA 正则表达式
正则表达式在VBA环境下的应用非常广泛，可以用来快速地实现字符串的匹配、查找、替换等操作。以下是正则表达式在VBA中的一些常见应用： 创建正则表达式对象 要在VBA中使用正则表达式，需要先创建一个RegExp对象，然后设置该对象的属性来定义要匹配的模式。在VBA中创建RegExp对象的代码如下： Dim reg As New RegExp 设置正则表达式模式 创建RegExp
VBA生成条形码并放到指定的单元格位置
VBA生成条形码并放到指定的单元格位置 Sub 条形码生成()Application.ScreenUpdating = Falsesubexit = 0Call 检查条码位数If subexit = 1 ThenExit SubEnd IfCall 清空数据Dim i As Long '行号Dim X As StringDim w As WorksheetSe
TYPE（用户定义类型）类型在CAD-vba中的应用
type类型可以是任何用 Type 语句定义的数据类型。用户自定义类型可包含一个或多个某种数据类型的数据元素、数组或一个先前定义的用户自定义类型。例如： 在cad vba 中应用如下（生成点和线）： 部分代码： Option Explicit' 定义一个自定义类型 PointData，包含点的X Y坐标，颜色，层名称Type PointDataX As Double '
在VBA中，对Excel单元格的操作方法 （qo+op）
一、读取单元格内容 读取单元格的内容，将单元格的值赋给一个变量。例如，读取A1单元格的内容并打印到窗口。 Sub Cell()Dim cellContent As StringcellContent = Worksheets("Sheet1").Range("A1").ValueDebug.Print cellContentEnd Sub 二、修改（填充）单元格
EXCEL VBA根据数据生成word文档周报并加背景格式突出显示
EXCEL VBA根据数据生成word文档周报并加背景格式突出显示 Public wwSub 生成word()Dim ww As WorksheetDim wj As WorksheetDim wz As WorksheetDim wb As WorkbookDim wbf As Workbookfpath = ThisWorkbook.Path & "\"fname = Dir(fpath)h
Excel vba listbox 鼠标滚轮滚动
Option Explicit ' 声明Windows API函数 Declare PtrSafe Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long, ByVal hMod As Long, ByVal dwThreadId As Lo
Excel VBA 编程学习指南，1.1 什么是VBA及其应用场景
第一章：VBA简介 1.1 什么是VBA及其应用场景 Visual Basic for Applications (VBA) 是一种内置于Microsoft Office应用程序中的编程语言。它主要用于自动化重复性任务、创建用户自定义的功能，以及扩展Excel等Office程序的功能。VBA是一种事件驱动的编程语言，这意味着它可以响应用户的操作或其他事件，从而自动执行一系列预定义的动作。
使用VBA快速创建非规则数据图表
实例需求：工作表中共有4组数据，第一组数据涵盖所有日期，其他3组均为断续数据。 现在需要创建如下图所示的线图，由于数据区域是非连续的，因此无法直接创建图表。 需要先将数据表按照日期对齐，如下图所示，才能创建图表。 Sub Demo()Dim i As Long, j As Long, iCol As Long, ColCnt As LongDim arrData, arrData
026集—CAD中多段线批量增加折点（相交点）——vba代码实现
当需要批量在多段线中加入顶点（与多段线相交的点）时，如下图所示：若干条线相交： 我们想在相交处增加折点，可通过vba插件一键完成。 （使用方法命令行输入：vbaman,加载插件，vbarun,运行插件即可。） 同时，本插件支持闭合图形增加相交点为顶点： 当多次执行此程序，多段线不会增加大量重复相交点，避免产生大量距离过近的点、重复点。 另附部分源代码可供参考: Sub
VBA技术资料MF190：等到特定时间或特定秒数
我给VBA的定义：VBA是个人小型自动化处理的有效工具。利用好了，可以大大提高自己的工作效率，而且可以提高数据的准确度。“VBA语言専攻”提供的教程一共九套，分为初级、中级、高级三大部分，教程是对VBA的系统讲解，从简单的入门、到入门后的提高、到数据库、到字典、到Word VBA的应用、到高级网抓及类的应用、一直讲到程序的分发。另外，为了方便大家在写代码是方便查找，“VBA语言専攻”又推出了一部V
VBA调用Office的MODI组件识别图片中的文字
Microsoft Office Document Imaging (MODI)是Office 2003-2007版本中的一个利用OCR（Optical Character Recognition 光学字符识别）技术识别图像中的文字并转换为文本的一个组件。在VBA中使用该组件需要在“工具-引用”中将其设置为“可使用的引用”，如下图： VBA识别代码如下： Private Sub
在VBA中调用Adobe Acrobat或Reader的命令行工具，实现PDF自动打印 (‾◡◝)
在VBA（Visual Basic for Applications）中自动打印PDF文件通常不直接支持，因为VBA本身是针对Microsoft Office应用程序（如Excel、Word和PowerPoint等）的编程语言，并不直接处理PDF文件。但是，你可以通过调用Adobe Acrobat或Reader的命令行工具间接实现自动打印PDF文件的功能。 一、操作步骤 首
VBA技术资料MF165：关闭当前打开的所有工作簿
我给VBA的定义：VBA是个人小型自动化处理的有效工具。利用好了，可以大大提高自己的工作效率，而且可以提高数据的准确度。“VBA语言専攻”提供的教程一共九套，分为初级、中级、高级三大部分，教程是对VBA的系统讲解，从简单的入门、到入门后的提高、到数据库、到字典、到Word VBA的应用、到高级网抓及类的应用、一直讲到程序的分发。另外，为了方便大家在写代码是方便查找，“VBA语言専攻”又推出了一部V
VBA：demo大全
VBA常用小代码合集，总有一个是您用得上的~ (qq.com) 如何在各个分表创建返回总表的命令按钮？ 今天再来给大家聊一下如何使用VBA代码，只需一键，即可在各个分表生成返回总表的按钮。 示例代码如下： Sub Mybutton()Dim sht As Worksheet, btn As Button, strShtName As StringOn Error Resume Ne
VBA学习(18)：VBA制作任意工作表均可使用的聚光灯
在需要制作聚光的工作簿，按<ALT+F11>组合键，打开VBE编辑器。在右侧[工程资源管理器窗格]选中ThisWorkbook模块，将以下代码复制粘贴到该模块的代码窗口。 Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)Application.ScreenUpdating =