调用单个单元而不是范围

下面的macros从一个引用一个范围的单元格拉取一个值，然后相应地执行操作。 我怎样才能改变这只运行在单元格中的相关条目的情况？

Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Address = "$C$5" Then Select Case Target.Value Case Phones4U, P4U Case MBNA, MBNA1 'Case Is = O2, The_Problem_Network 'Case Is = TMobile, TMobile 'Case Is = 3, Run_3 'Case Is = Orange, Orange 'Case Is = Carphone_Warehouse, CPW 'Case Is = Virgin_Media, VirginMedia 'Case Is = Virgin_Mobile, VirginMobile 'Case Is = Lifestyle_Group, LSG 'Case Is = BT, BT 'Case Is = Barclays, Barclays 'Case Is = Nat_West, NatWest 'Case Is = RBS, RBS 'Case Is = Unipart, Unipart 'Case Is = Vodafone_Group, Vodafone End Select End If End Sub 

谢谢你的帮助。

Answer 1

我认为像这样的语法应该没有问题

 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$C$5" Then Select Case Target.Value Case "Phones4U" P4U Case "MBNA" MBNA1 Case "O2" The_Problem_Network ' etc End Select End If End Sub