Predmet:Maksimalan broj ponavljanja vrijednosti
Hehe ti si uvijek znao naci dobro pitanje:
Evo ovako:
Pretpostavimo da imas u A koloni imena
U B1 Kolonu Napisi sledece:
=COUNTIF(A:A;A:A)
Sada ovo kopiraj opcijom vuci u sve kolone B redove dokle imas zapisa u a koloni.
U C1 Koloni napisi sledece:
=ImeP(A:A;B:B)
Ovu proceduru ces kopirati u modul VB-a u exelu:
Ides:
Tools--->Macro--->Visual basic editor.
Kada se otvori Vb druga ikonica sa lijeva ti je insert moduule.
PreuzmiIzvorni kôd (Visual Basic):Function ImeP(KolonaImena As Range, KolonaKount As Range) As String
Dim Polje As Object
Dim Skupina As Range
Dim X As Integer
Dim MaksV As Integer
Dim Adresa As String
Set Skupina = KolonaKount
For Each Polje In Skupina.Cells
X = Polje.Value
If X > MaksV Then
Adresa = KolonaImena.Column & "," & Polje.Row
MaksV = X
ImeP = KolonaImena(Adresa) & ":" & MaksV
End If
Next Polje
End Function
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.