Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Excel i bazy danych
anonim




Typ: Nie zarejestrowany
Excel i bazy danych

Napisałem bazę danych w vb, a teraz wpadłem na pewien  pomysł. Czy da się zrobić raport z bazy danych w arkuszu Excela? Chodzi mi o to żeby program umieszczał odpowiednie informacje w odpowiednich komórkach arkusza. Da się to zrobić???

29-12-2004 09:17
  
JoFerrari




Typ: neutral
Postów: 75
Zarejestrowany: Apr 2003

Ten przyklad dziala tylko jesli jest Excell w systemie zainstalowany. Plik musi istniec(niepamietam czy musi w nim byc arkusz o tej nazwie*)

dim xlapp As Excel.Application
dim xlbook As Excel.Workbook
dim xlsheet As Excel.Worksheet

plik = App.Path & "\mpk.xls"

Set xlapp = New Excel.Application
Set xlbook = xlapp.Workbooks.Open(plik)
Set xlsheet = xlbook.Worksheets("MPK"  ' *nazwa arkusza

'teraz po prostu uzupelniasz komorki - najlepiej jakas petla

xlsheet.Cells(1, 1).Value = "mpk"
xlsheet.Cells(1, 2).Value = "nazwisko i imie "
xlsheet.Cells(1, 3).Value = "Brutto"

xlbook.Save

xlbook.Close
xlapp.Quit


---------

Jeszczze inne sprawa ze excel ladnie importuje bazy danych sam z siebie przez aplikacje

29-12-2004 10:38
Pokaż profil JoFerrari  Wyślij email do JoFerrari   
Wszystkich odpowiedzi: 1 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1