Article View: pl.comp.lang.vbasic
Article #104435Re: [VBA Excel 2003] jak się dostać do CommandButton
From: Michal AKA Miki
Date: Thu, 14 Jan 2010 00:02
Date: Thu, 14 Jan 2010 00:02
44 lines
2518 bytes
2518 bytes
Użytkownik "Borafu" <borafu_NIELUBIESPAMU@gazeta.pl> napisał w wiadomości
news:hilfvn$1lk$1@inews.gazeta.pl...
> janusz pisze:
>> Witam
>>
>> Po prostu napisz
>>
>> NazwaAkrusza.CommandButton1.Enabled = True
>
> Niestety :-(
>
> Run-time error '424':
> Object required
>
To w takim razie zle napisales, bo normalnie to dziala.
Zobacz w edytorze VBA wlasciwosci arkusza - ma on 2 wlasciwosci Name - jedna
w nawiasach, a druga bez. Ta w nawiasach to nazwa kodowa i ja wlasnie
uzywasz. Jesli chcesz uzywac nazwy na zakladce, mozesz uzywac cos na
ksztalt:
ThisWorkbook.Worksheets("Arkusz1").CommandButton1.Enabled = False
Oczywiscie wszystko musisz dokladnie sprawdzic - jak sie nazywa twoj
CommandButton, jak sie nazywa arkusz (wg nazwy kodowej albo na zakladce w
zaleznosci od wersji).
wg twojej analogii powinno to wygladac tak:
Dim arkuszFZ As Worksheet
Set arkuszFZ = ThisWorkbook.Worksheets("FZ")
arkuszFZ.CommandButton1.Enabled = False
Jesli znowu zwroci "Method or data member not found", zweryfikuj, czy
rzeczywiscie tak sie nazywa przycisk (u ciebie byl to btnWykonaj, czy nie
walnales gdzies literowki).
tylko taka uwaga:
Rozwiazanie wskazane przez kolege jest o tyle lepsze, ze jesli masz wszystko
OK, VBA powinien podpowiedziec ci wlasnosci i funkcje obiektow - czyli
mozesz z listy wybrac ten wlasciwy. W twoim rozwiazaniu (lub tym
zmodyfikowanym powyzej) tych obiektow nie zobaczysz.
Pozdrawiam
Michal
Technical Details
Message-ID:
<hilmu5$of7$1@inews.gazeta.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!not-for-mailReferences:
<hiklqs$e9u$1@inews.gazeta.pl> <hil2f2$854$1@atlantis.news.neostrada.pl> <hilfvn$1lk$1@inews.gazeta.pl>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!not-for-mail From: "Michal AKA Miki" <jakistammichal@z.onetu.pl> Newsgroups: pl.comp.lang.vbasic Subject: Re: [VBA Excel 2003] jak się dostać do CommandButton Date: Thu, 14 Jan 2010 01:02:08 +0100 Organization: "Portal Gazeta.pl -> http://www.gazeta.pl" Lines: 46 Message-ID: <hilmu5$of7$1@inews.gazeta.pl> References: <hiklqs$e9u$1@inews.gazeta.pl> <hil2f2$854$1@atlantis.news.neostrada.pl> <hilfvn$1lk$1@inews.gazeta.pl> NNTP-Posting-Host: mjelinski.tsi.tychy.pl X-Trace: inews.gazeta.pl 1263427333 25063 83.142.120.170 (14 Jan 2010 00:02:13 GMT) X-Complaints-To: usenet@agora.pl NNTP-Posting-Date: Thu, 14 Jan 2010 00:02:13 +0000 (UTC) X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.5512 X-Priority: 3 X-RFC2646: Format=Flowed; Response X-Newsreader: Microsoft Outlook Express 6.00.2900.5512 X-User: michalakamiki X-MSMail-Priority: Normal MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit