在Excel中利用宏定义实现MD5加密和批量加密

想试试excel表格的批量插入,在网上找了一些方法,结合方法自己总结了下!
分为四步
    1.下载宏文件【md5宏】
     下载宏地址:https://pan.baidu.com/s/13YGDNP_tmvock5CBHOM0dg 提取码:oeku
    2.加载宏
        打开excel-->文件-->选项-->自定义功能区-->开发工具-->勾选开发工具


  3.点击开发工具--->点击加载项

4.勾选Md5宏加载

注:弹框直接关掉就好,后面会告诉你解决办法

5.输入函数:=LOWER(Md5_String_Calc(A2)(注--A2是加密id的坐标) 回车
这里加密可能出现的问题;如果输入函数没有出现密文,设置下
单元格的格式为"常规"

6.选中加密后的单元格,拖动单元格;

7.再次打开excel表格是后会出上面说的弹框,这是加载宏后出现的,所以直接关闭这个宏就好,就不会弹出这个框

方法千万条,结果只有一条,如果你有更佳好的方法,可以关注我的公众,里面有你喜欢的浏览器插件,叫你如何白嫖的网站技巧,欢迎一起学习一起交流

  • 5
    点赞
  • 16
    收藏
    觉得还不错? 一键收藏
  • 1
    评论
Excel是一种用于自动化操作和编程的功能。MD5是一种常用的哈希加密算法,用于将数据转换为固定长度的散列值。在Excel使用实现MD5加密的过程如下: 1. 打开Excel,并按下"Alt + F11"打开Visual Basic for Applications(VBA)编辑器。 2. 在VBA编辑器,选择插入(Insert)并点击模块(Module)。 3. 在新建的模块,编写VBA代码实现MD5加密算法。以下是一种可能的实现方式: ``` Function MD5hash(ByVal str As String) As String Dim enc As Object Dim encStr As String Set enc = CreateObject("System.Security.Cryptography.MD5") encStr = StrConv(str, vbFromUnicode) With CreateObject("System.Text.UTF8Encoding") MD5hash = Application.WorksheetFunction.EncodeBase64(enc.ComputeHash_2(.GetBytes_4(encStr))) End With Set enc = Nothing End Function ``` 4. 在VBA编辑器保存代码,并关闭编辑器。返回Excel工作表。 5. 在一个单元格输入要加密的字符串(例如,A1单元格),然后在另一个单元格使用函数"=MD5hash(A1)"调用自定义的MD5hash函数即可实现MD5加密。 6. 按下"Enter"键,将字符串的MD5加密结果显示在对应的单元格。 以上步骤的VBA代码将字符串转换为UTF-8编码后,使用MD5算法计算散列值,并将结果进行Base64编码,最后传递给工作表函数。这样,字符串就被成功加密MD5值。 需要注意的是,ExcelMD5加密只适用于简单的数据加密需求,对于更高级的安全需求,建议使用专门的加密工具和算法来实现

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值