Příspěvky uživatele


< návrat zpět

Strana:  1 2 3 4   další »

Začátečník
Díky moc. Funguje to :-)

Ahoj všem,
V buňce mám celou cestu k souboru např. C:\pokus\pokusny_kralik.xlsm
Jde mi o to jak zapsat do jiné buňky cestu k souboru, ale bez přípony. Výsledek by měl vypadat takto: C:\pokus\pokusny_kralik

Potřebuji to ale ve VBA.
Všem děkuji za řešení .

Ahoj všem,
Mám userform a v něm combobox. Jak dosáhnu toho, aby se mi vytiskli jenom data (vybrané pole), ale né vlatný combobox?
Děkuji za odpověď.

Ahoj všem,
prosím o radu: Jak jednoduše zkopírovat všechny podmíněné formátování z jednoho listu do druhého listu? (těch podmíněných formátování mám v listě cca 20)
Děkuji za radu.

Stakker:
Už to funguje, jenom se mi to otevírá v minimalizovaném okně, ale to už nevadí.
Děkuji všem.

I to jsem zkoušel. Na příponě souboru nezáleží a cesta je správná.

veny : Díky, ale zkoušel jsem to a hlásí mi to chybu. Změnil jsem pouze cestu :
Sub OpenDoc()
Dim strFile As String

strFile = "c:\1\Vzory.docm" 'change to path of your file
If Dir(strFile) <> "" Then 'First we check if document exists at all at given location
Documents.Open strFile
End If
End Sub

Skončí to na řadku: Documents.Open strFile a píše to "object required"

,

Ahoj všem,
prosím o radu jak pomoci makra otevřít word soubor *.docx?
Děkuji.

Funguje to dokonalé :-)
Díky všem. Moc jste mi pomohli.

Dobrý den,
mám podobný problém a prosím o pomoc:
Chci získat přehled o údajích léků, které jsou na jednotlivých listech, do listu PŘEHLED. Představuji si to tak, že na list PŘEHLED budou zapsány jednotlivé údaje makrem ze všech listů, kterých bude víc než 50.
Příkládám přílohu jako příklad. Děkuji všem za pomoc.

Tak hotovo. Vytvořil jsem formulář s listboxem, do kterého načtu obsah adresáře (zatím přednastavený na "C:\11111\kopiruj\" Dle potřeby lze změnit), vyberu cílovy soubor a do toho se mi následně zkopírují moduly. Má to ovšem jednu chybu: Pokud již v cílovém souboru existuje stejný název modulu nebo formuláře, tak se to zastaví. Asi by nebyl problém to oeštřit ...
Pokud se to bude někomu hodit, tak je to v přiloze.
Jinak díky všem, kteří byli nápomocní :-)

elninoslov:
dá se, ale jenom částečně, protože cílový soubor se bude měnit. Zdrojový soubor bude pořád: Likvidační_MSOFFICE2019.xltm
Cílový se bude měnit. Ale nešlo by to udělat tak, že by si dejme tomu, jeho název načetl z proměnné vložené ručně do textboxu? :-)

elninoslov:
Díky. Funguje to :-) Jenom technicky dotaz: nešlo by to nějak upravit tak, aby to makro nevytvářelo nový sešit a tam zkopírovalo moduly, ale aby ty moduly zkopíroval do druhého otevřeného sešitu?
Např.: z pokus.xlsm moduly zkopíroval do otevřeného sešit s názvem xxx.xlsm?

Už to vidím. problém je tady:
Set SourceModule = sourceVBProject.VBComponents("Module1").CodeModule

Ono to zkopíruje jenom ten modul, který je tady zapsaný. V tomto případě je to Modul1.

Díky za odpověď.
google není mrcha, ale všechno co najde, nemusí být funkční.
Kdyby jsem našel funkční kod, tak vás (všechny co tomu rozumí, nežádám o pomoc ve vyhledávání a poučování jak se v googlem vyhledává, ale o opravdu funkční makro, které řeší konkrétní problém.
Ale jinak díky za link, který sice odkazuje na možnou variantu, ale to mokra je nevím proč nefunkční. Tady na tomto se to zastaví:
For Each vbcompSource In wbSource.VBProject.VBComponents


Strana:  1 2 3 4   další »

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09