Violazione di condivisione

Anonimo
2015-09-02T08:29:58+00:00

Durante l'aggiornamento di alcune cartelle di Excel (ho office 2013 e Windows 10) non sono riuscito ha salvare alcune cartelle a causa dei seguenti avvisi:

preciso che non ho alcun antivirus se non quelli rilasciati da Windows che sono inclusi nel sistema.

La cosa curiosa è che se carico uno di questi file e lo salvo senza modificarlo, posso salvarlo, ma se solo cambio qualche cosa, anche solo se scrivo in una cella, non è più possibile salvarlo.

Faccio notare che si tratta di file con terminazione XLSM, però altri file simili non hanno dato alcun problema ed uno di essi sono riuscito a farlo funzionare dopo aver riavviato il PC.

Non mi è possibile rinominare i file, né salvare le modifiche in altri file, perché queste cartelle servono da banche dati ad altre cartelle (che, però, al momento dell'apparizione del problema non erano aperte).

Ringrazio per l'attenzione che mi dedicherete,

Nostus

Microsoft 365 e Office | Excel | Per la casa | Windows

Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.

0 commenti Nessun commento

Risposta accettata dall'autore della domanda

Anonimo
2015-09-02T16:46:17+00:00

Copia incolla queste due macro in un modulo di codice e vedi come la seconda ti consenta di lavorare anche se la macro è in esecuzione:

Public Sub m_1()

    Dim lng As Long

    For lng = 1 To 1000000

        Cells(lng, 1).Value = lng

    Next

End Sub

Public Sub m_2()

    Dim lng As Long

    For lng = 1 To 1000000

        DoEvents

        Cells(lng, 1).Value = lng

    Next

End Sub

Nella guida del vb vedi DoEvents.

O vedi qui:

La risposta è stata utile?

4 persone hanno trovato utile questa risposta.
0 commenti Nessun commento

Risposta accettata dall'autore della domanda

Anonimo
2015-09-03T11:45:57+00:00

Ciao NostusNostus,

Queste due macro di Mauro dovrebbero essere incollate in un modulo standard:

  • Alt-F11 per aprire l'editor di VBA
  • Alt-IM per inserire un nuovo modulo di codice
  • Nel nuovo modulo vuoto, incolla il codice di Mauro:

Public Sub m_1()

    Dim lng As Long

    For lng = 1 To 1000000

        Cells(lng, 1).Value = lng

    Next

End Sub

Public Sub m_2()

    Dim lng As Long

    For lng = 1 To 1000000

        DoEvents

        Cells(lng, 1).Value = lng

    Next

End Sub

  • Alt-Q per chiudere l'editor di VBA e tornare a Excel.
  • Alt-F8 per aprire  la finestra di gestione delle macro
  • Seleziona m_1 | Esegui

Poi, esgui la macro m_2 nello stesso modo.

===

Regards,

Norman

La risposta è stata utile?

0 commenti Nessun commento

9 risposte aggiuntive

Ordina per: Più utili
  1. Anonimo
    2015-09-02T13:44:25+00:00

    Sono file generati con una versione precedente di Office, ma sono poi stati convertiti in Office 2013 (hanno funzionato sino alle ore 08:30 di questa mattina ed hanno smesso di funzionare alle ore 09:30 di questa mattina.

    <cut>

    Può dipendere da un aggiornamento non riuscito.

    Segui il punto a) qui:

    La risposta è stata utile?

    0 commenti Nessun commento
  2. Anonimo
    2015-09-02T09:13:59+00:00

    Sono file generati con una versione precedente di Office, ma sono poi stati convertiti in Office 2013 (hanno funzionato sino alle ore 08:30 di questa mattina ed hanno smesso di funzionare alle ore 09:30 di questa mattina.

    Tra l'altro voglio precisare che sono 10 file identici, cambiano solo i dati in essi contenuti: 5 funzionano perfettamente e 5 no.

    Per farli funzionare, in via provvisoria, ho escluso le cartelle che li contengono dalla scansione dell'antivirus, però è chiaramente una soluzione di fortuna che non può essere considerata come "la soluzione definitiva".

    Grazie e spero di avere un buon suggerimento,

    Nostus

    La risposta è stata utile?

    0 commenti Nessun commento
  3. Anonimo
    2015-09-02T08:40:48+00:00

    Tutto aggiornato?

    Sono file fatti con una versione precedente di Office?

    La risposta è stata utile?

    0 commenti Nessun commento