Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Salva con nome Errore 1004

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Salva con nome Errore 1004

Postdi Gammamax » 10/03/10 18:36

In base a quanto ho letto su questo forum ho fatto una macro per il salvataggio con nome che qui riporto

' Salva Macro
Sub Salva()
FXLS = Range("C41").Value & ".xls"
Perc = "Y:\ordini\salvati\"
ActiveWorkbook.SaveAs Filename:=Perc & FXLS
End sub

All'esecuzione mi compare un messaggio d'errore :
Errore di Run Time 1004
metodo'SaveAs' dell'oggetto '_Workbook' non riuscito.

Ho controllato e credo di avere ricopiato i comandi come riportati.

Y è un percorso di rete di una unità che si connette all'avvio

grazie per un suggerimento
Gammamax
Newbie
 
Post: 8
Iscritto il: 23/11/09 15:59

Sponsor
 

Re: Salva con nome Errore 1004

Postdi Flash30005 » 10/03/10 22:39

Controlla bene che nella cela C41 del foglio che hai attivo ci sia un nome qualsiasi
se non c'è inserisci in C41 -> Prova
e vedrai se hai la rete disponibile in "Y:\ordini\salvati\"
tutto funzionerà rinominando il file Prova.xls
altrimenti metti
Perc = "C:\"
e riavvia la macro
se in questo caso funziona significa che era sbagliato il percorso ma sono più convinto della prima ipotesi

Ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: Salva con nome Errore 1004

Postdi Gammamax » 11/03/10 08:53

Saggia Idea - mannaggia perchè non ci ho pensato io a questa prova !!!!!

Sub Salva()
FXLX = Range("C41").Value & ".xls"
Perc = "C:\"
ActiveWorkbook.SaveAs Filename:=Perc & FXLS
End Sub

L'ho fatta e l'errore resta il medesimo, ma con il box d'errore diverso
Runtime errore 1004 : impossibile accedere al file provare uan delle seguenti operazioni ..............( che esista la cartella, che non sia in sola lettura, che non ci siano caratteri speciali, che il nome non superi i 218 caratteri)

Nel debug si evidenzia l'ultima riga ActiveWorkbook.SaveAs Filename:=Perc & FXLS

mentre sto scrivendo mi accorgo dell'errore in prima riga c'è scritto FXLX anzichè FXLS ed il mistero è lì !!!!

Mo funziona
Scusate e grazie a Flash per l'aiuto che mi ha permesso di trovare l'errore.
Gammamax
Newbie
 
Post: 8
Iscritto il: 23/11/09 15:59

Re: Salva con nome Errore 1004

Postdi Flash30005 » 11/03/10 10:16

Gammamax ha scritto:...
mentre sto scrivendo mi accorgo dell'errore in prima riga c'è scritto FXLX anzichè FXLS ed il mistero è lì !!!!

si, ma questo errore lo hai inserito ora,

perché il codice del tuo precedente post
Gammamax ha scritto:...
Codice: Seleziona tutto
Sub Salva()
    FXLS = Range("C41").Value & ".xls"
    Perc = "Y:\ordini\salvati\"
    ActiveWorkbook.SaveAs Filename:=Perc & FXLS
End sub


come vedi era corretto :D

Ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-


Torna a Applicazioni Office Windows


Topic correlati a "Salva con nome Errore 1004":


Chi c’è in linea

Visitano il forum: Marius44 e 12 ospiti