Vreemde foutmelding

[BromsnorII]

Beste,

Op een andere computer gemaakte excel applicatie geeft op deze computer een vreemde foutmelding. In de appl. wordt een formulier geopend met daarin opgenomen en simpele routine

Private Sub UserForm_Activate()
For d = 1 To 31
Me.cbxStDag.AddItem = d
Next d

Als het formuier wordt geopend wordt d geaccentueerd met als foutmelding "kan het project of de bibliotheek niet vinden"

Zie ook screenshot.



Iemand een idee?

Groet,
Sietse

 

[OctaFish]

Staat Option Explicit aan bovenin?

 

[OctaFish]

Of de optie <Variabelen declareren vereist> in de opties?

 

[edmoor]

Gebruik je toevallig een DatePicker in dat formulier?

 

[jkpieterse]

Dit is typisch een fout die veroorzaakt wordt door een ontbrekende verwijzing (VBE, Tools, References of Extra, Verwijzingen).

 

[edmoor]

Vandaar mijn vraag over die eventuele DatePicker

 

[BromsnorII]

Geen van bovenstaande is aan de hand. Geen datapicker, en Option Explicit staat ook niet boven in de code evenmin is "variabelen declareren vereist". Als ik nu in een nieuwe map, een formulier maak komt dezelfde vreemde foutmelding naar boven. Nu vul ik een combobox met additem. Dit heb ik nooit gehad.

Groet,
Sietse

 

[edmoor]

Plaats dan je document eens.

 

[BromsnorII]

Nu deze fout. Heel simpel formulier




Bekijk bijlage Voorbeeld2.xlsm

Nooit gehad deze fout....

Groet,
Sietse

 

[edmoor]

Doe het eens zo:

    With ComboBox1
        .AddItem "januari"
        .AddItem "februari"
    End With

 

[BromsnorII]

Ja, dit werkt wel!

Blijft toch de vraag waarom de andere methode niet meer werkt....

Evengoed, bedankt voor de tip.

Sietse

 

[HSV]

Als je de combobox in het form wil vullen met de twaalf maanden.

Private Sub UserForm_Initialize()
 ComboBox1.List = [index(text(30*row(1:12),"[$-413]mmmm"),)]
End Sub

Of:

ComboBox1.List = Application.GetCustomListContents(4)

 

[BromsnorII]

Bedankt, dit is een stuk korter. Ik weet niet wat ik doe maar vind het wel een mooie oplossing.

Groet,
Sietse

 

[snb]

Soms moet je gewoon de hulpbestanden van de VBEditor raadplegen. Additem is een methode, geen eigenschap.
Wat een '=' - je al niet kan doen

Private Sub UserForm_Click()
   ComboBox1.AddItem "januari"
   ComboBox1.AddItem "februari"
End Sub

Maar natuurlijk gebruik je de eigenschap .list als je meer dan 1 item wil toevoegen.

 

[BromsnorII]

Pfff man, dat was de fout, hier heb ik finaal overheen gekeken.

Bedankt voor de eye opener!!!