Article View: be.comp.programming
Article #14836Excel: Forms <> Control Toolbox: buttons & code
From: Alain Cloet
Date: Tue, 09 Jan 2001 19:46
Date: Tue, 09 Jan 2001 19:46
41 lines
2522 bytes
2522 bytes
Hallo,
Ik heb een vraagje. Ik heb een macro geschreven die ik via een button wil
activeren. Oorspronkelijk heb ik gewerkt met een uit de 'forms-toolbar', en
het werkt, maar daar de eigenschappen van deze buttons niet te wijzigen zijn
(achtergrondkleur), wou ik overschakelen op een Command_button uit 'Control
Tolbox'. Een van de lijnen uit de macro werkt echter niet, waardoor de
uitvoering vastloopt. In de lijn wordt de achtergrondkleur van een veld
gewijzigd, en blijkbaar lukt dit niet via Command_button (zie onder).
Iemand een idee waar dit aan ligt ? Mijn oorspronkelijk idee was dat de
range beter diende gedefinieerd te worden door bvb de Worksheet-naam toe te
voegen, maar het hielp niet.
Groeten,
Alain
--
Ter info:
Macro met gelijkaardig gedrag (kleine, werkende code die dezelfde fout
brengt)
Sub KleurVakje()
Randomize
Range("A1").Interior.ColorIndex = Int(56 * Rnd)
End Sub
=> Werkt (rechtstreeks als macro, eventueel via een button)
Private Sub CommandButton1_Click()
Randomize
Range("A1").Interior.ColorIndex = Int(56 * Rnd)
End Sub
=> Werkt niet, geeft foutmelding:
run-time error '1004':
Unable to set the ColorIndex property of the Interior class
Ook een versie met een call naar de macro zelf lukt niet ... (zelfde
foutmelding, bij uitvoering van de macro)
Private Sub CommandButton1_Click()
Call KleurVakje
End Sub
=> Werkt ook niet
Technical Details
Message-ID:
<GOK66.1725$yz3.71267@iguano.antw.online.be>Path:
arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!supernews.com!216.227.56.88.MISMATCH!telocity-west!TELOCITY!news-out.usenetserver.com!newsfeed.icl.net!newsfeeds.belnet.be!news.belnet.be!newsfeed.online.be!iguano.antw.online.be!not-for-mailShow Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit X-Google-Thread: fcea4,e7cb303843523c8,start X-Google-Attributes: gidfcea4,public X-Google-ArrivalTime: 2001-01-09 11:48:08 PST Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!supernews.com!216.227.56.88.MISMATCH!telocity-west!TELOCITY!news-out.usenetserver.com!newsfeed.icl.net!newsfeeds.belnet.be!news.belnet.be!newsfeed.online.be!iguano.antw.online.be!not-for-mail From: "Alain Cloet" <nospam@tijd.com> Newsgroups: be.comp.programming Subject: Excel: Forms <> Control Toolbox: buttons & code Lines: 45 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 5.50.3825.400 X-MimeOLE: Produced By Microsoft MimeOLE V5.50.3825.400 Message-ID: <GOK66.1725$yz3.71267@iguano.antw.online.be> Date: Tue, 9 Jan 2001 20:46:11 +0100 NNTP-Posting-Host: 62.112.12.103 X-Complaints-To: news-abuse@noc.online.be X-Trace: iguano.antw.online.be 979073318 62.112.12.103 (Tue, 09 Jan 2001 20:48:38 WET) NNTP-Posting-Date: Tue, 09 Jan 2001 20:48:38 WET Organization: Customer of TijdNet