excel中使用vba将美元转换为人民币
1、首先我们打开一个样表作为例子。例子中的数值单位全是人民币，我们将其转换为美元单位。
2、我们按下ALT+ F11组合快捷键进入vbe编辑其，插入一个新模块，并在代码编辑器中写下如下代码：
Option Explicit
Sub tousd()
Dim i As Integer
Dim c As Integer
For i = 6 To 17
c = Cells(i, 13).Value / 6
Cells(i, 13) = c
Next
End Sub
3、我们来阅读一下这段代码，首先是变量声明，建立过程，然后声明了2个变量i和c，其中i变量用来循环，c变量用来储存单元格原值并计算。
4、使用for循环，将i值循环赋予6to17，每次都将13列单元格值计算后写入原对应单元格中，使用的公式为人民币与美元的汇率6:1。
5、在活动列表中使用这个宏，可以看到实发工资变为了美元单位，但是并没有显示出来，而且这种方法并不完美，如果需要添加数据，需要在vbe中修改对应的代码。
6、我们可以修改一下代码，新建一个变量s，并且使用inputbox函数来给s赋值，然后修改i循环为6tos。这样添加数据我们也能快速的获得答案了。
版权声明：本文内容由互联网用户自发贡献，该文观点仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容， 请发送邮件至 86345@qq.com 举报，一经查实，本站将立刻删除。