Funkcia v exceli

Všetko o programoch, problémoch...
POZOR: žiadny WAREZ
Používateľov profilový obrázok
xsi69
Pokročilý používateľ
Pokročilý používateľ
Príspevky: 3601
Dátum registrácie: Pi 07. Apr, 2006, 02:00
Bydlisko: Bratislava

Funkcia v exceli

Príspevok od používateľa xsi69 »

Zdravím

Potrebujem poradiť , že ktorá funkcia mi v tabuľke vie nájsť konkrétny znak a vrátiť mi informáciu o jeho počte .
Konkrétne mám v stĺpiku :
"1,2,3,4,5,6" potrebujem aby mi našlo napr "6" a vrátilo hodnotu jeho počtu do iného pola , čiže "1"
Klasický search mi nájde hodnotu "6" len tam kde je v stĺpiku len hodnota "6" a nie "1,2,3,4,5,6" (v tomto prípade nenájde) .
Lookup mi tiež nejde tak ako by som si predstavoval .

Vďaka
:bye:
Spoiler: ukázať
PC:
CPU/Cooler: i5-4670K 3,4ghz@4,7Ghz 1,4V + Alpenföhn Brocken 2+XF140
MB: Asrock Z87M-Extreme4
RAM: 2x8gb Crucial Ballistix tactical@2133mhz 10-9-10-24 T1 1,4V
GPU: 1070ti Asus Turboblower
NVME: 512gb VPN100
SSD1: Samsung 860 qvo 512gb
SSD2: Samsung 840 EVO 250gb
SSD3: Hikvision C100 1TB (hot_backup)
HDD: 2x WD RED 3TB RAID 1 v silentmaxxoch (cold_backup)
PSU: Superflower Golden King 550w 80+platinum
CASE: Fractal Arc Mini
LCD: AOC Q3279VWF
Audio: Xonar DX , Microlab B77+solo6c , Fiio X3 64gb , Sony MDR-1R
OS: Win 10
Cooling: 4x120mm fractal silent@350rpm, cryorig XF140@ 400rpm, Enermax tb silence@ 300rpm, SS he01 140x38mm fan @ 400rpm

NB_Personal: HP elitebook 830 G5
CPU: i7 8650u
RAM: 32gb
GPU: Intel 620
SSD: 1tb nvme
LCD: fHD sureview 120hz
LTE: áno

NB_Work: HP elitebook 840 G5
CPU: i7 8650u
RAM: 32gb
GPU: Intel 620
SSD: 512gb nvme
LCD: fHD
LTE: áno


Phone: Xiaomi mi8 128gb weekly rom
macejd
Nový používateľ
Nový používateľ
Príspevky: 174
Dátum registrácie: So 06. Jún, 2009, 20:20
Bydlisko: Žilina

Re: Funkcia v exceli

Príspevok od používateľa macejd »

=COUNTIF(A1:A6;6)
macejd
Nový používateľ
Nový používateľ
Príspevky: 174
Dátum registrácie: So 06. Jún, 2009, 20:20
Bydlisko: Žilina

Re: Funkcia v exceli

Príspevok od používateľa macejd »

Alebo som asi zle pochopil. Má to byť niečo ako, že je v jednej bunke 1,2,3,6,4,6 a má to vrátiť pre hodnotu 2?
Potom by mohla fungovať nejaká takáto vlastná funkcia:

Kód: Vybrať všetko

Function CountText(TextToSearch, Bunka) As Long
On Error GoTo Errhandler

    Dim Position, WordCount As Long
    Dim T, S As String
    T = TextToSearch.Text
    S = Bunka.Text
    Position = Application.WorksheetFunction.Search(T, S)
    WordCount = 0
    While Position > 0
        WordCount = WordCount + 1
        S = Right(S, Len(S) - Position - 1)
            If Application.WorksheetFunction.Search(T, S) > 0 Then
             Position = Application.WorksheetFunction.Search(T, S)
            Else
             Position = 0
            End If
        
    Wend
Errhandler:
Position = 0

CountText = WordCount
End Function
Teda napr. bunka A1=1,2,3,6,4,6, bunka A2=6, potom =CountText(A2, A1) dá 2
Používateľov profilový obrázok
xsi69
Pokročilý používateľ
Pokročilý používateľ
Príspevky: 3601
Dátum registrácie: Pi 07. Apr, 2006, 02:00
Bydlisko: Bratislava

Re: Funkcia v exceli

Príspevok od používateľa xsi69 »

Countif nefungoval korektne , vracal nezmyselné hodnoty . Rovnako ako search .

Tú funkciu od teba som skúšal ale bohužiaľ neúspešne .
Vždy som dostal len error po zadaní kritérií .
Klobúk dolu , toto by som nevytvoril :-)
Ďakujem .

Keďže sa jedná o jednorázovku tak som to vyriešil svojsky :-)
Celý stĺpec som si označil , otvoril filter a do vyhľadávacieho poľa som zadal číslo ktoré som potreboval .
Označilo všetky možné kombinácie kde sa nachádzalo .
Dal som OK a v pravom dolnom rohu mi už excel zobrazil počet buniek ktoré spĺňajú zadané kritériá .

Všetko som stihol do 7:30 odovzdať .

Ďakujem
Spoiler: ukázať
PC:
CPU/Cooler: i5-4670K 3,4ghz@4,7Ghz 1,4V + Alpenföhn Brocken 2+XF140
MB: Asrock Z87M-Extreme4
RAM: 2x8gb Crucial Ballistix tactical@2133mhz 10-9-10-24 T1 1,4V
GPU: 1070ti Asus Turboblower
NVME: 512gb VPN100
SSD1: Samsung 860 qvo 512gb
SSD2: Samsung 840 EVO 250gb
SSD3: Hikvision C100 1TB (hot_backup)
HDD: 2x WD RED 3TB RAID 1 v silentmaxxoch (cold_backup)
PSU: Superflower Golden King 550w 80+platinum
CASE: Fractal Arc Mini
LCD: AOC Q3279VWF
Audio: Xonar DX , Microlab B77+solo6c , Fiio X3 64gb , Sony MDR-1R
OS: Win 10
Cooling: 4x120mm fractal silent@350rpm, cryorig XF140@ 400rpm, Enermax tb silence@ 300rpm, SS he01 140x38mm fan @ 400rpm

NB_Personal: HP elitebook 830 G5
CPU: i7 8650u
RAM: 32gb
GPU: Intel 620
SSD: 1tb nvme
LCD: fHD sureview 120hz
LTE: áno

NB_Work: HP elitebook 840 G5
CPU: i7 8650u
RAM: 32gb
GPU: Intel 620
SSD: 512gb nvme
LCD: fHD
LTE: áno


Phone: Xiaomi mi8 128gb weekly rom

Návrat na "Programy a problémy s nimi"