Help!

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

Hulp bij posten

Recente topics

Auteur Topic: Checkbbox op worksheet aanpassen vanuit Userform  (gelezen 2480 keer)

0 leden en 1 gast bekijken dit topic.

Offline JanCoonen

  • Nieuw lid
  • Berichten: 3
Checkbbox op worksheet aanpassen vanuit Userform
« Gepost op: 16 januari 2008, 16:42:25 »
Beste,

Sinds enige tijd ben ik tot het besef gekomen dat Excel(zeker in combinatie met VBA)heel wat krachtiger is dan ik ooit durfde vermoeden. Ik vind het zelfs leuk om er mee te spelen en stap voor stap iets beter te worden. Maar momenteel zit ik geplaagd met een probleem waarvoor ik wel een oplossing wist te vinden ... maar waarbij ik niet begrijp wat er nu juist misgaat. Misschien dat jij me hiermee kan helpen.

Laat met het even schetsen. Ik heb een workbook gemaakt met een aantal worksheets erin. Op de eerste worksheet staat een button en een checkbox. Door te klikken op de button wordt een userform geopend. Op deze userform staat op zijn beurt een button. Bij het klikken op deze button wil ik de checkbox op de worksheet op true zetten. Doorheen mijn "applicatie" gebruik ik voor de worksheet een variable-referentie. In de procedure kent hij deze worksheet want als ik een waarde in een cel wil plaatsen op deze worksheet dan voert hij dit perfect uit. Wil ik echter de checkbox op true zetten dan lukt dit niet. Hier zie je mijn procedure ... Het eerste en derde statement werkt zonder probleem, het tweede statement geeft een foutmelding (heb ik in de snippet even uit commentaar gehaald)...

Private Sub btnVoegToe_Click()
    worksheetMenu.Range("A1") = cmbArtikel  ' Geen probleem
    worksheetMenu.cbxMode = Checked         ' Foutmelding
    Worksheets("Menu").cbxMode = Checked    ' Geen probleem
End Sub

Help jij me terug 's nachts te slapen? Waarom werkt worksheetMenu.cbxMode = Checked niet? Wat zie ik over het hoofd ... Het gaat hier toch over hetzelfde object als Worksheets("Menu") ??? Ik word hier lichtjes gek van ;-)

Alvast bedankt. Indien gewenst stuur ik de broncode door.


Met vriendelijke groeten,
Jan.
Standaard emailprogramma: Onbekend
Standaard Operating System: Windows Vista
Standaard Browser:Internet Explorer 6

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.284
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: Checkbbox op worksheet aanpassen vanuit Userform
« Reactie #1 Gepost op: 16 januari 2008, 17:59:45 »
JanCoonen, Welkom op dit forum.

Het lijkt mij dat de reden dat de 2e syntax misgaat, komt door het fout 'aanspreken' van het object 'worksheet'. Het zou wel weer kunnen als je WorksheetName als een variabele declareert die je vervolgens via 'Set' verbindt aan de betreffende worksheet.
Ik moet je heel eerlijk zeggen dat ik niet snap dat de 1e syntax WEL werkt....  ???

Citaat
Indien gewenst stuur ik de broncode door
...is natuurlijk áltijd leuk om hier ff te plaatsen!

Groet, Leo
______________________________

Groet, Leo

Offline JanCoonen

  • Nieuw lid
  • Berichten: 3
Re: Checkbbox op worksheet aanpassen vanuit Userform
« Reactie #2 Gepost op: 16 januari 2008, 18:12:05 »
Dag Leo,

Bedankt voor het snelle reageren. Ik heb het dan ook geprobeerd, maar ik moet je teleurstellen. De code werkt als volgt ook niet.

Private Sub btnVoegToe_Click()
    Set worksheetMenu = Worksheets("Menu")
    worksheetMenu.Range("A1") = 1234       
     worksheetMenu.cbxMode = Checked
    Worksheets("Menu").cbxMode = Checked
End Sub

Ik neem aan dat jij bedoelde om het als hierboven weergegeven aan te passen.

Ik zoek verder.

Groeten,
Jan
Standaard emailprogramma: Onbekend
Standaard Operating System: Windows Vista
Standaard Browser:Internet Explorer 6

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.284
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: Checkbbox op worksheet aanpassen vanuit Userform
« Reactie #3 Gepost op: 16 januari 2008, 18:25:56 »
Jan, ik ben zelf er ook wat mee aan't rommelen en geloof dat hiermee óók mijn slapeloze nachten aangebroken zijn... ;D ;D
Zou je je workbook hier als bijlage willen plaatsen? Dan kunnen we gericht dezelfde dingen doen.

Groet, Leo
______________________________

Groet, Leo

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.284
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: Checkbbox op worksheet aanpassen vanuit Userform
« Reactie #4 Gepost op: 16 januari 2008, 18:38:04 »
Hmmm.... Als ik er zo naar kijk, heeft het waarschijnlijk te maken met het type object. Met rechtstreeks de naam 'worksheetMenu' maak je gebruik van het object 'sheet' of 'worksheet' en die hebben hele andere eigenschappen dan het object 'sheets' of 'worksheets'. Maar ik moet je heel eerlijk zeggen dat ik daar ook niet echt in thuis ben.

Groet, Leo
______________________________

Groet, Leo

Offline JanCoonen

  • Nieuw lid
  • Berichten: 3
Re: Checkbbox op worksheet aanpassen vanuit Userform
« Reactie #5 Gepost op: 17 januari 2008, 09:06:24 »
Beste,

Hier gaan we. De bijlage zit erbij.

Als je op de bovenste knop op de worksheet klikt dan verschijnt een form. Klik je op deze form op de button dan zou ik graag hebben dat de checkbox op de worksheet op true komt te staan.  Hier begrijp ik niet waarom dit (bold) niet werkt.
 
Private Sub btnVoegToe_Click()
    worksheetMenu.Range("A1") = 1234
    worksheetMenu.cbxMode = Checked
    Worksheets("Menu").cbxMode = Checked
End Sub

Let wel, het is maar een probeersel van mij om een beetje eigen te worden met Excel vba. Ik vind het enorm frustrerend dat ik niet snap waarom statement 1 en statement 3 probleemloos werken. Dit terwijl statement 2 (volgens mij het netste statement uit de sub) het laat afweten.

Mvg,
Jan Coonen
Standaard emailprogramma: Onbekend
Standaard Operating System: Windows Vista
Standaard Browser:Internet Explorer 6

 


www.combell.com