Kako povezati dve tabele [Excel]

Odgovori Nova tema

2 odgovora
6.095 pregleda

Kako povezati dve tabele [Excel] 12.02.2009. u 14:11 · pre 215 meseci #1

Ovako narode, treba mi mala pomoc ali ne znam koliko cu moci ovako da objasnim...imam dve tabele u excelu (Visaul basic) i sad posto nazivi u te dve tabele se razlikuju a predstavljaju istu stvar, treba da iz jedne tabele naziv komponennte npr. "V metarski prekidac" (koji u stavri predstavlja i stu stvar kao "tropolni prekidac 16A") poredi sa nazivima iz druge tabele i da kad nadje odgovarajuci naziv ("tropolni prekidac 16A"), i da iz kolone kolicina (koja se nalazi u prvoj tabeli, gde i naziv "V metarski prekidac") pokupi vrednost (kolicinu) i upise u kolonu kolicina (ali sad je kolicina u drugoj tabeli, gde se nalzai naziv 'tropolni prekidac")...
Ja sam mislio da ovo resim preko dva niza, ali cu morati da napunim niz vrednostima (nazivima) komponenti iz obe tabele i da pomocu sledece petlje:

CODE:

FOR (i=1, i<100,i++)
Begin
FOR( j=1,j<100,j++)
begin
IF(J == C[j])
then
D(i)=I(j);
end
end

ne znam bas kako se pise u Visaul basicu, ali to cu lako resiti...C,J,D i I su kolone iz tabele...e sad mislim da ovo nece raditi jer nazivi nizu jednaki ('V metarska preklopka' != 'tropolni prekidac 16A') iako predstavljau istu stvar...pa ne znam kako da resim....ako neko zna laksi, tezi ili dopunjeni nacin ove petlje i ako je shvatio sta mi treba bio bih mu zahvalan na bilo kakvoj pomoci :) !!!!

p.s. uz J bi trebalo da stoji J, ali mi se to iz nekog razloga ne vidi

Unapred hvala!
Potpis
jmix

jmix23

Jankovic Miljan

69 poruka

Profil

Više o autoru

Priboj

Database - Programer

Član broj: 175500

82.117.198.*

Re: Kako povezati dve tabele [Excel] 12.02.2009. u 16:05 · pre 215 meseci #2

Kako da pozovem polje iz excela unutar funkcije i moze li to uopste???

Napravio sam ovu funkciju :

CODE

Function Kolicina(id As Integer)
Dim k As Integer
Dim m As Integer

For k = 5 To i < 150 Step 1
For m = 1 To j < 150 Step 1
If i(k) = C(m) Then
E(m) = j(k)
End If
Next m
Next k

End Function

p.s. ovo I(k),C(m),E(m),J(k) bi trebalo da su polja u excel tabeli, ali ne znam d li moze ovo ovako da se napravi jer mi prijavljuje gresku.... kaze kao da ocekuje niz...sto bi i bilo logicno, ali ne znam kako to da resim
Potpis
jmix

Jpeca

Moderator

Predrag Jovanović

2.290 poruka +112

Profil

Više o autoru

Pančevo

poslovni analitičar
Gowi

Član broj: 25683

194.106.167.*

Sajt: www.gowi.rs

Re: Kako povezati dve tabele [Excel] 14.02.2009. u 21:37 · pre 215 meseci #3

Ima puno primera i na ovom forumu i na netu pa si dosad verovatno već nešto video, ali evo u ovoj temi http://www.elitesecurity.org/t...atizacija-kopiranje-tabeleovde možeš naći objašnjenje osnovnih načina pristupanju ćeliji iz koda.
U funkciji možeš kao parametar zadati Range (to je uobičajeno u Excelu) i onda pristupati ćeliji po ćeliji iz opsega koristeći For each ... Next petlju ili svojstvo Cells opsega.

Code:

Function Primer(r As Range, sifra As String) As Boolean
'
' Primer funkcije u Excel VBA
' Ispituje da li u opsegu ima ćelija sa tekstom sifra
'
Dim cl
Primer = False
For Each cl In r
    If cl.Value = sifra Then
         Primer = True
         Exit For
    End If
Next cl
End Function

Inace tvoju funkciju uopste nisam razumeo - funkcija obično vraća neku vrednost, a i parametar id nigde ne koristiš u funkciji.
Potpis
Nije to loše Rembrante, samo što ne bi dodao još malo boje?

Odgovori

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Srodne teme

Premeštanje teme

Forum kao aplikacija na telefonu

Srodne teme