1. VBA Kodu Kullanma:
   • Sayfa (Kod) düzenleyiciyi açın 2.
   • Aşağıdaki VBA kodunu kopyalayıp açılan sayfa (Kod) penceresine yapıştırın 2:

Private Sub Worksheet_Change(ByVal Target As Range)
   'Updated by Extendoffice 20240118
   Dim xRng As Range
   Dim xValue1 As String
   Dim xValue2 As String
   Dim delimiter As String
   Dim TargetRange As Range
   Set TargetRange = Me.UsedRange
   delimiter = ", "
   If Target.Count > 1 Or Intersect(Target, TargetRange) Is Nothing Then
       Exit Sub
   End If
   On Error Resume Next
   Set xRng = TargetRange.SpecialCells(xlCellTypeAllValidation)
   If xRng Is Nothing Then
       Exit Sub
   End
   Application.EnableEvents = False
   Application.EnableEvents = True
   On Error GoTo 0
End Sub
Kopyala

2. Kutools for Excel Kullanma:
   • "Kutools" sekmesine gidin, "Açılır Liste" > "Çoklu Seçimli Açılır Liste" seçeneğini seçin 2.
   • Birden fazla öğe seçmeniz gereken açılır listeyi içeren aralığı ve seçilen öğeler için ayırıcıyı belirtin 2.
   • Ayarları tamamlamak için "Tamam" düğmesine tıklayın 2.