- 博客(26)
- 资源 (6)
- 收藏
- 关注
原创 mysql 存储函数错误1418 - This function has none of DETERIMINISTIC, NO SQL...的两种解决办法
解决办法二:先执行一下代码再进行保存存储函数。
2024-07-16 14:15:31 230
原创 在Excel中使用SUMPRODUCT和COUNTIF函数实现去重计数
Excel实现非重计数,在Excel中使用SUMPRODUCT和COUNTIF函数实现去重计数
2023-10-11 11:50:01 5052
原创 EXCEL去除特殊格式的方法,去除单元格值为空的公式,去除异常公式
在操作数据时,空格、换行符、单引号、不可见字符会影响到我们对数据的处理,我们可以使用WPS EXCEL自带的工具进行清理。在开发工具,visual vasic 编辑器中运行以下代码,可以清除所有为空的有公式的单元格,及公式错误的单元格。如果单元格中有公式,此种清理方式是。Excel清除空值公式和公式异常演示视频。开始-清理-特殊字符。
2023-10-10 13:50:30 346
原创 MySQL8.0关闭 ONLY_FULL_GROUP_BY模式
打开你的MySQL数据目录,找到my.ini文件。一般默认数据目录:C:\Program Files\MySQL\MySQL Server *.*打开文件,在文件最下面添加,如图所示内容,保存即可。
2023-10-10 11:15:52 1227
原创 ExcelVBA 宏 查找最后一列,查找最后一行,查找最后一个单元格
ExcelVBA 宏 查找最后一列,查找最后一行,查找最后一个单元格。返回最后一行行数,返回最后一列列数,返回最后一个单元格地址
2022-07-15 09:20:24 8561 1
原创 Excel 获取最大值的位置单元格地址 通过位置获取单元格的值
获取的逻辑:先获取左上角的单元格行列信息(通过row和column函数),然后获取要找的值在这个区域的相对位置(match函数),行与行相加得到最终的行,列与列相加得到最终的列,再通过address函数转化为单元格地址。几个函数的使用方法自行查询,这里不多介绍。获取单元格地址第一种=ADDRESS(ROW(B3)+MATCH(MAX(B3:B9),B3:B9,0)-1,COLUMN(B3),4)第二种=CHAR(64+COLUMN(B3))&(ROW(B3)+MATCH(MAX(B3:
2021-10-19 15:36:56 3115
原创 ExcelVBA 宏 将数字转换为列号/列字母/列名 数字字母转换
1.利用自带的columns函数如Columns(27).Address表示27列的地址,也就是"$AA:$AA"2.使用split函数按照字符"$"进行拆分得到数组,索引为2的就是我们需要的列字母Function ColLetter(Num As Long) As String ColLetter = Split(Columns(Num).Address, "$")(2)End Function......
2021-10-11 09:41:35 8103 2
原创 VBA 连接数据库
ExcelDim conn As New ADODB.Connectionconn.Open "Provider = Microsoft.ACE.OLEDB.12.0;Data Source=D:\adta\data.xlsx;extended properties=""excel 12.0;HDR=YES"""AccessstrConn = "Provider = Microsoft.ACE.OLEDB.12.0;Data Source=D:\data\Adata.accdb"Mysql数据
2021-07-23 11:43:53 816
原创 VBA 字母和数字互换,Cells和Range转换
这里给两个写好的函数1.数字转为字母,输入数字即可转化为列号(这里最大到ZZ),比如:NumToLetter(28)="AB"Function NumToLetter(num As Long) As StringDim alphabet()'a-z字母表alphabet() = Array("A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U
2021-05-20 16:54:23 4761 3
原创 VBA 判断inputbox是否输入,是否为空,是否为整数
Sub test()'输入需要的数字examRoomCol = InputBox("请输考场号所在列?例:14")If StrPtr(examRoomCol) = 0 Then MsgBox "点击了取消或是直接关闭了窗口。"Else If Len(examRoomCol) = 0 Then MsgBox "输入了空白值。" ElseIf IsNumeric(examRoomCol) = False Then MsgBox "输入...
2021-05-20 16:40:34 4924
VBA 按照某一列进行筛选拆分数据,拆分成多个表或多个Sheet,按某列检查重复生成新的Sheet,删除除本表外的所有表
2021-05-21
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人