excel中使用vba將美元轉(zhuǎn)換為人民幣
1、首先我們打開一個樣表作為例子。例子中的數(shù)值單位全是人民幣，我們將其轉(zhuǎn)換為美元單位。
2、我們按下ALT+ F11組合快捷鍵進(jìn)入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變量用來循環(huán)，c變量用來儲存單元格原值并計算。
4、使用for循環(huán)，將i值循環(huán)賦予6to17，每次都將13列單元格值計算后寫入原對應(yīng)單元格中，使用的公式為人民幣與美元的匯率6:1。
5、在活動列表中使用這個宏，可以看到實發(fā)工資變?yōu)榱嗣涝獑挝唬遣]有顯示出來，而且這種方法并不完美，如果需要添加數(shù)據(jù)，需要在vbe中修改對應(yīng)的代碼。
6、我們可以修改一下代碼，新建一個變量s，并且使用inputbox函數(shù)來給s賦值，然后修改i循環(huán)為6tos。這樣添加數(shù)據(jù)我們也能快速的獲得答案了。
