Povezivanje Accessa i Excela preko VB

Povezivanje Accessa i Excela preko VB

offline
  • Pridružio: 03 Okt 2006
  • Poruke: 30

Da li je moguce iz VB povezati tabele u Excelu sa odgovarajucom bazom u Accessu, tako da se podaci direktno prebacuju iz tabela u bazu?



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
offline
  • Pridružio: 04 Nov 2006
  • Poruke: 3

A zasto preko VB-a prevacujes tabel iz excela u access?? Ti hoces bazu u accessu?
Ako je to, zasto ne punis odmah access iz VB-a?



offline
  • Pridružio: 23 Dec 2006
  • Poruke: 1

Verovatno zelis da vec unete podatke u access-u ubacis u excel stranicu koja je prethodno graficki obradjena. Ak je tako - no problem. Verovatno znas da u niz prebacis sva potrebna polja iz jedne ili vise tabela access baze. Onda iz VB-a iskopiraj praznu i prethodno uredjenu excel tabelu u folder gde to treba da bude:
FileCopy odakle, gde ' stavis puno ime prazne excel tabele
primer: FileCopy "c:\arhiva\radna.xls","c:\radna.xls",
' definises excel objekat
dim Exl As New Excel.Application
'otvoris excel tabelu
Exl.Workbooks.Open "c:\radna.xls",
Dim n as integer
With Exl.ActiveSheet
For n=0 to ...
Cells(n+5, 2) = Niz(n, 0) ' umesto slova kolona u excel tbl stavi brojeve
' ako smatras da ce omasis u kraju petlje stavi IF Niz(n,0)="" then Exit For
next n
' ili idi sa Do petljom
do While Niz(n,0)<>""
Cells(n+5, 2) = Niz(n, 0) ' n - se odnosi na red.br. prikaza
Cells(n+5, 3) = Niz(n, 1)
...
n=n+1
loop
end With
Exl.ActiveWorkbook.PrintOut
Exl.ActiveWorkbook.Close SaveChanges:=True

Ako ti excel tabela ima vise strana onda u njoj definisi zaglavlje koje se ponavlja. E sad tu ide problem kako da se u hederu numerisu strane u tabeli koja ima svoj border ako unapred otvoris, primer, 10 mogucih strana. Problem je relativno lako resiv kroz brisanje viska i tada sve bude lepo i pregledno. Aj sad malo pomuci se da ne bi bas sve bilo za dz tj. bez znoja. Mozda nadjes i neko bolje resenje pa da mi uzvratis poruku Zagrljaj

Ko je trenutno na forumu
 

Ukupno su 399 korisnika na forumu :: 13 registrovanih, 1 sakriven i 385 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: amaterSRB, Areal84, cenejac111, Djole, goxin, jaeger, Kibice, MB120mm, piton, sasa76, vlvl, W123, wizzardone