Helpmij.nl
Helpmij.nl
Helpmij.nl

Quote

Weergeven resultaten 1 tot 3 van 3

Onderwerp: Keuzelijst met meerdere optie

  1. #1
    Senior Member
    Geregistreerd
    3 juli 2009
    Locatie
    venray
    Vraag is niet opgelost

    Keuzelijst met meerdere optie

    Vanuit de volgende voorbeeld kan ik niet de laatste keuze verwijderen. ik moet namelijk alles verwijderen. en daarna opnieuw beginnen 1 voor 1 te selecteren.
    iemand een optie?


    Code:
    Private Sub Worksheet_Change(ByVal Target As Range)
        'Updated by Extendoffice 2019/11/13
        Dim xRng As Range
        Dim xValue1 As String
        Dim xValue2 As String
        If Target.Count > 1 Then Exit Sub
        On Error Resume Next
        Set xRng = Cells.SpecialCells(xlCellTypeAllValidation)
        If xRng Is Nothing Then Exit Sub
        Application.EnableEvents = False
        If Not Application.Intersect(Target, xRng) Is Nothing Then
            xValue2 = Target.Value
            Application.Undo
            xValue1 = Target.Value
            Target.Value = xValue2
            If xValue1 <> "" Then
                If xValue2 <> "" Then
                    If xValue1 = xValue2 Or _
                       InStr(1, xValue1, ", " & xValue2) Or _
                       InStr(1, xValue1, xValue2 & ",") Then
                        Target.Value = xValue1
                    Else
                        Target.Value = xValue1 & ", " & xValue2
                    End If
                End If
            End If
        End If
        Application.EnableEvents = True
    End Sub
    Bijgevoegde bestanden Bijgevoegde bestanden

  2. #2
    Giga Honourable Senior Member
    Geregistreerd
    2 maart 2013
    Een betere opzet? Een gebruikersnaam is uniek de status van de gebruiker kan door de tijd heen veranderen. Alles in 1 cel proppen heeft geen enkele toegevoegde waarde.
    Je kan een paard naar het water leiden, maar je kan het niet dwingen te drinken.

  3. #3
    Senior Member
    Geregistreerd
    3 juli 2009
    Locatie
    venray
    nou, idee was om via de dropdown menu meerdere keuzes te laten maken. ipv 1. dat is gelukt. alleen verwijderen niet bij verkeerde selectie.
    Laatst aangepast door ozzyozzy : 22 september 2021 om 09:30

Berichtenregels

  • U mag geen nieuwe vragen starten.
  • U mag niet reageren op berichten.
  • U mag geen bijlagen versturen.
  • U mag uw berichten niet bewerken.
  •  
Helpmij.nl
Helpmij.nl

Helpmij.nl

Regels
Help

Helpmij.nl en business

Partners
Sponsoren