Forum di Excel e VBA, per condividere esperienze e risolvere problemi su:
Excel, Word, Access, Power Point, Microsoft Office, macro, Visual Basic e Visual Studio.
Salvataggio foglio
- Hai un problema con Excel?
Salvataggio foglio
di Rob (utente non iscritto) data: 16/12/2016 10:42:36
Buongiorno ho una macro che mi salva il foglio in automatico al click di un pulsante.
Nel codice ho inserito percorso del salvataggio (c:\documenticartella lavoro Ect ect )
Ora se volessi togliere il percorso c:documenti perché se lavoro da un altro pc il percorso di salvataggio cambia(potrebbe essere per esempio d:\.....) e far salvare il file sempre nella cartella lavoro come posso fare?
Grazie
di patel data: 16/12/2016 14:52:12
rileggi bene il tuo post, ti sembra di aver spiegato bene ?
di alfrimpa data: 16/12/2016 16:04:07
Ciao
Premesso che sono d'accordo con patel (che saluto) uno spunto potrebbe essere la macro che vedi sotto per cui in base al "nome" del pc rilevato puoi impostare due percorsi diversi.
Alfredo
Sub RilevaNomeComputer() Dim NomeComputer As String NomeComputer = Environ$("computername") MsgBox NomeComputer End Sub
di Rob (utente non iscritto) data: 16/12/2016 17:30:27
Il problema é che se installo il programma in uff il percorso di dove deve salvare cambia, quindi vorrei sapere se esiste un codice che mi permetta di salvare il file indicando solo il nome della cartella dove si trova. In pratica deve trovare da solo il percorso del file
di patel data: 16/12/2016 17:56:27
se ti va bene salvare nella stessa cartella in cui si trova il file con la macro puoi usare
miopercorso = thisworkbook.path savepath = miopercorso & " omedelfile"
di Rob (utente non iscritto) data: 16/12/2016 18:07:01
Il percorso lo può rilevare in automatico?
di patel data: 16/12/2016 18:17:56
perché non provi ?
sub a() miopercorso = thisworkbook.path msgbox miopercorso end sub
di Rob (utente non iscritto) data: 18/12/2016 10:39:55
Ok grazie va bene. Ora se volessi far salvare il file in una sotto cartella( tipo mio percorso/sottocartella) come posso fare? Ho provato a mettere uno seguito il nome della sotto cartella dopo "mio percorso" ma non va!!!
Graxie
di patel data: 18/12/2016 12:13:58
come hai potuto vedere io di allego il codice, non faccio solo discorsi, perché non lo fai anche tu ?
di Rob (utente non iscritto) data: 18/12/2016 12:41:32
Io ho usato quel tuo codice, vorrei che a quel codice si aggiungesse una sottocartella!! Non posso inserire codici xche vi scrivo dal tel.. Il pc non ha internet!!
di patel data: 18/12/2016 16:17:39
io non posso sapere se utilizzi i miei suggerimenti correttamente, passa il file sul telefono e allegalo
di Rob (utente non iscritto) data: 18/12/2016 16:26:24
Al tuo codice bisogna aggiungere una sottocartella che si chiama "mesi"..
Quindi dopo il codice che rileva il percorso deve salvare nella cartella mesi che è alla fine del percorso che ha rilevato.
di Rob (utente non iscritto) data: 20/12/2016 10:26:22
Sto provando ad aggiungere una sottocartella al percorso che mi rileva in automatico con la macro savepath=miopercorso.
Così mi da errore:
Savepath = miopercorso sottocartella & name
Come posso fare?
Grazie
di patel data: 20/12/2016 12:17:15
Savepath = "C:Documentisottocartella" & name
di Rob (utente non iscritto) data: 20/12/2016 12:38:51
Il percorso lo rileva in automatico con miopercorso=thisworkbook.path
Io voglio che dopo la striga savepath=miopercorso mi aggiunga la sottocartella!!
Grazie
- Vuoi Approfondire?
