MS Excel

Téma: makro - xlsm otvoriť len v Exceli od MS

Zaslal/a kabaka 27.4.2023 14:05

Ako zabezpečiť aby sa súbor xlsm dal otvoriť len v Exceli od MS?
A nie v iných príbuzných programoch, open office, libre office, google tabulky, v androide a iných aplikáciách?

Makro je zaheslované, ale pri otvorení zošitu v libre office je možné ho preuložiť do iného formátu a vymazať makro bez potreby zadania hesla.

Chcem rozšíriť toto makro. Toto makro zabezpečuje, že sa súbor nedá uložiť do iného formátu ako xlsm. Ale potrebujem, aby sa dal otvoriť len Excelom od MS,
lebo inak to stráca význam.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If SaveAsUI Then
MsgBox "Podklady spracovala: menopriezvisko, uloženie nie je možné", vbInformation
Cancel = True
End If
End Sub

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = True
ActiveSheet.PageSetup.CenterFooter = "Podklady spracovala: menopriezvisko"
Application.EnableEvents = False
ActiveSheet.PrintOut
Application.EnableEvents = True
ActiveSheet.PageSetup.CenterFooter = ""

End Sub

Ďakujem

Zaslat odpověď >

knodl(27.4.2023 15:00)#054874

Zakázat jinému programu otevřít soubor je nemožné.
xlsm není nic jiného než zip (však si zkuste nějaký .xlsx nebo .xlsm přejmenovat na .zip a rozbalit).

Pokud Vám jde o zamčení, které nelze obejít, tak to mám špatnou zprávu - nejde to. Jestli svůj výtvor chcete ochránit, musíte zvolit jinou platformu, ne MS Office - ta k tomu nikdy nebyla určena.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.