vbamania.pl
login:
hasło:
 
  *Rejestracja *Zapomniane hasło
 Dziś jest sobota, 18 maja 2024 roku.
Ustaw jako stronę startową Ulubione Napisz
PowrótPowrót do serwisu  RegulaminRegulamin rssRSS

  tytuł wątku:
Wątki dyskusji

Jak zapisać arkusz po kliknięciu buttona?


otwartyotwarty rozpoczął: alicelee postów: 3



napisał: alicelee
postów: 57


umieszczony:
5 lutego 2007
17:50

  
Super działa :) dziekuje :)
napisał: Trebor
postów: 1209


umieszczony:
5 lutego 2007
16:04

  
Hej

Zamień ostatnią linię na
ActiveWorkbook.SaveAs Filename:=strFile



i powinno być dobrze.

Pozdrawiam
napisał: alicelee
postów: 57


umieszczony:
5 lutego 2007
15:50

  
Witam!
Na userformie wstawilam przycisk o nazwie btn_zapisz. Aha ten userform nazywa sie frm_sprawozdanie. Chciałabym aby po wykonaniu do konca cwiczenia, mozna bylo zapisac plik pod nową nazwą czyli "zapisz jako". Wpisalam tak ale cos jest zle tu :/ pomozcie... :)

Private Sub btn_zapisz_Click()

Dim strFile As String
Dim strPath As String

strPath = ActiveWorkbook.Path

strFile = strPath & "\test_eskportu.xls"
Call ActiveWorkbook.SaveAs(strFile, xls)

End Sub



<-wstecz  1  dalej->
wszystkich stron: 1


Sortuj posty: z