Dansk Regneark Forum
  Hjælp Hjælp  Søg i forum   Arrangementer   Opret ny bruger Opret ny bruger  Log ind Log ind


Emne lukketTælle unikke tal i segmenter af 15 tal

 Besvar Besvar
Forfatter
HK Se dropdown
Sølv bruger
Sølv bruger


Medlem: 25.Nov.2010
Land: Danmark
Status: Offline
Point: 860
Direkte link til dette indlæg Emne: Tælle unikke tal i segmenter af 15 tal
    Sendt: 05.Jul.2011 kl. 11:48

Jeg bruger af princip aldrig VBA til opgaver der kan klares ved hjælp af formler. Hvis det skal være en VBA-løsning, så glem det følgende, ellers prøv:

Formler (på båndet), Navnestyring, Nyt.
I feltet Navn skriver du "myref" (uden anførselstegn)
I feltet Refererer til indsætter du formlen:
 
=INDIREKTE("A"&1+ (RÆKKE()-1)*15 & ":" & "A" &15+(RÆKKE()-1)*15)
 
I B1 indtaster du formlen:
 
=SUMPRODUKT((myref<>"")/TÆL.HVIS(myref;myref&"")) 
 
Formlen kopieres nedad. 
 
Hans
Til top



Til top
Balto Se dropdown
Forum Begynder
Forum Begynder


Medlem: 22.Jun.2011
Land: Danmark
Status: Offline
Point: 9
Direkte link til dette indlæg Sendt: 05.Jul.2011 kl. 08:55
Hej Hans,
 
Tak for hjælpen, og tak for tilliden, men jeg er dog desværre ikke dygtig nok til at tilpasse. Problemet er, at det ikke er en formel men en funktion i VBA, der tæller unikke tal. Den ser således ud:
 
Function Tael_Unikke(ByVal Omraade As Range) As Long
Set Omraade = Intersect(Omraade, Omraade.Parent.UsedRange)
vaerdi = "'" & Omraade.Parent.Name & "'!" & Omraade.Address(False, False)
Tael_Unikke = Evaluate("SUM(IF(LEN(" & vaerdi & "),1/COUNTIF(" & vaerdi & "," & vaerdi & ")))")
End Function
 
"Omraade" er defineret andetsteds.
 
Har du et forslag til, hvordan jeg får det til at lykkes?
 
På forhånd mange tak.
Til top
HK Se dropdown
Sølv bruger
Sølv bruger


Medlem: 25.Nov.2010
Land: Danmark
Status: Offline
Point: 860
Direkte link til dette indlæg Sendt: 05.Jul.2011 kl. 07:39
Hvis du har dine data fra A1 og nedefter kan følgende måske være til inspiration:
 
I B1 indtastes: =("A"&1+ (RÆKKE()-1)*15 & ":" & "A" &15+(RÆKKE()-1)*15). Formlen kopieres nedad. Du skulle herefter se følgende i B1, B2, B3 osv.:
 
A1:A15
A16:A30
A31:A45
 
Lad os sige at du for eksempel ønsker at summere 15 tal ad gangen, altså =SUM(A1:A15), =SUM(A16:A30) osv. Det kan du gøre med formlen:
=SUM(INDIREKTE("A"&1+ (RÆKKE()-1)*15 & ":" & "A" &15+(RÆKKE()-1)*15))
Hvis formlen kopieres én række ned vil den summere A16:A30 osv.
Mon ikke du herefter selv er i stand til at tilpasse din "Tæl-unikke-formel"?
 
Hans 
Til top
Balto Se dropdown
Forum Begynder
Forum Begynder


Medlem: 22.Jun.2011
Land: Danmark
Status: Offline
Point: 9
Direkte link til dette indlæg Sendt: 04.Jul.2011 kl. 16:04
Hej,
 
Jeg har en kollonne med 20.000 tal. Jeg ønsker at analysere 15 tal ad gangen fra toppen af talrækken. Dvs. de første 15 tal, de næste 15 tal etc. Excel skal tælle antallet af unikke tal ud af de 15 og returnere værdien. Der skal således returneres 1.333 tal (20.000/15). Disse tal kan blot listes i kollonnen ved siden af kolonnen med de 20.000 tal.
 
Unikke tal = Tal der fremkommer mindst 1 gang ud af de 15 tal.
 
Jeg har allerede tidligere fået koden til at tælle unikke tal i et givet område fra Allan, men jeg mangler hjælp til resten. Excel skal jo ændre området, der tælles i, løbende.
 
Håber I kan hælpe.
 
på forhånd mange tak!
 
Mvh.
Thomas
Til top
 Besvar Besvar

Skift forum Forum tilladelser Se dropdown

© 2010 - 2024 Dansk Regneark Forum - en del af Excel-regneark.dk