Pro tvůj příklad mi funkce dir přijde nepraktické. Vrací string a ne objekt se všemi soubory. Já bych udělal jeden sub z tohoto VBS kodu a do druhého sub bych napsal kod co by otviral soubor po souboru a pracoval s nimi. Jinak variant je vice: Druhá je přes tyhle objekty VBS: Set objFSO = CreateObje...

Takovy typ grafu v Excelu opravdu neexistuje. Takze pro dany ukol existuje nekolik reseni: 1.) namsat si v .NET vlastni add-in graf do Excelu. (to je docela dost prace), ale bylo by to nejvice profi. 2.) napsat si makro, co by automaticky vykreslovalo to co jsi delal rucne 3.) napsat si makro co bud...

Mas na tom PC service pack 2? Jestli ne tak si ho nainstaluj a asi se to zpravi. Moc se o tom na netu nepise, ale asi mas poskozeny kernel32.dll nejakym virem. Takze nejlepe ho z jineho cisteho PC prekopirovat nebo prepsat prave tim service packem.

Honza

Skus to tohle prepsat z VBA do Delphi. Podle me ti to pomuze. Jedne veci co jsem si vsim ve vyvojaku, ze pokud jsem ho spravne pochopil je v nem chyba. Zadani je takove, ze nevis kolik mas cisel, jenom vis ze konci nulou? Pokud je to tak tak tam musi byt ta polovina zaokrouhena protoze jinak se ti v...

Sorry to ze jsi to vyresil jsem si vsiml az potom co jsem to psal.... Proste jsem mel v praci pul hodiny cas a tak jsem juknul na pc-help. Precetl jsem zadani a napsal. To je vsechno!!! S Borlandem to bude horsi, pac ho nemam a nikdy jsem v nem nepsal. Jinak tvuj vyvojovy diagram je peknej. Ale holt...

takhle je to treba do Excelu. VBA je pro pochopeni logiky nejednodusi. Nebo pokud to chces v C++ tak si malinko uprav syntaxi. Nejsem si na 100pct jist jestli je v C++ "mod" psany stejne. Public Function provocislo(cislo As Integer) As Boolean Dim xx As Boolean xx = True 'Default nastaveni...

Nějak si nedovedu představit jaké by měla mít taková funkce vstupní parametry a co by mělo být výsledkem. Trochu tu myšlenku rozviň. Jediné co mě napadá by bylo vytvořit takovou uživatelskou funkci, která by např z buňky "A1" spočítala derivaci (parciální derivaci), Integrál atd. do buňky ...

Ahoj Lucie, 1.) jak by mělo vypadat to makro pro přílohu PDF souboru? Když se spustí tak ve spuštěném Thunderbirdu vytvoří nový prázdný e-mail a jako příloha bude to PDF? Nebo ještě něco navíc? 2.) V čem ho chceš napsat? V OOoBasic, Python nebo JavaScript? 3.) Pošli mi to makro na ukládání souboru a...

Ahoj mike007, trochu jsem ti opravil makro co jsi mel v tom souboru abz fungovalo. Chtel jsem totiz tvoji funkci trochu zkratit. Tak jsem ji prepsal ve VBA. syntaxe pe potom jednodusi :-) misto =KDYŽ(A1="";0;DÉLKA(A1)-DÉLKA(DOSADIT(A1;",";""))+1) je CBUS(A1) nazev jsem ...

Když už do toho chce takhle rejpat :-) tak by to mohlo vypadat třebas takhle: Sub vypsat() Dim i As Long 'definice i jako dlouhe cislo pro pripad Option Explicit Dim radek As Long 'radek jako dlouhy cislo radek = 1 'nastaveni radek jako 1 ' Rejpalka aa = ActiveSheet.Index '- zjisti index aktualniho ...

Doporučuji jednu drobnost :-) xx = Cells.SpecialCells(xlLastCell).Row ' zjisti posledni radek v listu. xlLastCell = stejene jako klavesa CTRL+END for i = 1 to xx místo: for i = 1 to 65536 Pravděpodobně nebudeš mít plný list až do konce a v případě běžných tabulek tak nax to 10tisíc řádek to makro ur...

Ahoj všichni, uměl by mě někdo poradit jak nadefinovat vstup do funkce ve VBA, aby typ byl něco jako union. Takovy typ neexistuje, ale jestli se to dá nějak obejít. Potřebuji zhruba něco takového: Function porovnavka(aa As Range, bb As Range) - ideálně, aby tu bylo bb Union tak abych mohl mít n-krát...