Risolto] Protezione file di calc
Risolto] Protezione file di calc
Buongiorno, sono al corrente che questo è un argomento già trattato e che non ci sono molte possibilità di risolverlo perfettamente. Tuttavia vorrei chiedervi se esiste la possibilità di impedire che un file di calc venga copiato su un altro pc. So anche che le password non sono risolutive in quanto facilmente rimuovibili o identificabili ma mi chiedo se sia possibile, almeno, aggiungere in una macro di apertura (il mio file si apre visualizzando una finestra di dialogo con pulsanti che funge da Menu) una istruzione che confronti il nome del pc con quello riportato sulla macro e, in caso sia diverso, chiuda il file senza dare la possibilità di modificarlo. Ringrazio anticipatamente tutti quelli che mi aiuteranno a risolvere questo problema. Buona giornata
Ultima modifica di Ant52 il lunedì 16 agosto 2021, 12:12, modificato 1 volta in totale.
OpenOffice 4.1.5 Windows 10
Re: Protezione file di calc
Se ti si rompesse il pc e dovresti usarne uno diverso come faresti? perderesti il lavoro? non potresti accedere nemmeno tu al file.Ant52 ha scritto:.... una istruzione che confronti il nome del pc con quello riportato sulla macro e, in caso sia diverso, chiuda il file senza dare la possibilità di modificarlo. Ringrazio anticipatamente tutti quelli che mi aiuteranno a risolvere questo problema. Buona giornata
E in ogni caso accedendo al codice si potrebbe cambiare il nome del pc, come un utente più esperto accederebbe alla password.
Usando la funzione Environ puoi risalire al nome del computer
Codice: Seleziona tutto
msgbox Environ("COMPUTERNAME")
LibreOffice 7.2.2.2 windows 10
Openoffice 4.1.13 su windows 10
Openoffice 4.1.13 su windows 10
Re: Protezione file di calc
Non perderei il lavoro perché lo rinominerei con lo stesso nome di quello guasto. Non credi?
OpenOffice 4.1.5 Windows 10
Re: Protezione file di calc
Potrebbe farlo pure chi ti copia il programma, e come detto prima si potrebbe risalire al nome del pc come si risale a quello della password, naturalmente parliamo di utenti smanettoni.
LibreOffice 7.2.2.2 windows 10
Openoffice 4.1.13 su windows 10
Openoffice 4.1.13 su windows 10
Re: Protezione file di calc
Sono perfettamente d'accordo con te. Però ancora non ho capito se si può fare e come.
OpenOffice 4.1.5 Windows 10
Re: Protezione file di calc
Ti ho detto quale istruzione usare per risalire al nome del pc, la tua logica è aprire il file, se il nome del pc è diverso il documento si chiuderebbe non facendo capire all''utente la causa, ma potrebbe sempre riaprirlo disabilitare le macro e questo controllo non avverrebbe e si accederebbe al file.
LibreOffice 7.2.2.2 windows 10
Openoffice 4.1.13 su windows 10
Openoffice 4.1.13 su windows 10
Re: Protezione file di calc
Scusami ma non sono stato chiaro. Il mio scopo è quello di non fare aprire il file su un PC diverso quindi non mi serve sapere il nome del PC. Mi serve sapere invece se si può inserire una istruzione che non fa ça aprire il file quando viene copiato su un altro PC. Ti chiedo scusa per la poca chiarezza.
OpenOffice 4.1.5 Windows 10
Re: Protezione file di calc
e come fai a sapere che si trova su un pc diverso il file se non ne verifichi il nome? Nel tuo primo messaggio dicevi di inserire una istruzione in una macro all'apertura del documentoAnt52 ha scritto:.... quindi non mi serve sapere il nome del PC.....
L'Istruzione potrebbe essere questaAnt52 ha scritto: una istruzione che confronti il nome del pc con quello riportato sulla macro e, in caso sia diverso, chiuda il file senza dare la possibilità di modificarlo.
Codice: Seleziona tutto
Sub Main
iF Environ("COMPUTERNAME") <> "pcant52" tHEN ThisComponent.dispose()
End Sub
LibreOffice 7.2.2.2 windows 10
Openoffice 4.1.13 su windows 10
Openoffice 4.1.13 su windows 10
Re: Protezione file di calc
In effetti è questo che intendevo aggiungere. Adesso avrei una
domanda :è corretto che in questo modo si possa accedere al file solo dal mio PC e da nessun altro (smanettoni esclusi)?
domanda :è corretto che in questo modo si possa accedere al file solo dal mio PC e da nessun altro (smanettoni esclusi)?
OpenOffice 4.1.5 Windows 10
Re: Protezione file di calc
Non è corretto, si può accedere al file da un pc diverso basta non abilitare le macro, qualsiasi protezione da macro è raggirabile... basta non fare eseguire il codice.
LibreOffice 7.2.2.2 windows 10
Openoffice 4.1.13 su windows 10
Openoffice 4.1.13 su windows 10
Re: Protezione file di calc
Certamente disabilitando le macro cade tutto. Tuttavia se, come nel mio caso, il file si apre automaticamente sulla finestra di dialogo e si chiude subito dopo penso che un utente ordinario e non smanettone, che avrebbe qualche difficoltà a capire dove sta il problema.
A questo punto mi sorge un'altra domanda: una cosa del genere non si può fare senza macro?
A questo punto mi sorge un'altra domanda: una cosa del genere non si può fare senza macro?
OpenOffice 4.1.5 Windows 10
Re: Protezione file di calc
A quanto ho capito tu vuoi far usare il tuo file da altri utenti su un determinato pc quindi impedire che questi possano copiare il file( possono lavorare - modificare il file ma non copiarlo).
Credo che possa affidarti a qualche software che puoi facilmente trovare in rete che inibiscono la copia e l'eliminazione (accidentale e non) dei file, funzionano con password e ti basta inserire il tuo file nella lista dei file da proteggere. Io non li ho mai provati ma ho letto qualcosa su internet.
Credo che possa affidarti a qualche software che puoi facilmente trovare in rete che inibiscono la copia e l'eliminazione (accidentale e non) dei file, funzionano con password e ti basta inserire il tuo file nella lista dei file da proteggere. Io non li ho mai provati ma ho letto qualcosa su internet.
LibreOffice 7.2.2.2 windows 10
Openoffice 4.1.13 su windows 10
Openoffice 4.1.13 su windows 10
Re: Protezione file di calc
Ti ringrazio molto per il tempo che mi hai dedicato e per il suggerimento. Solo che adesso, provando ad inserire nella mia macro di apertura l'istruzione If che mi avevi inviato prima mi si è bloccato tutto nel senso che non si avvia nessun file di OpenOffice neanche quelli che non hanno macro. Pensi che potrei risolvere disinstallando OpenOffice e ricaricandolo?
La macro di apertura modificata è la seguente:
Sub Apri
DialogLibraries.LoadLibrary("PrivateLibrary1")
Dlg = CreateUnoDialog(DialogLibraries.PrivateLibrary1.InserisciDati)
If Environ("ComputerName") <> "NomeMioPc" Then ThisComponent.dispose()
Dlg.Execute ()
Dlg.dispose ()
End Sub
Ho fatto un bel casino??
Grazie per l'aiuto
La macro di apertura modificata è la seguente:
Sub Apri
DialogLibraries.LoadLibrary("PrivateLibrary1")
Dlg = CreateUnoDialog(DialogLibraries.PrivateLibrary1.InserisciDati)
If Environ("ComputerName") <> "NomeMioPc" Then ThisComponent.dispose()
Dlg.Execute ()
Dlg.dispose ()
End Sub
Ho fatto un bel casino??
Grazie per l'aiuto
OpenOffice 4.1.5 Windows 10
Re: Protezione file di calc
Hai fatto un bel casino, a parte che il codice che ti ho dato andava messo all'inizio macro e non in mezzo, sicuramente lo avrai messo tra le macro personali e si avvia ad ogni apertura di file openoffice.
Prova ad aprire un nuovo file( non dovrebbe partire la routine) ed elimini la macro.
Prova ad aprire un nuovo file( non dovrebbe partire la routine) ed elimini la macro.
LibreOffice 7.2.2.2 windows 10
Openoffice 4.1.13 su windows 10
Openoffice 4.1.13 su windows 10
Re: Protezione file di calc
Ho riavviato il PC e adesso funziona tutto normalmente. Per quanto riguarda la macro mi confermi che l'istruzione dovrei scriverla subito dopo Sub Apri?
OpenOffice 4.1.5 Windows 10
Re: Protezione file di calc
Certo, prima effettui la verifica e successivamente se il nome del pc è corretto si eseguono le altre istruzioni.
LibreOffice 7.2.2.2 windows 10
Openoffice 4.1.13 su windows 10
Openoffice 4.1.13 su windows 10