Witam
Potrzebuję pomocy odnośnie otwierania programów i plików (głównie .xls , . xlsm).
Mam przycisk, pod którym jest program do uruchamiania konkretnego pliku:
Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
Dim FileName As String = "C:\Users\xxx\Desktop\TEST.xlsx"
Try
Dim FS As IO.FileStream = IO.File.Open(FileName, IO.FileMode.Open, IO.FileAccess.Read, IO.FileShare.None)
FS.Close()
FS.Dispose()
FS = Nothing
Dim myProcess As System.Diagnostics.Process = New System.Diagnostics.Process()
myProcess.StartInfo.FileName = FileName
myProcess.StartInfo.WindowStyle = System.Diagnostics.ProcessWindowStyle.Normal
myProcess.Start()
Catch ex As IO.IOException
MessageBox.Show("Błąd" & Environment.NewLine & ex.Message)
Catch ex As Exception
MessageBox.Show("Wystąpił nieznany błąd" & Environment.NewLine & ex.Message)
End Try
End Sub
Program sprawdza, czy dany plik jest już uruchomiony i czy istnieje oraz wyświetla komunikat jeśli jest otwarty.
Chciałbym jeszcze aby:
-
Kolejne pliki .xlsx otwierały się w innych oknach Excel’a a nie w jednym (szukałem w ustawieniach Excel’a, ale wszystko co znalazłem prowadzi, albo do błędu, albo do niepowodzenia)
-
Otwierany plik .xlsx otwierał się w określonym miejscu na pulpicie i z określoną wielkością okna Excel’a.
Bardzo mi zależy, aby pliki otwierały się w innych oknach, gdyż to ułatwiło by mi pracę. Próbowałem zmieniać ustawienia w rejestrze systemowym, aby Excel automatycznie otwierał wszystko w nowych oknach, ale nie doprowadziło to do niczego konkretnego - po prostu nie zadziałało.
Dzięki za odpowiedzi.