EXCEL里输入1显示A,输入2显示B,输入3显示C,输入4显示D,怎么实现?

发布网友发布时间：2022-04-23 17:49

共4个回答

热心网友时间：2023-10-11 16:50

=LOOKUP(任意单元格,{1,2,3,4},{"A","B","C","D"})

热心网友时间：2023-10-11 16:51

Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target
Case 1
Target = "A"
Case 2
Target = "B"
Case 3
Target = "C"
Case 4
Target = "D"
End Select
End Sub

追答为什么有这样的要求。感觉好奇怪。

热心网友时间：2023-10-11 16:51

vba单元格事件追问过程呢？

追答稍等下哈
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim tr, tc
tr = Target.Row
tc = Target.Column
If tc 1 Then
Exit Sub
End If
If Cells(tr, 1) "" Then
Cells(tr, 1) = Chr(64 + Cells(tr, 1))
End If
End Sub
输入6就是F，以此类推
这个方便，如果用IF ,要写好几个
只*在A列

热心网友时间：2023-10-11 16:52

单元格格式