MS Excel

Téma: ulož soubor bez makra

Zaslal/a jenik 4.8.2011 16:22

zdar, mam soubor, v něm tlačítko, když ho stlačim makro mi vytiskne 3 kopie a uloží kopii souboru přes ActiveWorkbook.SaveCopyAs. V té kopii je zase to stejný makro. Potřebuju aby tam nebylo, aby se uložila jenom kopie bez makra. Ví nějaká chytrá hlava, porádí nebö aspoň nasměruje mě?

Zaslat odpověď >

chipoun(4.8.2011 17:15)#005701

Co zkusit uložit jako *.xlsx, když ten makra nemůže obsahovat namísto *.xlsm který je makrový?
(nemám vyzkoušeno)citovat

jenik(4.8.2011 18:52)#005702

vyzkoušeno, sice to jako *.xlsx uložim, ale už mi to excel neotevře, resp. hodí chybu. Ta přípona je pro excel 2007 a já mam jenom 2003, tak si myslim že to správně jako xlsx neuložim. Nějaký jiný nápady?citovat

chipoun(5.8.2011 8:57)#005703

Aha, tak když máš 2003, tak to je pasé.
To už mě napadá jen pokud máš makro v modulu a není v samotných listech, tak vytvořit nový dokument do něj listy nakopírovat a pak uložit.

Ale to už není tak elegantní. Možná bude vědět někdo jiný.citovat

Stalker(5.8.2011 23:53)#005718

http://wall.cz/index.php?m=topic&id=5237 citovat

Roman(6.8.2011 17:52)#005721

Já jsem si napsal a používám toto:
Sub ZrušModuly()
Dim Compo As Object
For Each Compo In ActiveWorkbook.VBProject.vbcomponents
If Not Compo.Type = 100 Then
a = Compo.Name
ActiveWorkbook.VBProject.vbcomponents.Remove Compo
End If
Next Compo
End Sub
citovat

jenik(8.8.2011 20:24)#005734

díky všem za pomoc, už jsem to udělal jak psal chipoun, vytvořit nový dokument, překopírovat, uložit atd..funguje

to mazání maker si píšu. díky.citovat

Roman(9.8.2011 10:18)#005741

Pokud to funguje OK, měl jsem ale problémy např. při tisku, který byl nastaven v původním souboru jsem makrem musel nastavovat v novém, tak raději používám mazaním maker a oba soubory jsou totožné (mimo maker) jo ještě mažu vzorce, neboť uživatelé si s tím hrají a pak to nefunguje.citovat

Uživatelské menu

Nejste přihlášen(a)

Formulář Faktura

Formulář Faktura IV

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

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.