Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: combobox probleem  (gelezen 1154 keer)

0 leden en 1 gast bekijken dit topic.

Offline Danny A

  • Volledig lid
  • **
  • Berichten: 125
  • Geslacht: Man
  • Oplossing.be
combobox probleem
« Gepost op: 22 maart 2022, 13:52:47 »
beste forum,

via een combobox selecteer ik een beschikbaar item uit een lijst (gedefinieerde naam "lijst") van items die nog niet geselecteerd zijn.
de macro maaklijst om deze lijst aan te passen werkt wanneer ik hem manueel opstart.
Wanneer ik een item selecteer in de combobox, komt dit in de geselecteerde cel, alles OK
MAAR:als ik via een event handler hetzij selectionchange hetzij combobox click de  macro automatisch wil laten uitvoeren, loopt het fout.
In mijn originele programma krijg ik zelfs namen in de cel die ik niet geselecteerd heb in de combobox.
Kan er iemand mij op weg helpen, waar loopt het fout ?

mvg
Danny

Offline Warme bakkertje

  • Volledig lid
  • **
  • Berichten: 215
  • Geslacht: Man
Re: combobox probleem
« Reactie #1 Gepost op: 22 maart 2022, 18:10:17 »
Probeer deze eens en laat maar iets weten.
Windows 10 Home   NLD 64bit

Microsoft Office Professional Plus 2016 US

Offline Danny A

  • Volledig lid
  • **
  • Berichten: 125
  • Geslacht: Man
  • Oplossing.be
Re: combobox probleem
« Reactie #2 Gepost op: 23 maart 2022, 08:35:41 »
Warme bakkertje,

Dankje, werkt perfect !  :thumbsup:
Toch zou ik graag de reden te weten komen waarom mijn systeem niet werkte, enig idee hierover ?

mvg
Danny

Offline Danny A

  • Volledig lid
  • **
  • Berichten: 125
  • Geslacht: Man
  • Oplossing.be
Re: combobox probleem
« Reactie #3 Gepost op: 23 maart 2022, 08:43:57 »
warme Bakkertje,

Heb je bestand van naderbij bestudeerd, en het werkt toch niet zoals ik wilde, je vertrekt nl vanuit een alfabetisch gerangschikte lijst (kolom B), mijn bedoeling is te vertrekken van een niet gerangschikte lijst, daaruit de reeds geselecteerde items te verwijderen en dan de resterende items alfabetisch te rangschikken via een macro
elke actie op zich lukt me, maar krijg het niet geautomatiseerd  :(

Groeten
Danny

Offline Warme bakkertje

  • Volledig lid
  • **
  • Berichten: 215
  • Geslacht: Man
Re: combobox probleem
« Reactie #4 Gepost op: 24 maart 2022, 06:53:15 »
Als je dan toch niet schuw bent om een macro te gebruiken kan je evengoed alles uitvoeren in

code, dan heb je al die hulpkolommen niet meer nodig.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    'maaklijst
        ComboBox1.LinkedCell = "": ComboBox1.ListIndex = -1
        sn = Blad2.Range("B3:B14")
        With CreateObject("System.Collections.ArrayList")
            For i = 1 To UBound(sn)
                Set fObj = Range("C5:E10").Find(sn(i, 1), , xlValues, xlWhole)
                If fObj Is Nothing Then
                    If Not .Contains(sn(i, 1)) Then .Add sn(i, 1)
                End If
            Next
            .Sort
            ComboBox1.List = Application.Transpose(.ToArray)
        End With
        If Not Intersect(Target, Range("C5:E10")) Is Nothing Then
            ComboBox1.LinkedCell = Target.Address
        Else
            Exit Sub
        End If
End Sub
Windows 10 Home   NLD 64bit

Microsoft Office Professional Plus 2016 US

Offline Danny A

  • Volledig lid
  • **
  • Berichten: 125
  • Geslacht: Man
  • Oplossing.be
Re: combobox probleem
« Reactie #5 Gepost op: 05 april 2022, 11:00:45 »
Warme Bakkertje,

allereerst excuses voor laattijdige reactie, ben beetje ziek geweest.

Bij de instructie application.transport(.to array)
krijg ik foutmelding 70, geen toegang
enig idee ?

mvg
Danny

Offline Warme bakkertje

  • Volledig lid
  • **
  • Berichten: 215
  • Geslacht: Man
Re: combobox probleem
« Reactie #6 Gepost op: 05 april 2022, 11:27:57 »
Heb je bij de eigenschappen van de ComboBox de ListFillRange verwijderd ?
Windows 10 Home   NLD 64bit

Microsoft Office Professional Plus 2016 US

Offline Danny A

  • Volledig lid
  • **
  • Berichten: 125
  • Geslacht: Man
  • Oplossing.be
Re: combobox probleem
« Reactie #7 Gepost op: 05 april 2022, 11:48:57 »
ok, werkt nu, hartelijk dank

Danny

 


www.combell.com