[ daniel38 @ 17.09.2008. 08:43 ] @
Naime radim jedan recnik i bitno mi je da mi se ne dupliraju unosi u koloni A na primer.

Znam da je to moguce preko funkcije IF......

Glasila bi ovako otprilike:
-Ako u koloni A postoji data rec
-Ispisati: Vec postoji

Problem mi je definisanje prvog dela finkcije

na forumu sam nasao ovo,al izbacuje da nije dobro definisana:
=IF(A2<>"";IF(MATCH(A2;A:A;0)=ROW(A2);"";"Postoji u redu_"&MATCH(A2;A:A;0));"")

Da napomenem samo da mi je bitno da se nedozvoli upis u celiju ukoliko je vec negde postoju u toj koloni taj tekst........inace bi koristio Conditional formating gde nakon unosa reci on obelezi duplirane ali dzaba mi to kad ima oko 200000 reci pa je tesko pretraziti obojene celije zbog tolikog broja istih


[Ovu poruku je menjao daniel38 dana 17.09.2008. u 10:27 GMT+1]
[ 3okc @ 17.09.2008. 10:32 ] @
Citat:
Da napomenem samo da mi je bitno da se nedozvoli upis u celiju

Ovo ćeš postići sa alatom Data / Validation.

Kao Validation criteria navedeš Custom i kucaš formulu - koju bi valjalo prethodno ispitati da nema grešaka.
[ daniel38 @ 17.09.2008. 12:10 ] @
Za moj slucaj je:
=COUNTIF($A:$A,A2)=1
posto mi je sve u A koloni..formula radi....jedino sto funkcionise ako kucam slovo po slovo....dok bi recimo ukoliko bi kopirao neku rec iz druge kolone u ovu...tada nebi primetio da vec postoji...jer fakticki tad ponistim Data Validation funkciju u toj celiji.....probao sam i da kopiram preko paste special...ali sta god izaberem ponisti funciju....

Verujem da je u mom slucaju ukoliko hocu da kopiram vec gotove celije u moju kolonu A jedino resenje VBA skripta za nadzor A kolone.....

Ako neko zna kako da je izradim nek kaze...trazio sam po netu i nisam nasao nigde...neko je postovao na forumu takvu skriptu ali neradi na mom Excel 2007

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim celija As Range
If Target.Row = 1 Then Exit Sub
For Each celija In Range("A1", "A" & Target.Row - 1)
If celija.Value = Target.Value Then
MsgBox "Ovu rec ste vec uneli u redu " & celija.Row
Exit For
End If
Next celija
End Sub

Kao takvu sam je kopirao i izbacuje error
[ Gix_ @ 17.09.2008. 18:24 ] @
Re,
verovatno nisi uradio nesto kako treba jer nema nikakvog problema sa ovom kodom.
ALT+F11 zatim dupli click na radni list za koji hoces da funkcionise makro, pogledaj na slici .
Ja licno bih to uradio preko forme ( USF) ali svako svoje principe.
Pozdrav