Elektroda.pl
Elektroda.pl
X
Proszę, dodaj wyjątek www.elektroda.pl do Adblock.
Dzięki temu, że oglądasz reklamy, wspierasz portal i użytkowników.

Makro zapisujące plik na pulpicie

zbysiomysio 13 Paź 2017 09:15 684 12
  • #1 13 Paź 2017 09:15
    zbysiomysio
    Poziom 6  

    Witam
    Mam makro, które otwiera nowy plik i robi w nim pewne rzeczy. Będzie to robione na różnych komputerach. W jaki sposób można zrobić, aby nowo otwarty plik został zapisany na pulpicie użytkownika (mają oni różne systemy XP i 7) pod nazwą np. "blablabla" i nastąpiło zamknięcie pliku. Jeżeli plik o takiej nazwie byłby na pulpicie to powinien być zastąpiony przez ten nowy.

    0 12
  • Pomocny post
    #2 13 Paź 2017 10:37
    JRV
    Specjalista - VBA, Excel

    Np. spróbuj:
    Msgbox environ("userprofile") &"\Decktop"

    0
  • #3 13 Paź 2017 10:53
    zbysiomysio
    Poziom 6  

    Chyba nie rozumiem. Ten kod, który napisałeś rozumiem, że pokazuje okienko (Msgbox), ale nie zapisuje mi mojego pliku na pulpicie. Dodam jeszcze, bo nie wiem czy to ma znaczenie, że osoby u których mają zapisywać się te pliki na pulpitach nie pracują jako administratorzy lecz użytkownicy.

    0
  • Pomocny post
    #4 13 Paź 2017 11:15
    JRV
    Specjalista - VBA, Excel

    Zamiast msgbox użyj to jak ścieżki do pliku.

    0
  • #5 13 Paź 2017 11:45
    zbysiomysio
    Poziom 6  

    Próbowałem coś takiego zrobić, ale pokazuje mi błąd 1004 i nie bardzo wiem gdzie jest błąd

    Kod: vbscript
    Zaloguj się, aby zobaczyć kod

    0
  • #6 13 Paź 2017 12:07
    JRV
    Specjalista - VBA, Excel

    Prawdopodobnie chciało bla.xlsm
    Jaka wersje XL?

    0
  • #7 13 Paź 2017 12:26
    zbysiomysio
    Poziom 6  

    Poprawiłem na xlm, ale dalej pokazuje mi błąd 1004. W opisie jest: Excel nie może uzyskać dostępu do pliku 'C:\users\.........\Desktop". Możliwe przyczyny to: 1. Nazwa pliku lub ścieżka nie istnieje; 2. Plik jest używany przez inny program; 3. skoroszyt, który próbujesz zapisać ma taką samą nazwę jak otwarty.

    0
  • Pomocny post
    #8 13 Paź 2017 17:09
    clubs
    Poziom 29  

    @zbysiomysio Zobacz jak się pisze pulpit.

    0
  • Pomocny post
    #9 13 Paź 2017 17:22
    JRV
    Specjalista - VBA, Excel

    To ja przypadkowo... Ma byc Desktop

    0
  • #10 13 Paź 2017 17:32
    clubs
    Poziom 29  

    @JRV literówki się zdarzają ale myślałem że @zbysiomysio sam znajdzie a nie copy paste :)
    pozdrawiam

    0
  • #11 16 Paź 2017 08:36
    zbysiomysio
    Poziom 6  

    Dzięki chłopaki za pomoc. clubs twoja uwaga

    Kod: text
    Zaloguj się, aby zobaczyć kod
    całkowicie słuszna. Część mojego makra wygląda teraz tak:
    Kod: vbscript
    Zaloguj się, aby zobaczyć kod
    Mam jeszcze tylko do tego pytanie. Jak poradzić sobie, żeby system nie pytał mnie czy chcę zamienić plik na pulpicie jeżeli taki już jest, tylko automatycznie go zamieniał.

    0
  • #12 16 Paź 2017 08:40
    JRV
    Specjalista - VBA, Excel

    Przeczytaj w pomocy 'Application.DisplayAlerts'

    0
  • #13 16 Paź 2017 08:51
    zbysiomysio
    Poziom 6  

    Dzięki za pomoc

    0