利用vba处理Excel表格数据实现键值转化,适用于将编码转化成对应的文本

最近遇到了一个甲方需要提供系统登录的用户名单和对应的角色权限内容。无奈直接从数据库导出的数据对应的都是编码,没有转成中文,想着偷个懒能不能直接用Excel直接转,网上看了一下有修改单元格格式的,但需要编码是2到3个。多的就用vba,于是这里记录一下我的操作,也供其他人有需求的直接copy,哈哈,不多说上代码。

一.vba处理编码转文本示例

下面代码就是将D列的数据从2到200行的编码数据,转成对应的文本。

javascript 复制代码
Sub 列表修改()
    Dim rRng As Range
    Set rRng = Range(" D2:D200")
    Dim rCell As Range
    For Each rCell In rRng
    Select Case rCell.Value
    Case 1
    rCell.Value = "超级管理员"
    Case 2
    rCell.Value = "普通用户"
    Case 3
    rCell.Value = "浏览用户"
    Case 4
    rCell.Value = "普通管理员"
    Case 5
    rCell.Value = "短信用户"
    End Select
    Next

End Sub

转化前:

转化后:

二.VBA操作步骤

接下来写个简单的操作步骤:

1.打开Excel的编程界面:点击文件->选项->自定义功能区->选择开发者工具。点击出现的开发者工具,里面就有可提供书写VBA的工具。

2.创建启用宏的工作簿:首先新建一个工作簿,并将工作簿保存为「启用宏工作簿」类型。

3.打开VBA编辑器:通过功能区「开发工具→代码→Visual Basic」或快捷键Alt + F11打开VBA编辑器。

4.插入新模块:Excel工作簿中的VBA代码通常保存在工作表对象或模块中。本例中,我们用模块保存VBA代码。首先选中左侧工程列表中的工作簿,后右键,在弹出的选项列表中,选择「插入」。二级菜单中,选择「模块」,完成插入新模块。

5.在新插入的模块中书写VBA代码,例如:Sub ClickTest()。

三.学习心得

在Excel中,VBA是一种强大的编程语言,它能够让用户自定义Excel功能,从而实现自动化、批处理、数据分析等各种任务。最近我开始学习VBA,并在本文分享我的学习心得。

首先,我在网上找了一个在线VBA课程,这个课程让我了解了VBA的基本语法、变量、控制结构、数组、函数等基础知识。在学习的过程中,我遇到了一些难点,例如理解如何使用对象、方法和属性,以及如何处理错误和异常。但是通过反复练习和阅读相关资料,我逐渐掌握了这些知识点。

在学习过程中,我意识到VBA编程不仅是一种技能,更是一种思维方式。VBA能够帮助我更好地理解程序设计和数据结构的概念,让我更加注重代码的可读性和可维护性。同时,VBA也让我能够更好地利用Excel的功能,更高效地完成工作任务。

在学习VBA的过程中,我认为最重要的是实践和探索。只有通过不断地练习和尝试,才能够真正掌握VBA的精髓。同时,我也建议初学者从简单的程序开始学习,逐渐提高难度,并在学习的过程中不断查阅相关资料,加深对VBA的理解。

总之,学习VBA让我更好地理解程序设计和数据结构的概念,同时也让我能够更好地利用Excel的功能,更高效地完成工作任务。我相信在未来的工作中,VBA将会成为我不可或缺的技能之一。

相关推荐
懵逼的小黑子10 小时前
excel里面店铺这一列的数据结构是2C【uniteasone17】这种,我想只保留前面的2C部分,后面的【uniteasone17】不要
excel
偷心伊普西隆14 小时前
Python EXCEL 理论探究:格式转换时处理缺失值方法
python·excel
CodeCraft Studio2 天前
Excel处理控件Aspose.Cells教程:使用 Python 将 Pandas DataFrame 转换为 Excel
python·json·excel·pandas·csv·aspose·dataframe
星空的资源小屋2 天前
PPTist,一个完全免费的 AI 生成 PPT 在线网站
人工智能·python·电脑·excel
开开心心_Every2 天前
免费语音合成工具:66种音色随心选
人工智能·面试·java-ee·计算机外设·电脑·maven·excel
偷心伊普西隆2 天前
EXCEL VBA 清空Excel工作表(Sheet)的方法
microsoft·excel
Coding_Doggy3 天前
苍穹外卖Day12 | Apache POI、导出Excel报表、HttpServletResponse、工作台
excel
l1t3 天前
张泽鹏先生手搓的纯ANSI处理UTF-8与美团龙猫调用expat库读取Excel xml对比测试
xml·人工智能·excel·utf8·expat
Source.Liu4 天前
【Python自动化】 21 Pandas Excel 操作完整指南
python·excel·pandas
会飞的小菠菜4 天前
如何根据Excel数据表生成多个合同、工作证、录取通知书等word文件?
word·excel·模板·数据表·生成文件