Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Otworzenie arkusza
anonim




Typ: Nie zarejestrowany
Otworzenie arkusza

Jak za pomocą formatki składającej się z pola textbox i  przycisku buttom otworzyć arkusz ktorego nazwe wpisałem w polu textbox.
Jak ustawic (np wykonanie w tym arkuszu wykresu), aby korzystał z danych tego -aktywnego arkusza.
Prosze o pomoc.

24-08-2004 16:01
  
losmac
"profesorek"




Typ: neutral
Postów: 758
Zarejestrowany: May 2003

Sprecyzuj, czy chcesz arkusz, czy skoroszyt.

Jeśli chodzi o arkusz w aktywnym skoroszycie, w którym wykonywane jest makro:
ThisWorkbook.Worksheets(podanaNazwa).Activate

Jeśli chodzi o skoroszyt, sprawa jest toszkę trudniejsza, bo zanim otworzysz żądany plik musisz sprawdzić czy istnieje w danej lokalizacji.
Zatem proponuję Ci inne rozwiązanie - wskazanie pliku za pomocą okna dialogowego. Wtedy - na pewno - nie zrobisz błędu wpisując błędną ścieżkę dostępu do  pliku.

Option Explicit

Sub OtworzSkoroszyt()
    MsgBox GetExcelFileName
End Sub

Function GetExcelFileName() As String
Dim strTmp As String

strTmp = Application.GetOpenFilename("pliki Excela (*.xls), *.xls"
If strTmp = CStr(False) Then
    GetExcelFileName = ""
Else
    GetExcelFileName = strTmp
End If

End Function



_____________________________________________
POSTULATY STARUSZKA:
1) Ludzie, dbajcie o polszczyznę!!!
2) Ludzie, zadawajcie kompletne pytania, a nie rzucacie ochłapy i trzeba się domyślać o co chodzi!!!

Powodzenia
Maciej Łoś

27-08-2004 23:02
Pokaż profil losmac  Wyślij email do losmac   Odwiedź stronę losmac  
Wszystkich odpowiedzi: 1 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1