stesso path

Hai un problema con Excel?

Nuova discussione

stesso path
di Traniwebdesign data: 14/03/2017 11:40:33
ciao a tutti voi.
Ho un problema.
dentro una cartella uso un file excel per lavoro.Il file sta in una cartella "SPEDIZIONI" messa sul desktop.
la cartella si aggancia ai dati di altri fogli excel che stanno nella stessa cartella sul desktop del mio pc.
quando salvo con delle macro il tutto funziona, ma se la mia cartella la passo sull'altro pc sempre sul desktop la macro va a farsi benedire.
è possibile inserire il path che mi deve prendere e salvare i file che stanno nella cartella corrente ? cosi anche se sposto la cartella da pc a pc, o la metto in una chiavetta usb il foglio mi funzioni sempre e prenda i dati sempre dai fogli che stanno nella stessa cartella . ?
Ho porvato anche ad usare ActiveWorkbook.SaveAs Filename:= ActiveWorkbook.Path & " ma nulla.
Grazie a tutti.

Range("A1:U2").Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy
    Workbooks.Add
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Application.CutCopyMode = False
    ActiveWorkbook.SaveAs Filename:= _
        "C:UsersPCDesktopSPEDIZIONIEXPORT_SGT.xlsx", FileFormat _
        :=xlExcel8, Password:="", WriteResPassword:="", ReadOnlyRecommended:= _
        False, CreateBackup:=False
        ActiveWorkbook.Close
    Application.ScreenUpdating = True
End Sub

di patel data: 14/03/2017 12:32:09
prova così

fpath = thisworkbook.path & ""
...........
ActiveWorkbook.SaveAs Filename:= fpath & "EXPORT_SGT.xlsx", ....

stesso path
di Traniwebdesign data: 18/03/2017 08:24:58
grazie.

Vuoi Approfondire?