Excel VBA 编程技巧系列（一）替换字符串、加解密字符串和等待外部程序完成

于 2021-12-09 10:05:13 发布
阅读量1.2k 收藏 1
点赞数
分类专栏： VBA杂坛 文章标签： Excel VBA Office 办公自动化 Access 字符串替换 VBA 加解密
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/zglibk/article/details/121805513
版权

在这里插入图片描述

目录



1. 执行多个字符串替换

如何轻松执行多个字符串替换？

当用唯一的字符串去替换一个或多个字符串时的，VBA 替换功能非常好用。但是，如果您有一个包含多个特定字符的字符串实例，且每个实例都必须由不同的字符串替换，那么就不好办了。

一个典型的例子是针对一个 ADO 连接字符串，需要动态替换特定的服务器、数据库、用户名和/或密码。

请看下面的函数，它能快速轻松帮您执行这种基于标记的字符串替换。

  1. 函数

    Public Function szSubstituteText(ByRef szReplacement As String, ParamArray avSubstitutes()</
了解本专栏 订阅专栏 解锁全文 超级会员免费看
←か淡定☆ ヾ
关注
  • 0
    点赞
  • 踩
  • 1
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论
专栏目录
订阅专栏
VBA字符串处理
B!ng
10-27 5227
目录1 VBA中的字符串2 VBA中处理字符串的函数    2.1 比较字符串    2.2 转换字符串    2.3 创建字符串    2.4 获取字符串的长度    2.5 格式化字符串    2.6 查找字符串    2.7 提取字符/字符串    2.8 删除空格    2.9 返回字符代码    2.10 返回数值代表的相应字符    2.11 使用字节的函数    2.12 返回数组的
Excel VBA跨sheet页字符串匹配替换
u011135852的博客
08-11 1140
代码如下： Sub 替换() ' 表制作循环sheet页变量 i = 2 ' 词根循环变量 j = 2 '替换后字符串 replaceStr = "" '判断字符串是否在词根存在 ifExists = 0 '判断表制作sheet页的单元格是否为空，不为空才遍历 Do While Not IsEmpty(Cells(i, 1)) ' 单元格的值赋值给变量 fromStr = Cells(i, 1
c++ string删除指定位置字符_VBA学习笔记35-2:字符串查找替换与转换
weixin_39975529的博客
11-24 490
学习资源：《Excel VBA从入门到进阶》第35集 by兰色幻想二、字符串的查找与替换1.instrinstr(字符串，要查找的字符) 在字符串里从前向后查找，从左到右计数，找到之后就停止。Sub c1() Dim sr sr = "Excel精英培训培训论坛" Debug.Print InStr(sr, "培") End Sub巧用：如果得出的结果大于0，就证明字符存在，可以...
vba替换字符串中的字符_【NO.013】解：多层字符串替换
weixin_39608118的博客
12-10 3360
点上方关注我们，每日1练，每天进步一点点第13期题目内容如下：Excel函数一直缺乏多层替换的功能……比如说，C列有一组数据，现在需要将：月亮替换为星球，太阳替换为星光，梦想替换为起床，我替换为你，今天替换为明天D列是模拟结果于是你默默打开Excel……原题链接：【NO.013】问：多层数据替换如果你还没有做这道题，请先思考再向下看↓↓↓↓分享几种解法，包含了函数、PowerQuery、...
EXCEL VBA字符串替换
热门推荐
wanglz666的专栏
03-30 2万+
问题描述因为模型结构中字段名更改，需要修正对应的EXCEL说明文档。 修正规则如下，将原来的连字符形式改成驼峰式。 原始字段 修正后字段 session_id sessionId 打开VBA这里是使用excel自带的VBA进行处理。 在excel里调出VBA的方法如下图所示。在某个表单上右击，并点击”查看代码“。EXCEl2010的VBA窗口打开如下解决思路将原始字段按照符号”_
Excel中使用VBA替换字符
ahshow的专栏
12-12 1万+
这段代码是把Excel表格中－包含有TextBox1的字符替换为TextBox2的字符，范围是Excel表单最前的四行四列（A1到D4），方法为CommandButton1的点击事件，控件就是2个TextBox和一个CommandButton。Private Sub CommandButton1_Click()MsgBox "替换" + TextBox1.Text + "为" + Text
Excel-VBA宏编程实例源代码-替换样式相同的字符串.zip
12-15
这个压缩包"Excel-VBA宏编程实例源代码-替换样式相同的字符串.zip"提供了一个具体的VBA宏示例，专门用于替换样式相同的字符串。这涉及到对电子表格中的数据进行高级处理，提高工作效率。 首先，我们需要了解VBA的...
字符串加密和解密.rar
06-12
字符串加密和解密.rar 字符串加密和解密.rar
VBA示例之 获取一个字符串中有多少个数字字符
10-26
在VB6.0环境下，VBA（Visual Basic for Applications）是一种强大的编程工具，常用于自动化Excel、Word等Office应用程序的任务。本示例将探讨如何利用VBA来统计一个字符串中包含的数字字符数量。这对于数据处理和...
ExcelVBAComm.rar_EXCEL 串口 VBA_excel vba OpenComm_excel串口_vba串口程序
07-15
Excel VBA串口通信是Excel电子表格应用中的一个高级功能，允许用户通过VBA（Visual Basic for Applications）代码与外部设备进行数据交换，例如传感器、控制器或其他支持串行通信的硬件。这个“ExcelVBAComm.rar_...
vba excel 字符替换
09-15
vba excel 字符替换 学习资料
md5字符串加密 vba
03-04
vba制作的md5字符串加密Demo，希望给大家带来帮助。
VB６．０加密解密字符串
12-28
加密解密字符串.exe　ｈｕａｎｙｉｎ下载
VB 加密 解密字符串的例子
01-12
加密 解密字符串的例子加密 解密字符串的例子加密 解密字符串的例子加密 解密字符串的例子
VB字符串加密解密例子
03-31
一个字符串加密解密的例子，应用很简单，可以直接使用，欢迎下载。
Excel-VBA宏编程实例源代码-判断字符串长度.zip
12-14
本压缩包“Excel-VBA宏编程实例源代码-判断字符串长度.zip”包含了关于如何利用VBA来判断字符串长度的一个具体实例，文件名为“判断字符串长度.xlsm”。 在VBA中，处理字符串是常见的任务之一，而计算字符串的长度...
怎么应用split替换多字符的字串？
05-09 221
string str1="我*****是*****一*****个*****中*****国*****人*****"; string[] str2; str1=str1.Replace("*****","*"); str2=str1.Split('*'); string str1="我**是****一*****个*****中*****国*****人*****"; st
VBA加解密
爱java，爱生活
05-07 280
使用方法： 很简单 ，两种使用方法       第一： 建立一个excel文档， 工具-》宏-》visual basci                    将以上代码全部拷贝进去 保存 退出                   重新打开那个excel，工具-》宏-》宏 可以看到两个                 分别是moveprotect 和 setprotect        ...
string 替换函数
小磊's blog
03-17 1006
生活中的小应用 给力啊·函数的替换 #include using namespace std; string &replace_all(string& str, const string& old_value, const string& new_value) { while (true) { string::size_type pos(0);
excel vba 字符串连接
最新发布
04-14
在Excel VBA中，可以使用字符串连接操作符（&）或者使用VBA内置的字符串连接函数（Concatenate）来实现字符串的连接。 1. 使用字符串连接操作符（&）： 字符串连接操作符（&）可以将两个字符串连接在一起。例如，要将字符串 "Hello" 和 "World" 连接起来，可以使用以下代码： ``` Dim str1 As String Dim str2 As String Dim result As String str1 = "Hello" str2 = "World" result = str1 & str2 MsgBox result ' 输出：HelloWorld ``` 2. 使用VBA内置的字符串连接函数（Concatenate）： VBA提供了一个内置的字符串连接函数Concatenate，它可以将多个字符串连接在一起。例如，要将字符串 "Hello"、" " 和 "World" 连接起来，可以使用以下代码： ``` Dim str1 As String Dim str2 As String Dim str3 As String Dim result As String str1 = "Hello" str2 = " " str3 = "World" result = Concatenate(str1, str2, str3) MsgBox result ' 输出：Hello World ```

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

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

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

←か淡定☆ ヾ

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付：¥1
获取中
扫码支付

您的余额不足，请更换扫码支付或充值

打赏作者

实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

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

余额充值