Excel如何輸入代號後，出現對應文字？

Question

假設我在sheet1輸入代號及姓名，如下：
1王一
2王二
3王三
(欄位A1是1，B1是王一；A2是2，B2是王二……以此類推)
請問要如何設定，才可以讓我在Sheet2中輸入數字就出現對應的姓名呢？
例如：我在sheet2中的A1輸入2後，換到別的儲存格時，A1就會變成王二。
因為筆數約100筆上下，沒辦法用IF函式寫，請問有別的方式可以做到這樣嗎？
還有回答也不要用尋找/取代方式。
謝謝嚕！！

沒有打錯喲！是真的要在同一個儲存格做變換。

abula您好，謝謝您的教學檔，不過因為要在同個儲存格做變換，所以您的教學檔好像沒辦法做到耶！還是謝謝嚕！！

沙拉油 您好，我試過嚕，真的可以在sheet2中的A1儲存格達到我想要的。請問要怎麼修改，才可以讓sheet2都有作用呢？謝謝您！！

Answer 1

在「工作表索引標籤」上的工作表名稱 Sheet2 上，滑鼠點右鍵選檢視程式碼
出現VBE視窗後，將底下的程式碼貼到 VBE視窗右邊的程式碼區域內，關閉 VBE 回到 Excel

'只在 Sheet2 的A欄生效
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Count = 1 And Target.Column = 1 Then
If Target <> "" Then
Set rng = Sheet1.Range("A:A").Find(Target, , , xlWhole)
If Not rng Is Nothing Then Target = rng.Offset(0, 1)
End If
End If
Application.EnableEvents = True
End Sub

2006-04-01 18:18:55 補充：
讓sheet2都有作用If Target.Count = 1 And Target.Column = 1 Then改成If Target.Count = 1 Then

Answer 2

之前有人問過類似的問題，提供連結給你（妳）做參考。
http://tw.knowledge.yahoo.com/question/?qid=1206032208316

2006-03-29 06:11:16 補充：
裡面有提供我做的Step by Step影音教學檔，希望對你（妳）有幫助。

Answer 3

同一格在離開時自動取代？
VLOOKUP()做不到，
或許要巨集。
查一下[沙拉油]是否有回答過。
但筆數這麼多，恐怕有困難。
是打錯了，還是真的要在同一格做變換？