---在日常使用Excel時，如果需要重復輸入一些長語句，可能會感到繁瑣。比如要經(jīng)常輸入“大不列顛及北愛爾蘭聯(lián)合王國”這樣的長句子，我們可以利用VBA編寫一個小程序，實現(xiàn)輸入數(shù)字對應自動輸出長語句的功

---

在日常使用Excel時，如果需要重復輸入一些長語句，可能會感到繁瑣。比如要經(jīng)常輸入“大不列顛及北愛爾蘭聯(lián)合王國”這樣的長句子，我們可以利用VBA編寫一個小程序，實現(xiàn)輸入數(shù)字對應自動輸出長語句的功能。下面讓我們來看具體操作步驟。

示例演示

舉個例子，在工作表“sheet1”的第一列中輸入“1”，就會自動變?yōu)椤按蟛涣蓄嵓氨睈蹱柼m聯(lián)合王國”；輸入“2”，就會自動變?yōu)椤爸腥A人民共和國”；輸入“3”，就會自動變?yōu)椤懊览麍院媳妵薄?/p>

打開代碼窗口

首先，打開寫代碼的窗口。在Excel的左下角找到“sheet1”，右鍵點擊并選擇“查看頁碼”，即可打開代碼窗口。確保你的“sheet1”的代碼窗口是空的，沒有任何代碼。

```vba

Private Sub Worksheet_Change(ByVal Target As Range)

If 1 Then

If 1 Then

If 1 Then

Target "大不列顛及北愛爾蘭聯(lián)合王國"

ElseIf 2 Then

Target "中華人民共和國"

ElseIf 3 Then

Target "美利堅合眾國"

End If

End If

End If

End Sub

```

查看效果

以上代碼實現(xiàn)了在輸入特定數(shù)字時，自動轉(zhuǎn)換為相應的長句子。通過修改代碼，還可以實現(xiàn)更多功能。詳情將在接下來的“Excel中用VBA使數(shù)字代替長語句的輸入（二）”中介紹。

在Excel中使用VBA，可以提高工作效率，減少重復性操作帶來的繁瑣。希望上述內(nèi)容能夠幫助你更好地利用Excel，提升工作效率。