我设置了一个下拉列表,列表中显示的是汉字,但我希望在我从下拉列表中选择某一选项时,单元格显示对应数字。
比如,在A1这一单元格上设置一下拉列表,其中有“优”“良”“中档”三项,我希望在我选“优”的时候,A1中可以显示100,选“良”的时候,A1中可以显示75,选“中档”的时候,A1中可以显示60.
跪求excel大神~~~谢谢~~
解决excel中如何输入汉字,但是在同一单元格中显示某一数字的步骤如下:
1.先来学习right函数:right函数是从一个文本字符串的最后一个字符开始返回指定个数的字符。
2.在学习另一个函数:left,left与right刚好相反,是从一个文本字符串的第一个字符开始返回指定个数的字符。
3.细心的人会发现这两个函数是返回指定个数的字符,那么有的是类似“自行车123”和“电脑12”这样没有固定个数的怎么办,我们还需要两个函数:一个是len,返回文本字符串中字符的个数;另一个是lenb,返回文本中所包含的的字符数。熟悉了这几个函数后就可以进行下一步了。
4.汉字和数字在A1至A4单元格,我们想将汉字放在B1,将数字放在C1。
5.在B1单元格输入公式:=LEFT(A1,LENB(A1)-LEN(A1));在C1单元格输入公式:=RIGHT(A1,2*LEN(A1)-LENB(A1))。这样就解决了excel中如何输入汉字,但是在同一单元格中显示某一数字的问题了。
在A1添加一个AcitiveX的Combobox控件,然后输入以下VBA代码:
Private Sub Worksheet_Activate()
ComboBox1.Clear
ComboBox1.Visible = True
ComboBox1.AddItem "优"
ComboBox1.AddItem "良"
ComboBox1.AddItem "中"
End Sub
Private Sub ComboBox1_Click()
If ComboBox1.Text = "优" Then
Range("A1") = 100
ComboBox1.Visible = False
End If
If ComboBox1.Text = "良" Then
Range("A1") = 75
ComboBox1.Visible = False
End If
If ComboBox1.Text = "中" Then
Range("A1") = 60
ComboBox1.Visible = False
End If
End Sub
最后效果: