CHIUSURA DI FILE

[scanacc]

Ciao a tutti,
ho aperto un file con questo comando

Codice: Seleziona tutto

    Workbooks.Open Filename:= _
        "C:\DOCUMENTI\LISTA UNICA.xls", Notify:= _
        False
    Application.WindowState = xlNormal


...sapete come faccio a richiuderlo?

[scanacc]

Ciao a tutti,
ho aperto un file con questo comando

Codice: Seleziona tutto

    Workbooks.Open Filename:= _
        "C:\DOCUMENTI\LISTA UNICA.xls", Notify:= _
        False
    Application.WindowState = xlNormal


...sapete come faccio a richiuderlo?

In poche parole, vorrei mettere una macro che mi chiude il file aperto ...

[alfrimpa]

Ciao Scanacc

Se il file è l'unico ad essere aperto puoi provare con

Codice: Seleziona tutto

ActiveWorkbook.Close

[ricky53]

Ciao,
leggi quanto ti ha scritto Alfredo.


Consiglio:
in VBA quando non sai come fare una operazione attiva il registratore di macro ed esegui, sul foglio i passi sai di dover fare (nel tuo caso chiudere il file aperto).
Una volta fermato il registratore di macro avrai del codice che, in diversi casi va opportunamente generalizzato/adattato, potrai utilizzare per le tue necessità

[scanacc]

Grazie per i consigli.
Per Ricky53 ... Ho fatto quello che mi dici ma non mi registra i movimenti
Per Alfrimpa ... Due cose: Quando inserisco il comando mi chiude il file dal quale parte il comando non quello denominato LISTA UNICA.xls . I file sono più di uno...precisamente 7

[alfrimpa]

Allora se il file da chiudere è sempre quello potresti provare con:

Workbook("LISTA UNICA.xls").Close

[ricky53]

Ciao,
leggi la soluzione di Alfredo.


Adesso: quali passi hai fatto sul file con il registratore attivo?

[scanacc]

Mi da questa risposta:

Errore di compilazione
Sub o Function non definita

In pratica io inserisco il comando che mi hai dato alla fine di Auto_open prima di end sub ... pari pari così come me lo hai scritto
Workbook("LISTA UNICA.xls").Close
Dove sbaglio?

[alfrimpa]

prova a postare l'intera macro e comunque ho sbagliato io a scrivere omettendo una "s"

Deve essere

Workbooks("LISTA UNICA.xls").Close

[alfrimpa]

Se prima di chiudere il file vuoi salvarlo

Codice: Seleziona tutto

Workbooks("LISTA UNICA.xls").Save
Workbooks("LISTA UNICA.xls").Close

[scanacc]

per RIcky: con il registratore acceso nel file principale vado sul file aperto, clicco sulla X chiudendolo e salvo la registrazione. Quando vado a vedere cosa ha registrato, non trovo nulla.

per alfrimpa: DEBUG: Runtime 9 ... Indice non incluso nell'intervallo

[ricky53]

Ciao,
se tu, nelle opzioni, non cambi nulla il codice VIENE registrato nel file ove hai attivato il registratore e in questo file NON hai trovato il codice registrato?
Quanto attivi il registratore di macro Excel ti propone il nome che verrà assegnato alla macro ed anche in quale file verrà registrata (nella "Combo" il cui nome è "Memorizza macro in").

[alfrimpa]

Ciao Scanacc

In generale l'errore Runtime 9 ... Indice non incluso nell'intervallo si verifica quando la macro non trova una cartella con quel nome.

Per poter verificare occorrerebbe vedere l'intera macro ed avere dei file di esempio da testare.