- 博客(28)
- 收藏
- 关注
RSS订阅
原创 Excel VBA高级编程-微信群发消息工具
前言：这是一份基于Excel 实现的微信群发脚本，突破了微信不能群发链接的限制，可以根据备注名自动替换文本内容。因为是模拟人工操作的脚本，所以没有被封号的担忧。
2020-09-15 12:30:50
10578
36
原创 Excel VBA 高级编程-库存管理系统表
大家好，我是陈小虾，是一名自动化方向的IT民工。写博客是为了记录自己的学习过程，通过不断输出倒逼自己加速成长。但功能说明：由于水平有限，博客中难免会出现一些BUG，或者有更优方案恳请各位大佬不吝赐教！微信公众号：万能的Excel不管你是微商、个体户、还是财务人员。客户来了，你得查商品价格客户下单了，你得知道还有多少库存货卖完了，你得找供应商进货客户退货了，你得去翻聊天记录退款给人家产品出问题了，你得知道找谁去算账看似忙于工作，实则时间都花在这些事情上莫慌，这份《出入..
2020-09-11 14:54:34
6109
18
原创 Excel VBA 高级编程-工资条模板考勤工资管理系统
大家好，我是陈小虾，是一名自动化方向的IT民工。写博客是为了记录自己的学习过程，通过不断输出倒逼自己加速成长。但由于水平有限，博客中难免会出现一些BUG，或者有更优方案恳请各位大佬不吝赐教！微信公众号：万能的Excel相信每个月的月末都是HR最难过的时间统计员工考勤、计算工资、做工资条关键是当老板想看某一个员工的收入情况时，查起来那也是想当吃力…莫慌，这份《考勤工资模板》一步解决所有问题1、员工信息表录入对应员工数据，用于-12月份数据导入2、1-12月份工...
2020-09-10 14:25:48
2724
2
原创 Excel VBA 高级编程-出入库系统
大家好，我是陈小虾，是一名自动化方向的IT民工。写博客是为了记录自己的学习过程，通过不断输出倒逼自己加速成长。但功能说明：由于水平有限，博客中难免会出现一些BUG，或者有更优方案恳请各位大佬不吝赐教！微信公众号：万能的Excel1.本表由VBA编码制作而成请使用office版，用户使用本模板时需启动宏，工作表中带有公式的不用去填写也不要去更改，本工作簿需要用户将基础信息录入进来，方便入库单和出库单的信息录入。2.入库单和出库单供应商和客户的信息都可以双击单元格弹出窗体，选中窗体信息双击即可完成录.
2020-09-09 23:12:41
9027
18
原创 Excel VBA 高级编程-库存管理-出入库系统
大家好，我是陈小虾，是一名自动化方向的IT民工。写博客是为了记录自己的学习过程，通过不断输出倒逼自己加速成长。但功能说明：由于水平有限，博客中难免会出现一些BUG，或者有更优方案恳请各位大佬不吝赐教！微信公众号：万能的Excel功能说明：1、根据每天的出库、入库记录，自动筛选出产品ID号2、实时统计每个产品的库存状态3、自动统计每个月产品总出库、入库数量关注公众号：万能的Excel 并回复【进销表】获取源文件！Private Sub Worksheet_Sele...
2020-09-01 16:52:01
10607
10
原创 Excel VBA 高级编程-跨表格多条件筛选
大家好，我是陈小虾，是一名自动化方向的IT民工。写博客是为了记录自己的学习过程，通过不断输出倒逼自己加速成长。但由于水平有限，博客中难免会出现一些BUG，或者有更优方案恳请各位大佬不吝赐教！微信公众号：万能的Excel功能说明：本案例是应用在股票系统分析的时候，需要从原始数据的表格中，筛选出自己需要的一些数据，并生成TXT 文件本工作表使用VBA实现了如下功能：1、跨表格多条件筛选2、在新表格输出结果3、将结果生成TXT文件关注公众号：万能的Excel 并回复【跨表格...
2020-08-24 16:37:14
4615
原创 Excel表格制作教程-合并相同项，并将对应的值求和
要求： 1、将相同ID号，相同物料的行合并 2、将同一个ID号的所有项都相加求和附上代码：Sub test1() Dim d1 As Object, d2 As Object, arr, i As Integer, k, brr Set d1 = CreateObject("scripting.dictionary") ...
2019-07-22 12:25:52
5762
原创 Excel VBA高级编程 - 根据关键字自动搜索，自动生成下拉菜单
因为工作需要，每一次都要从SAP查找物料信息，手动生成物料清单（Boom表），繁琐且容易出错。使用VBA实现了如下功能：1、根据关键字，自动检索符合条件的产品信息2、自动生成下拉菜单3、选定物料名称，其他产品信息将自动对应输入附件代码：Private Sub Worksheet_Change(ByVal Target As Range)Dim whereStr$, sql$, conn, mr%,...
2018-06-13 22:20:14
19862
8
原创 桌面客户端上登入Gmai 邮箱
针对桌面的客户端收发Gmail 邮件，不管是Outlook, foxmail 等都会遇到--无法登录到 传入（IMAP）服务器 的情况，后面才知道需要在邮件网页端那边进行必要的设定。
2022-04-10 22:17:56
1827
原创 如何做投资--入门篇
在正式进入市场之前，我希望你能知道你的目标收益，市场中大部分人是怎么挣钱的，以及你所要面临的风险；首先，先要给你泼一盆冷水，投资不是拿一万块钱买个股票，然后翻三倍的游戏；在我看来，股市本身就是一个赌场，他不会因为你长时间跟踪K线，而多分配一些收益。他更多的是你对风险的把控，以及对背后的经济和商业世界的理解。它是一个将你的认知变现的地方，通过你的智慧和耐心，延迟享受，最后获得超额收益。拿钱投资时，你想获得多少的利益，应该取决于你想吃的好还是睡得香--J• Kenfield Morley 《Some T
2022-01-09 10:27:12
337
原创 Excel VBA高级编程-股票大盘跟踪
大家好，我是陈小虾，是一名自动化方向的IT民工。写博客是为了记录自己的学习过程，通过不断输出倒逼自己加速成长。功能说明：由于水平有限，博客中难免会出现一些BUG，或者有更优方案恳请各位大佬不吝赐教！微信公众号：万能的Excel最近市场血雨腥风。工作忙了一天，打开股票一看！又是白干的一天。。。在工位上拿着手机盯盘，总觉得背后还有一双眼睛。于是只能增加上厕所的频率！今天给大家分享一个最近做的盯盘Excel 表格，还能跟踪一下主力走向！都是我交了很多真金白银后，获得的经验。0..
2021-09-05 16:03:15
1370
原创 Excel VBA 高级编程-客户跟进管理系统
大家好，我是陈小虾，是一名自动化方向的IT民工。写博客是为了记录自己的学习过程，通过不断输出倒逼自己加速成长。功能说明：由于水平有限，博客中难免会出现一些BUG，或者有更优方案恳请各位大佬不吝赐教！微信公众号：万能的Excel身为一名业务员，尤其是工程类的业务，往往周期长、中间还穿插着各种技术协商细节，随着时间的推移，客户越来越多，你也越来越乱。。。几个项目同时进行，重要的客户，跟着跟着就忘了老板想看你的客户跟进进度，你也不知道从何找起于是，痛下决心做了一份《客户跟进管理系统》..
2021-04-03 11:29:13
1845
5
原创 列车和安全门之间缝隙检测方案
据报道，仅在2020年国家发改委分别批复了8座城市轨道交通重大项目，涉及35条城轨线路建设，总投资额约4719.89亿，里程合计595.75公里。据初步不完全数据统计， 2021年将是中国城市轨道交通开通大年， 预计将有56条线路开通， 分布在北京、 武汉、 杭州、 预计新增开通运营里程达1202.25公里， 新增车站802个。近年来，地铁不仅方便了小伙伴们的生活，更加缓解了各大城市交通拥堵的情况。随之 而来的是客运压力不断增加， 巨大的客流量也为车站业务带来相应的压力， 各种安全事故也层出不穷， 缺乏
2021-04-01 17:31:00
636
原创 Excel VBA编程教程--excel录制宏做数据录入
大家好，我是陈小虾，是一名自动化方向的IT民工。写博客是为了记录自己的学习过程，通过不断输出倒逼自己加速成长。但功能说明：由于水平有限，博客中难免会出现一些BUG，或者有更优方案恳请各位大佬不吝赐教！微信公众号：万能的Excel一谈起编程，很多人就头痛！身边很多配朋友都找我抱怨：我是做财务的/做行政的/做工程的，我压根就没有学过编程！！！那么今天小编就手把手教你，让Excel自动编程！争取今天又可以不用加班！！！开启录制宏功能：启动宏录制功能step1:选中表格中A1单元格...
2020-11-26 22:19:12
7212
2
原创 Excel数据可视化表盘模板
大家好，我是陈小虾，是一名自动化方向的IT民工。写博客是为了记录自己的学习过程，通过不断输出倒逼自己加速成长。但功能说明：由于水平有限，博客中难免会出现一些BUG，或者有更优方案恳请各位大佬不吝赐教！微信公众号：万能的Excel天猫双十一成交额4982亿，你贡献了多少？从2009年开始，双十一不仅是消费者的狂欢节，更是各大商家的争奇斗艳的节日。这不，双十一的余温未消，双十二战斗的号角又即将吹起。小编仿佛嗅到了浓浓的火药味了。。。今天，小编为大家准备了一个销售数据看板，希望对大家有帮助。..
2020-11-17 10:01:54
4582
20
原创 Excel VBA高级编程-SQL检索（三）根据日期范围筛选
大家好，我是陈小虾，是一名自动化方向的IT民工。写博客是为了记录自己的学习过程，通过不断输出倒逼自己加速成长。但功能说明：由于水平有限，博客中难免会出现一些BUG，或者有更优方案恳请各位大佬不吝赐教！微信公众号：万能的Excel上一篇我们已经用VBA实现SQL检索，并实现相同项求和的功能。那么如何根据日期范围筛选我们需要的数据呢？今天我们看看另外一个SQL查询结构：SQL = "select 字段1 from [原始数据$] where 出库时间 between #开始时间# And ...
2020-09-29 21:15:47
4423
1
原创 Excel VBA高级编程-SQL检索（二）合并相同项并求和
大家好，我是陈小虾，是一名自动化方向的IT民工。写博客是为了记录自己的学习过程，通过不断输出倒逼自己加速成长。但功能说明：由于水平有限，博客中难免会出现一些BUG，或者有更优方案恳请各位大佬不吝赐教！微信公众号：万能的Excel上一篇我们已经试过用Excel自带的索引完成了一次SQL检索的操作，今天小编带你用VBA实现SQL检索，并实现相同项求和的功能SELECT 字段名1,SUM(字段名2) FROM [原始数据$]) GROUP BY 字段名1 ORDERBY 字段名3废话不多说，...
2020-09-19 16:35:48
2880
原创 Excel VBA高级编程-SQL检索（一）
大家好，我是陈小虾，是一名自动化方向的IT民工。写博客是为了记录自己的学习过程，通过不断输出倒逼自己加速成长。但功能说明：由于水平有限，博客中难免会出现一些BUG，或者有更优方案恳请各位大佬不吝赐教！微信公众号：万能的Excel在日常工作中，在海量数据中筛选出有用的数据是最常见的工作之一，虽然大部分功能都能通过EXCEL公式，例如VLOOKUP/HLOOKUP/LOOKUP 缺点是速度慢，而且不够灵活添加删除数据。那么小编今天就带你试试用SQL查询数据：SELECT * FROM [表名$.
2020-09-18 15:22:55
1606
原创 Excel 学好这个技巧，可以应用到90%场景(一)
SQL数据查询不管是做金融、会计、生产管理。一个月总有那么几天需要面对海量的数据筛选、统计出需要的信息。用VLOOKUP也需要用一次，修改一次公式….今天小虾教你用5行代码，就算你不会编程也能完成一键完成对EXCEL表格的数据筛选案例一：按价格区间，筛选出符合条件的产品附上代码：Sub CC()Set CN = CreateObject("ADODB.CONNECTION")CN.Open "Provider=Microsoft.Ace.oledb.12.0;exte.
2020-09-05 23:05:18
521
原创 Excel VBA 高级编程-来自直男的Excel表白
关注公众号：万能的Excel 并回复【表白】获取源文件！七夕快到了，想用另类的表白方式，奈何自己不懂编程？那我就叫你如何用Excel 表白吧！功能说明：1、自动播放想说的话2、用数学公式自动生成爱心曲线3、一键播放附上代码：Private Sub CommandButton1_Click()Dim i%, j%For i = 0 To 1000Sheet1.Range("a1") = i / 10If i > 100 Thenj = CInt(i...
2020-08-13 10:00:25
1869
2
原创 Excel VBA高级编程 -根据日期查找数据
关注公众号：万能的Excel 并回复【日期搜索】获取源文件！功能说明：打印出货单的时候，经常会需要从数据库中查询一段时间内的所有数据本工作表使用VBA实现了如下功能：1、实时统计重复项2、重复项数据自动求和附上代码Sub lqxs()Dim Cnn As Object, SQL$, shnm$, arr, i&, j&Set Cnn = CreateObject("Adodb.Connection")shnm = Sheet1.Name...
2020-08-11 22:43:20
5691
原创 Excel VBA高级编程 -自动去除重复项 自动求和
功能：1.去除重复项2.自动生成下拉菜单3.重复项自动求和附上代码：Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim d1 As Object, d2 As Object, d3 As Object, arr, i As Integer, k, brr, w1 As String, j% Set d1 = CreateObject("scripting.dictionary...
2020-08-09 17:00:45
4305
原创 Excel VBA高级编程-关键字查找数据库
这个表格的主要功能是：根据输入的关键字找到数据库中，正确的公司名，生成一个下拉菜单，再根据正确的公司名，找到对应的No生成下拉菜单欢迎技术交流：wechat:qq-273404452VBS 代码：Private Sub Worksheet_Change(ByVal Target As Range)Dim whereStr$, sql$, conn, mr&, j%...
2019-07-01 10:26:04
3629
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人