Witam
Chcę utworzyć makro solidworks, aby wykonać odpowiednik pliku/otwarcia i wskazać określony folder, aby następnie otworzyć wybrany przeze mnie plik.
Dziękuję za pomoc.
Lionel
Witam
Odpowiedź tutaj:
Funkcja SelectFolder(Opcjonalny tytuł jako ciąg, opcjonalny TopFolder jako ciąg) jako ciąg Dim objShell jako nowy Shell32.Shell Dim objFolder jako Shell32.Folder 'Jeśli użyjesz 16384 zamiast 1 w następnym wierszu, pliki są również wyświetlane Ustaw objFolder = objShell.BrowseForFolder (0, Tytuł, 1, TopFolder) Jeśli nie objFolder jest niczym, to SelectFolder = objFolder.Items.Item.Path Zakończ, jeśli koniec, funkcja
http://www.your-save-time-and-improve-quality-technologies-online-resource.com/vba-select-folder.html
Dziękuję za responsywność, ale mały problem:
Powinno brakować odpowiedniego odniesienia, możesz spróbować sprawdzić coś takiego
"Kontrolki powłoki Microsoft ... "
W menu Narzędzia > odwołania do języka VBA
1 polubienie
Excact .PL dobra robota... To powiedziawszy, jest to tylko wybór folderu, nie można otworzyć pliku.
Chodzi o to, aby otworzyć plik z "wstępnie wybranym" folderem w makrze.
Zobacz być może tutaj:
http://www.eng-tips.com/viewthread.cfm?qid=165464
Lub tutaj:
http://www.eng-tips.com/faqs.cfm?fid=1164
Coś w stylu 'swApp.GetOpenFileName(.....)` ?
Otwiera okno podobne do przycisku "Otwórz", możesz wybrać filtry (Typy plików do wyświetlenia), plik początkowy itp.
Funkcja zwraca ścieżkę wybranego pliku, jeśli użytkownik kliknie krzyżyk, ścieżka powrotna jest pusta.
1 polubienie
Dziękujemy, .PL jesteśmy coraz bliżej...
Jak zadeklarować określoną ścieżkę?
Rzeczywiście, z get it może działać, mamy tutaj przykład:
http://help.solidworks.com/2013/english/api/sldworksapi/Open_File_Example_VB.htm
fileName = swApp.GetOpenFileName("Plik do dołączenia", "", Filter, fileOptions, fileConfig, fileDispName)
Z instrukcjami :
value = instancja. GetOpenFileName(DialogTitle, InitialFileName, FileFilter, OpenOptions, ConfigName, DisplayName)
- InitialFileName (NazwaPlikuPoczątkowego)
- Ścieżka i nazwa pliku do otwarcia
1 polubienie
Rzeczywiście, nie widziałem cytatów ....
Wielkie podziękowania dla you.PL
Oops... odpowiedział zbyt szybko...
Dlaczego plik wybrany do otwarcia nie chce się otworzyć?
Nie wiem! Kończą mi się pomysły, może to nie jest możliwe!
swApp.GetOpenFileName(...)
zwraca ścieżkę do pliku jako "String".
Aby otworzyć plik, musisz użyć funkcji 'swApp.OpenDoc6'
http://help.solidworks.com/2012/English/api/sldworksapi/SolidWorks.Interop.sldworks~SolidWorks.Interop.sldworks.ISldWorks~OpenDoc6.html
Jeśli potrzebujesz dodatkowej pomocy, użyj Rejestratora makr SolidWorks i otwórz plik. Zobaczysz, jak korzystać z 'swApp.OpenDoc6(...)`
Ps: Jeśli rozwiązałeś swój problem, dodaj "Najlepsza odpowiedź"