VBA—按某个工作表某列数据拆分成多表格Sub cfsj() Dim i As Integer Dim j As Integer Dim hs, hss As Integer...
IP属地：北京
VBA—按某个工作表某列数据拆分成多表格Sub cfsj() Dim i As Integer Dim j As Integer Dim hs, hss As Integer...
案例一：VBA应用—给单个工作表加密 第一步 在thisworkbook写入 Private Sub Workbook_Open() Excel.Application.En...
1 在VBE界面中工具—引用 勾选MicrosoftActiveX Data Objects x.x Library 2 连接代码 Sub test() Dim conn ...
VBA—使用ADO连接外部Excel数据源 连接步骤： 1 在VBE界面中工具—引用 勾选MicrosoftActiveX Data Object x.x Librar 2 ...
VBA—使用ADO连接外部Excel数据源 连接步骤： 1 在VBE界面中工具—引用 勾选MicrosoftActiveX Data Object x.x Librar 2 ...
Application.Dialog的参数 名称值说明 xlDialogActivate103“激活”对话框 xlDialogActiveCellFont476“活动单元格字...
合并选择的多个excel文件下所有的工作表合并到一个工作簿里 Sub test() Dim str() Dim i As Integer Dim wb, wb1 As Wor...
合并选择的excel文件下所有的工作簿 Sub test() Dim str As String Dim wb As Workbook Dim Sht, sht1 As Wo...
GetOpenFilename 合并选择的excel文件下所有的工作簿 Sub test() Dim str As String Dim wb As Workbook Dim...
Inputbox函数样式参数 Inputbox方法样式参数 参数： Inputbox(提示文字，标题文字，默认值，左边距，上边距，帮助文件，帮助文件索引，输入类型) A= A...
Msgbox(提示文字，按钮类型，标题文字，帮助文件，帮助文件索引) Msgbox对话框的样式参数 vbOKOnly0只显示 确定 按钮 VbOKCancel1显示 确定 及...
输入某个字母或文字，动态筛选显示下拉列表 第一步 M列函数 查找所输入的内容是否在所对应的单元格里，seach函数返回所在位置，不在的话返回false返回内容是数字,由isn...
Sub chaxun() Sheet1.Range("d20").ClearContents On Error Resume Next For i = 2 To Sh...
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)y = Format...
