Samo određeni podaci iz excela u acces bazu!!!

Odgovori Nova tema

4 odgovora
2.955 pregleda

Samo određeni podaci iz excela u acces bazu!!! 24.04.2005. u 11:34 · pre 262 meseca #1

Imam riješen obračun plaća za više djelatnika u excelu putem radnih listova.
Probelem je sljedeći:
*Nakon obračuna ti podaci bi mi trebali ostati u bazi,pa bi mi trebao kod s kojim bi to (samo određene podatke (12 sa svakog lista)) prebacio iz .xls u access.I zapisao u za to predviđenu tablicu.
Kako da to izvedem ?Može li se to i ako tko može da me malo uputi u kojem smjeru da krenem.
Ovo bi mi uštedilo puno vremena jer ne moram u accesu radit obračun plaće!

Potpis

romano

Re: Samo određeni podaci iz excela u acces bazu!!! 24.04.2005. u 11:39 · pre 262 meseca #2

Pogledaj ovaj primer

Re: Samo određeni podaci iz excela u acces bazu!!! 25.04.2005. u 22:30 · pre 261 mesec #3

Nisam još uspio riješit problem.
Interesira me kako pomoću VBA u Excelu sakriti određeni red !
Recimo u koloni E nalazi se bruto i ako je e2=0 tada excel nebi trebao prikazat tu liniju.

Kako se iz accessa pozicionirati na točno traženi shet ;
Koristio sam ovu naredbu
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel8, "sheet3", "radna", , "A2:N3"

ali mi se uvijek pozicionira na prvi sheet.
Kako da to podesim i prilagodim svojim zahtjevima(meni recimo treba sheet3)!
Ako ima ko kakav primjer bio bi mu jako zahvalan tako da znam gdje kopat.

Potpis

romano

Re: Samo određeni podaci iz excela u acces bazu!!! 26.04.2005. u 14:30 · pre 261 mesec #4

Ova procedura sakriva kolonu E ako je E2=0 (ovo je Access forum

) )

Code:

Sub SakrijE()
If Cells(2, 5).Value = 0 Then
Columns("E:E").EntireColumn.Hidden = True
End If
End Sub

Što se kontrole Excela iz Accessa tiče to neće ići sa DoCmd komandom nego bi trebalo da koristiš Automation. U tom smislu sam postavio link kao ilustraciju kako se takve stvari rade. Ali sve dok ne znaš dobro ni Excelov object model, bespredmetno je.

Re: Samo određeni podaci iz excela u acces bazu!!! 26.04.2005. u 14:51 · pre 261 mesec #5

A da, red ne kolonu

Code:

Sub Sakrij2Red()
If Cells(2, 5).Value = 0 Then
Rows("2:2").EntireRow.Hidden = True
End If
End Sub

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme