如何实现两个单元格的值引用?

来源:百度知道 编辑:UC知道 时间:2024/06/02 17:28:43
单元格A1中的值为下拉列表“a,b,c,d”,如果A1=a或者b,则B1=A。 如果A1=c或者d,则B1=B。如何实现?

用Excel中的函数可以实现,或者用vba实现。
vba:
1.数据->数据有效性->序列,在来源中,设置好范围(你可以在同一张sheet里的另一个单元格区域输入好“a,b,c,d”,如D1-D4,把这作为数据范围),A1的下拉列表就可以显示这四个字母了。

以下代码写在vb编辑器的sheet1中

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Sheet1.Cells(1, 1) = "a" Or Sheet1.Cells(1, 1) = "b" Then
Sheet1.Cells(1, 2) = "A"
ElseIf Sheet1.Cells(1, 1) = "c" Or Sheet1.Cells(1, 1) = "d" Then
Sheet1.Cells(1, 2) = "B"
End If
End Sub