< návrat zpět

MS Excel


Téma: ulož soubor bez makra rss

Zaslal/a 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ěď >

#005701
avatar
Co zkusit uložit jako *.xlsx, když ten makra nemůže obsahovat namísto *.xlsm který je makrový?
(nemám vyzkoušeno)citovat
#005702
avatar
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
#005703
avatar
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
#005718
Stalker
http://wall.cz/index.php?m=topic&id=5237citovat
#005721
avatar
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
#005734
avatar
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
#005741
avatar
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)
avatar\n

Menu

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.

On-line nástroje