Worksheet Change Event - Flere drop downs i samme kode
Jeg benytter følgende kode til at trigge den korrekte Macro ud fra valget i en drop-down i mit Excel ark - det virker fint!---
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("D6")) Is Nothing Then
Select Case Range("D6")
Case "Ny kunde": NY_KUNDE
Case "Eksisterende kunde": EKSISTERENDE_KUNDE
End Select
End If
End Sub
---
Jeg har dog nu brug for at yderligere én drop-down liste i samme ark får samme funktionalitet. Her ville jeg som selvstændig kode benytte følgende:
--
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("F14")) Is Nothing Then
Select Case Range("F14")
Case "ICON": ICON
Case "FSC": FSC
End Select
End If
End Sub
--
Spørgsmålet er nu hvordan disse 2 koder smeltes sammen til én, således at de virker sammen i en change event??