- 博客(93)
- 资源 (1)
- 收藏
- 关注
RSS订阅
原创 Excel多标签插件|VSTO
Excel多标签插件，用vb.net写的，纯粹只有Excel多标签的vsto，体积很小。压缩包中双击setup.exe或MultiTab.vsto。需求：.net 4.6.2，Excel 2010以上。
2024-03-28 15:18:31
511
原创 VB / VBA 自制二维码小工具
现在二维码的使用越来越广泛了，广告、网址等等都用上了从网上找了一个二维码的控件，自己做了个小工具。 二维码可以把一串字符，不管长短（没试过最长能多长），做成二维码图片现在的的智能手机软件很多都有扫描二维码的功能，比如微信、我查查，等等。 点击下面下载相应的文件 下载： 二维码小工具-VBA写的下载： 二维码小工具-VB写的下载： 二维码控件-QRMaker1.3 控件是必须
2013-11-15 16:38:46
12948
1
原创 VB.NET中SelectToken与JSONPath的简单查询
通过灵活组合 JSONPath 和JArrayJObject的操作，可以高效处理 JSON 数据的查询、修改和分析。
2025-03-11 11:28:16
929
原创 forfiles命令的基本语法与示例
forfiles是一个强大的Windows命令行工具，用于遍历目录结构中的文件，并对符合条件的文件执行命令。它特别适合用于批处理文件、系统维护脚本和自动化任务中，例如文件清理、权限更改或文件移动等操作。forfiles。
2024-07-04 11:58:16
1484
原创 vb.net中LINQ的各个实用用法
在VB.NET中，LINQ（Language Integrated Query）提供了丰富的查询功能，使得编写针对各种数据源的查询变得简单且一致。：根据给定条件从数据源中筛选出符合条件的元素。假设有一个Students：对数据源中的元素进行升序或降序排序。对于一个Products。
2024-04-25 11:21:04
1172
原创 Pandas中DataFrameGroupBy.agg函数支持的方法
aggregate方法允许您对分组后的数据应用各种聚合函数，以计算每组中的列值的特定统计量或执行其他聚合操作。它支持内置的NumPy函数、Pandas提供的统计方法以及其他可向量化应用的Python函数。还支持您自定义的 Python 函数，只要这些函数能够接受数组（如NumPy数组或Pandas Series）作为输入，并返回单个值或一个与输入形状相同的新数组。支持广泛且灵活的聚合函数选择，包括但不限于上述列出的内置函数以及用户自定义函数，可以根据实际数据分析需求进行选择和组合。您可以通过传递一个字典给。
2024-04-12 11:01:23
1424
原创 Pandas-用一个dataframe去更新另一个dateframe
两个dataframe更新，可以用update来进行，update是使用index来匹配的。先将两个要匹配的列转成index，可以用reset_index，将LETTER再转回列。用dfb的值，去更新（代替）dfa中对应的值。直接使用update来更新。...
2022-08-12 15:12:31
2903
原创 VBA dialogs 调用对话框
Application.Dialogs(1).Show是调用打开对话框Application.Dialogs(5或145).Show是调用另存为对话框，Application.Dialogs(6).Show是删除文档Application.Dialogs(7).Show是页面设置Application.Dialogs(8).Show是打印对话框Application.Dialogs(9).Show是选择打印机对话框Application.Dialogs(12).Show是重排窗口设置...
2021-11-03 12:06:35
1528
原创 txt文本转azw3(kindle格式)
txt转azw3(kindle书本格式，可以调整字体)的小工具，用python写的。txt2azw3.zip 下载地址（访问密码：6743）将txt文档拖到下面方框中（可批量转换），点【转换】即可 。调用kindle自产的kindlegen来转换。...
2021-08-06 15:15:06
4019
原创 批处理for命令详解(转)
FOR这条命令基本上都被用来处理文本,但还有其他一些好用的功能! 看看他的基本格式(这里我引用的是批处理中的格式,直接在命令行只需要一个%号) FOR 参数 %%变量名 IN (相关文件或命令) DO 执行的命令 参数:FOR有4个参数 /d /l /r /f 他们的作用我在下面用例子解释 %%变量名 :这个变量名可以是小写a-z或者大写A-Z,他们区分大小写,FOR会把每个读取到的值给他;...
2021-07-27 18:33:10
855
原创 WinRAR的命令行模式用法介绍
WinRAR.exe为安装完后，从安装目录将主程序winRAR.exe拷贝出来即可，该程序是独立可运行的。以下为winRAR的命令帮助原文：Alphabetic commands lista add files to an archive c add an archive comment ch change archive parameters cv convert archives cw write an archive comment to fi
2021-07-22 16:36:29
5047
原创 Python pandas 各类 操作 备忘
>>> import pandas as pd>>> factors={'2021':36.45,'2020':35.43,'2019':34.65,'2018':33.9,'2017':33.14}# 必须加index，index中是列表,列表个数，即为记录数。# 下面是以关键字为列名，共5列>>> df = pd.DataFrame(factors,index=[1])# 结果如下： 2021 2020 2019 2...
2021-03-30 17:45:34
763
原创 adodb 未找到提供程序。该程序可能未正确安装。解决方法
System.Runtime.InteropServices.COMException:“未找到提供程序。该程序可能未正确安装”。出现这个提示，应该是少了acces_engine。去微软官网上下载AccessDatabaseEngine_X64.exe（或者AccessDatabaseEngine.exe）。如果是64的（但是安装了32位的OFFICE)，可能会提示：您不能安装64位版本的Microsoft Access 2010数据库引擎...可以使用下面的命令来强制安装 AccessD.
2021-03-19 10:12:54
4027
原创 Python 练习题
题目：求s=a+aa+aaa+aaaa+aa...a的值，其中a是一个数字。例如2+22+222+2222+22222(此时共有5个数相加)，几个数相加由键盘控制。程序分析：关键是计算出每一项的值。列表生成式直接生成函数def sn(base,times): return sum([int(str(base)*x) for x in range(1,1+times)])&...
2019-11-25 15:42:04
582
原创 Python 水仙花数
水仙花数是指一个 n 位数（n≥3 ），它的每个位上的数字的 n 次幂之和等于它本身如n=3，则指一个三位数，其各位数字立方和等于该数本身。例如：153是一个"水仙花数"，因为153=1的三次方＋5的三次方＋3的三次方。下面列表生成式可以直接得到100-1000的水仙花数 (Python 3)[ x for x in range(100,1000) if x ==((x // ...
2019-11-22 17:48:14
1512
原创 Python 斐波那契数列
Python 斐波那契数列def fib(n): a=[0,1] while len(a)<n: a.append(a[-1] + a[-2]) return a[:n]print(fib(13))结果为：[0, 1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89, 144]...
2019-09-10 14:19:26
859
原创 Python 杨辉三角
#!/usr/bin/python3# -*- coding:utf-8 -*-def triangles1(n): a=[1] print('1'.center(90)) while len(a)<=n: ar = [0] + a + [0] a = [ar[x-1] + ar[x] for x in ...
2019-09-10 11:46:39
371
原创 Python 约瑟夫生者死者小游戏
Python 约瑟夫生者死者小游戏30 个人在一条船上，超载，需要 15 人下船。于是人们排成一队，排队的位置即为他们的编号。报数，从 1 开始，数到 9 的人下船。如此循环，直到船上仅剩 15 人为止，问都有哪些编号的人下船了呢？a =list(range(1,31))while len(a)>15: print(f'{a[8]}号下船了') ...
2019-09-09 14:56:16
1094
转载 EXCEL SAVEAS XlFileFormat 详解
XlFileFormat 枚举NameValue后缀名详细说明Description说明xlAddIn18*.xlaxlAddIn Microsoft Office Excel 加载宏(*.xla) Microsoft Excel 97-2003 Add-InExcel 2007 加载项xlAddIn818
2014-06-20 12:25:48
8397
转载 ios 7.x.x 不越狱添加输入词库
一、准备软件：1、iBackupBot for iTunes 5.1注册iBackupBot help->registerediBackupBot注册码如下：用户名：AXiS - Fighting For Fun注册号：B6ECEFB6E061BC8B2B23459EFE035ABF877E8B1F5BE9245111939AAB2B10AB12、SQLiteExpert
2014-05-19 15:59:09
2117
原创 EXCEL 单变量求解 解一元三次方程
目标单元格：是公式所在的单元格，也是方程所在的单元格，如图中的B1=3*A1^3-100*A1^2+300*A1-300目标值：即目标单元格的值，想要让单元格的值变成多少？即要让方程的结果等于多少 ，一般方程来说就是 =0可变单元格：即变量所在，也就是我们所说的”元“，即 "X" ，这个X是可变的，在EXCEL中很直观，就是一个单元格总体来说，这个操作，就是让EXCEL自动迭代去计算
2013-12-12 18:24:00
16262
原创 Excel VBA 打开百度网页输入关键字并搜索
Sub 百度搜索()'Excel VBA 打开百度网页输入关键字并搜索Dim KW, SuWith CreateObject("InternetExplorer.Application").Navigate "http://www.baidu.com/".Visible = TrueDo Until .readyState = 4DoEventsLoop'Set KW = .do
2013-12-05 00:55:35
8469
转载 EXCEL <-> SQL 导入导出的语句
Excel导入SQL从Excel文件中,导入数据到SQL数据库中,很简单,直接用下面的语句:/*===================================================================*/--如果接受数据导入的表已经存在insert into 表 select * fromOPENROWSET('MICROSOFT.JET.OLEDB.4.0
2013-11-26 12:33:53
1135
转载 VB6.0 正则表达式
引用了Microsoft VBScript Regular Expressions 5.5 后就可以声明正则相关对象了。主要有三个对象：RegExp、MatchCollection、Match。 1. RegExp 这是VB使用正则表达式匹配模式的主要对象了。其提供的属性用于设置那些用来比较的传递给 RegExp 实例的字符串的模式。 其提供的方法以确定字符串是否与正则表达式的特定模
2013-11-20 15:58:36
1863
转载 VBScript文件操作对象FSO大全
基本运算 + 数字加法及字符串连接 - 数字减法 * 数字乘法 / 数字除法 Mod 求余数 \ 求商数 & 字符串连接 ^ 次方 = 相等 <> 不相等 >= 大于或等于 > 大于 <= 小于或等于 < 小于 Not 非 And 且 Or 或 Xor 异或 循环及决策 if .
2013-11-19 15:10:23
2509
原创 将Excel数据写入到TXT中
将Excel中的数据，写入到TXT中，以TAB分隔，便于导入EXCEL中注意红色部分的用法，能大幅提高写入速度Sub GetDataFromExcel()Dim arr, brr, tt = Timerarr = ActiveSheet.UsedRangeReDim brr(1 To UBound(arr, 1))For a = 1 To UBound(arr, 1) brr
2013-11-15 16:38:53
2739
原创 Excel 抽取不重复项的公式
Excel 抽取不重复项的公式假设数据在A列，则用以下公式，可以抽取出A列所有的不重复项（修改999可以修改影响到的行数）=IFERROR(INDEX(A$1:A$999,SMALL(IF(IFERROR(MATCH(A$1:A$999,A$1:A$999,),0)=ROW($1:$999),ROW($1:$999),4^8),ROW(A1))),"")如下图中，E1开始输入以上公式（是数组
2013-11-15 16:38:50
4959
原创 用代码给VBA添加工程密码
VBA代码，给VBA添加工程密码SubAddVBProjectProtection() On Error Resume Next Set Obj =Application.VBE.ActiveVBProject ' 检查是否勾选VBA工程访问权限 If Err.Number<> 0 Then MsgBox "请勾选信任对VBA工程对象模型的访问": Exit Su
2013-11-15 16:38:48
5607
原创 EXCEL使用VBA+SQL计算重复项之和
目的：以A列为标准，取得相同编号的C,D,E,F列的值之和。（去掉重复项，合并掉后面4列的值） 其实如果用函数是可以的，比如用Sumif，但是如果数据量过多，用函数的话可能不太好。 这里用VBA，而且使用SQL语句（数据大的话会快些），当然也可以用数组。 Sub GetDd() Dim Cnn,Rs, SqlsTr$ Set Cnn =Creat
2013-11-15 16:38:44
3788
原创 VBA自定义菜单和菜单栏
在EXCEL中，我们的操作都是通过“工具栏、菜单栏、快捷菜”单实现。EXCEL通过菜单给我们提供基本操作功能之外，也为我们提供了扩展自定义功能的接口，即自定义自己的工具栏、菜单栏。本文着重介绍如何在 Excel2003版本中通过编程方式自定义菜单和菜单栏方法。其中包含Excel中管理和自定义菜单栏、菜单、命令、子菜单和快捷菜单，我将通过代码实例分步说明。与大家分享关于VBA实现菜单栏管
2013-11-15 16:38:42
12212
原创 OLE DB 提供程序 'Microsoft.Jet.OLEDB.4.0' 报错
OLE DB 提供程序 'Microsoft.Jet.OLEDB.4.0' 报错。提供程序未给出有关错误的任何信息SQL语句：select * fromopenrowset ('Microsoft.Jet.OLEDB.4.0','Excel 8.0;Database=D:\zl\by.xls','select * from[Sheet1$]') 出现了以上的错误，主要原因是：EX
2013-11-15 16:38:40
2794
原创 win2003安装SQL2000提示某个安装程…
开始->运行->regedit到HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\SessionManager 位置选择文件->倒出,保存在右边窗口右击PendingFileRenameOperations，选择删除，然后确认重启安装，问题解决有时个在HKEY_LOCAL_MACHINE\SYSTEM\ControlSet01和C
2013-11-15 16:38:38
935
原创 常用的正则匹配
"^\d+$" //非负整数（正整数 + 0） "^[0-9]*[1-9][0-9]*$" //正整数 "^((-\d+)|(0+))$" //非正整数（负整数 + 0） "^-[0-9]*[1-9][0-9]*$" //负整数 "^-?\d+$" //整数 "^\d+(\.\d+)?$" //非负浮点数（正浮点数 + 0） "^(([0-9]+\.[0-9]*[1-9
2013-11-15 16:38:36
844
原创 正则表达式语法
正则表达式语法一个正则表达式就是由普通字符（例如字符 a 到z）以及特殊字符（称为元字符）组成的文字模式。该模式描述在查找文字主体时待匹配的一个或多个字符串。正则表达式作为一个模板，将某个字符模式与所搜索的字符串进行匹配。这里有一些可能会遇到的正则表达式示例：Visual Basic Scripting EditionVBScript匹配/^\[ \t]*$/"^\[ \
2013-11-15 16:38:34
832
转载 用VBA读写excel文档属性
原文地址：用VBA读写excel文档属性作者：严雪用VBA读写excel文档属性2011-01-0408：08要实现限制文件的使用次数，想来应该在某个地方存储文档已用的次数，并且在文档每被使用一次这个使用次数就得发生相应的更改。如果这个思路正确的话，我们就可以利用文档属性的某个位置来实现这一想法，故有了以下两种形式：一、利用自定义属性：因为我们可以自定义数字型的属性，这一点非常符合我们的需求
2013-11-15 16:38:31
3236
原创 EXCEL 公式 多列转成一行
EXCEL 公式 2列多行转成1行=OFFSET($A1,ROUNDUP(COLUMN(A1)/2,0)-1,MOD(COLUMN(B1),2))公式 多列转成一行" TITLE="EXCEL 公式 多列转成一行" />3列多行转成1行=OFFSET($A1,ROUNDUP(COLUMN(A1)/3,0)-1,MOD(COLUMN(C1),3))以此类推，4列以上的呢？大家可以自己试
2013-11-15 16:38:29
1869
约瑟夫生者死者小游戏.py
2019-09-09
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人