Volani funkci v MAKRU

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

xdoubekp
nováček
Příspěvky: 4
Registrován: říjen 10
Pohlaví: Muž
Stav:
Offline

Volani funkci v MAKRU

Příspěvekod xdoubekp » 08 říj 2010 13:43

Ahoj,
potreboval bych od nekoho z Vas cenou radu. Tyka se to makra ve VBA v EXCELu.

Problem je nasledujici:
Mam excelovsky soubor s jednim listem napr. "List1". V tomto listu mam napsanou jednoduchou proceduru napr.

Sub pokus()
MsgBox("ok")
EndSub

dale jsem si vytvoril Modul, ve kterem mam napsane makro, ktere vola proceduru "pokus", ktera je nadeklarovana na listu "List1".
Napr.
Sub program()
pokus
EndSub

Makro "program" po spusteni dava hlasku, ze nezna proceduru "pokus".

Nevite co s tim?

Dekuji.

Pavel

Reklama
navstevnik
Level 4
Level 4
Příspěvky: 1142
Registrován: srpen 08
Pohlaví: Nespecifikováno
Stav:
Offline

Re: Volani funkci v MAKRU

Příspěvekod navstevnik » 08 říj 2010 14:23

Pokud volas ze standardniho modulu proceduru napr. v modulu listu (nebo v modulu UserForm), je nutno proceduru volat vcetne jejiho umisteni (uvidis napr v Excelu2000-3 nabidka Nastroje>Makro>Makra zobrazi se seznam dostupnych procedur) - List1.pokus:
Ve standardnim modulu:

Kód: Vybrat vše

Option Explicit

Sub program()
  List1.pokus
End Sub

xdoubekp
nováček
Příspěvky: 4
Registrován: říjen 10
Pohlaví: Muž
Stav:
Offline

Re: Volani funkci v MAKRU

Příspěvekod xdoubekp » 08 říj 2010 14:28

DIKY MOC!

navstevnik
Level 4
Level 4
Příspěvky: 1142
Registrován: srpen 08
Pohlaví: Nespecifikováno
Stav:
Offline

Re: Volani funkci v MAKRU

Příspěvekod navstevnik » 08 říj 2010 16:48

Takovyto zpusob umisteni procedur je jako cvicny prijatelny. Jinak je vhodne se ridit doporucenimi http://www.excelvba.estranky.cz/clanky/ ... matora-vba ale i dalsimi doporucenimi zde: http://www.excelvba.estranky.cz/clanky/ ... iky-navody


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • Kopírování řádků s funkcí když Příloha(y)
    od Martyn20 » 20 črc 2023 16:50 » v Kancelářské balíky
    3
    2034
    od Melvidor Zobrazit poslední příspěvek
    21 črc 2023 08:41
  • Wi-Fi router pro dům s možností funkcí Mesh Příloha(y)
    od P1X3L » 05 bře 2024 20:12 » v Sítě - hardware
    42
    5705
    od ITCrowd Zobrazit poslední příspěvek
    19 dub 2024 22:21

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 30 hostů