Ole object of Active X Combobox.

Status
Niet open voor verdere reacties.

continent

Gebruiker
Lid geworden
2 dec 2010
Berichten
36
Ik ben bezig met het schrijven van een script
voor het schrijven van een tijdelijke Combobox. LET WEL! met VBA.
(dus niet iets van populate, nee puur het genereren van een combobox.)

Wellicht heeft iemand al ervaring mee of is er al een
standaard script hiervoor.

Uiteraard heb ik al wat maar het voldoet niet geheel aan mijn wensen.
En mogelijk zit ik dit wiel uit te vinden.

Iemand? Ben héél benieuwd. (graag antwoord op mij vraag)
 
Laatst bewerkt:
Wat heb je dan al, dan wordt de vraag misschien voor ons dan ook wat duidelijker.
Wil je je eigen combobox/listbox/commandbutton maken? dan zul die zelf moeten programmeren in VisualBasic of een andere taal en moeten opslaan als een .OCX-bestand.
Of ben je op zoek naar een activeX-besturingselement met een specifieke eigenschap?
 
Laatst bewerkt:
Wat heb je dan al, dan wordt de vraag misschien voor ons dan ook wat duidelijker.
Wil je je eigen combobox/listbox/commandbutton maken? dan zul die zelf moeten programmeren in VisualBasic of een andere taal en moeten opslaan als een .OCX-bestand.
Of ben je op zoek naar een activeX-besturingselement met een specifieke eigenschap?

Uiteraard heb ik al wat (oops, beetje arrogant) maar was benieuwd of er
standaard scripts zijn.

Waarom ik het in de basis niet plaats is alleen omdat je dan vaak van
die "goedbedoelde" aanvullingen krijg van NIET NERDS.

Maar ik zit (ook hierna) volgens mij in een goed gezelschap :) . tnx
 
Laatst bewerkt:

Hoewel ik al maanden aan 't knoeien ben, ben ik deze link nog niet
tegengekomen, ga hem eerst bestuderen en zien of er wat van mijn
gading bijzit. tnx

Redelijk aandachtig de site bekeken maar dat was hem niet.

Het gaat dus niet om Userforms maar om de active-X ole-objects.
En dan ook nog tijdelijk, héél kort; bij een klik op een onwillekeurige
cel verschijnt er op die cel een combobox. Na invullen verdwijnt deze weer.

Dat script, zal toch wel eens een keer zijn geschreven? (hoop ik).
 
Laatst bewerkt:

Mijn excuses, die laatste zin is mij ontgaan, inderdaad ja dus. Hier het stukje
wat de combobox op het scherm zet bij na een cell-event bij een aantal cellen
Zo blijft er altijd één combobox in beeld en verdwijnt zodra een waarde is
geselecteerd.
Code:
Set ctlcombo = intake.OLEObjects.Add(ClassType:="Forms.combobox.1", Link:=False)
With ctlcombo
        .Name = "cbo"
        .Left = intake.Range(ta).Left
        .Top = intake.Range(ta).Top
        .Width = intake.Range(ta).Width
        .Height = intake.Range(ta).Height
        .ListFillRange = ""
        .ListFillRange = "gegevens" & "!" & kol & 2 & ":" & kol & y
        .Object.MatchEntry = 0
        .Object.MatchRequired = False
        .Object.ListRows = 20
End With
End Select

Maar dit werkt niet 100%. Ik had gehoopt dat je in kon stellen bij
het ingeven van een letter er een match zou verschijnen.
Ik heb niet goed in de vingers hoe ik dat in moet stellen.
(MatchRequired = True is het niet)

Maar wellicht is hier al eerder een routine voor geschreven die dat
wél in zich heeft.

TrumpExcel doet dat via het excel-sheet met Excel-formules.
Ik doe dat veel liever helemaal in VBA opdat de gebruiker het niet
kan slopen. Ik huiver voor formules in een sheet.
in VBA.
 
Laatst bewerkt:
Waar alphamax naar verwijst IS ook VBA.
 
Misschien makkelijker is het om 1 combobox op het werkblad te zetten en deze zichtbaar en onzichtbaar te maken en te verplaatsen.
Hierdoor kan de VBA code stukken makkelijker blijven.
Maar waarom laat je de comboboxen niet permanent staan? er zijn meerdere wegen die naar rome leiden.
 
Laatst bewerkt:
Misschien makkelijker is het om 1 combobox op het werkblad te zetten en deze zichtbaar en onzichtbaar te maken en te verplaatsen.
Hierdoor kan de VBA code stukken makkelijker blijven.
Maar waarom laat je de comboboxen niet permanent staan? er zijn meerdere wegen die naar rome leiden.

Er zijn een aantal redenen waarom ik voor deze methode kies.
De standaard validatie van Excel kun je het veld niet opmaken.

Daarnaast betreft het in totaal 8 comboboxen.
Daarbij kun je 2 problemen verwachten.
Bij één ontwerp werden de afmetingen geschaald
en werden de comboboxen steeds groter. Ik heb
daar nooit een antwoord op gevonden.

Thuis schreef ik later de Ole boxen (blijvend zichtbaar)
hetgeen niet werd ondersteund op mijn werk.
Een aantal comboboxen werden door Excel hernoemd
wat later een bug bleek te zijn in Excel.

Dat is de reden dat ik voor de zovvelste keer het roer
heb omgegooid om zo na een klik op de betreffende
cellen in die cel een combobox te laten verschijnen en
na invoer hem weer te deleten.

Maar hoe moeilijk kan het zijn voor goeroes om vast
te houden aan hetgeen ik opnieuw ben gestart.

Dat moet toch mogelijk zijn?
 
Ok, blijkbaar heb jij bijna het hele traject van "voortschrijdend inzicht" doorlopen.
Soms heb je hier op het forum vragen onder het motto "waarom makkelijk doen als het moeilijk kan" maar dat is hier dus niet aan de orde.
Nu terug naar de oplossing.
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan