Michał Dyduła

Michał Dyduła Specjalista /
Asystent Kierownika
Kontraktu, PKP
Polskie ...

Temat: ile razy dana cyfra występuje w liczbie z zakresu...

Witam,
problem: potrzebuję wyliczyć ile razy dana cyfra np 7 występuje w liczbie z zakresu od 8 do 121 w celu zamówienia szablonów do oznaczeń pól składowych. Zakresy są różne a wyliczyć trzeba ilość dla każdej cyfry od 0 do 9.
Da się to jakoś zgrabnie w excelu zrobić?
Piotr Majewski

Piotr Majewski Senior Service
Manager, S&T
Services Polska

Temat: ile razy dana cyfra występuje w liczbie z zakresu...

zakładając że w B2 jest szukana cyfra a w B3 liczba z dowolnego zakresu

zliczysz wystąpienia cyfry formułą

=DŁ(B3)-DŁ(PODSTAW(B3;B2;""))
Michał Dyduła

Michał Dyduła Specjalista /
Asystent Kierownika
Kontraktu, PKP
Polskie ...

Temat: ile razy dana cyfra występuje w liczbie z zakresu...

w ten sposób zliczę wystąpienia cyfr w danej liczbie, ja natomiast muszę zliczyć ile razy cyfra 1 zawiera się w przedziale liczb od 1 do 20 (czyli 1; 11; 12; 13; 14; 15; 16; 17; 18; 19; czyli 1 występuje 11 razy w tym przedziale)
Piotr Majewski

Piotr Majewski Senior Service
Manager, S&T
Services Polska

Temat: ile razy dana cyfra występuje w liczbie z zakresu...

to ja bym napisał makro albo pewnie z lenistwa użył tej formuły to wyżej żeby na zakładce wypisać sobie liczby od A do B i obok zliczyć czy znajduje się tam moja szukana cyfra i zsumować...
Michał Dyduła

Michał Dyduła Specjalista /
Asystent Kierownika
Kontraktu, PKP
Polskie ...

Temat: ile razy dana cyfra występuje w liczbie z zakresu...

chyba tak właśnie zrobię - rozwiązanie na już, a makro swoją drogą w wolnej chwili, bo się przyda.
Dzięki.
Jacek U.

Jacek U. Kierownik Projektu
(planowanie i
analizy), Polkomtel

Temat: ile razy dana cyfra występuje w liczbie z zakresu...

A1 - dolna granica
B1 - górna granica
C1 - szukana cyfra

formuła (tablicowa, czyli w komórce F2 a potem shft+ctrl+enter), u mnie w E1, ale nie ma znaczenia

=SUMA.ILOCZYNÓW(--(WIERSZ(A:A)>=A1);--(WIERSZ(A:A)<=B1);--(DŁ(WIERSZ(A:A))-DŁ(PODSTAW(WIERSZ(A:A);C1;""))))

PS
przy założeniu, że A1 większe od 0 a B2 mniejsze od liczby wierszy w Excelu - u mnie milion z kawałkiemTen post został edytowany przez Autora dnia 19.11.13 o godzinie 20:49
Marzanna Szulta

Marzanna Szulta właściciel, Usługi
Informatyczne
SZULTASET

Temat: ile razy dana cyfra występuje w liczbie z zakresu...

To ja do kompletu dołożę funkcję użytkownika:

Public Function PoliczCyfry(LiczbaOd, LiczbaDo, Cyfra)
Dim i As Long
Dim Ile As Long
Dim Ciag As String
Dim k As Integer

Ile = 0
For i = LiczbaOd To LiczbaDo
Ciag = CStr(i)
k = 1
While k > 0
k = InStr(k, Ciag, Cyfra, 1)
If k > 0 Then
Ile = Ile + 1
If k < Len(Ciag) Then k = k + 1 Else k = 0
End If
Wend
Next i
PoliczCyfry = Ile
End Function

Temat: ile razy dana cyfra występuje w liczbie z zakresu...

:D
Public Function PoliczCyfry2(LiczbaOd, LiczbaDo, Cyfra)

Dim i As Long
Dim y
Dim tbl() As Byte

For i = LiczbaOd To LiczbaDo
tbl = CStr(i)
For Each y In tbl
PoliczCyfry2 = PoliczCyfry2 + ((y = Asc(Cyfra)) * -1)
Next
Next

End Function
Ten post został edytowany przez Autora dnia 20.11.13 o godzinie 11:20
Michał Dyduła

Michał Dyduła Specjalista /
Asystent Kierownika
Kontraktu, PKP
Polskie ...

Temat: ile razy dana cyfra występuje w liczbie z zakresu...

Super. Dziekuje za pomoc.



Wyślij zaproszenie do