< návrat zpět

MS Excel


Téma: nevím jak opravit chybu u funkce SVYHLEDAT rss

Zaslal/a 20.9.2017 22:50

Dobrý den,
mám tabulku, ve které chci v poli kapitán domácích a i kapitán hostů, aby se mi přeneslo jmméno ze seznamu pod tabulkou u kterého je písmeno "C". Ale když zadám funkci SVYHLEDAT podle návodu zde, tak mi to vyhdnotí chybu. 1.hodnota a nebo 2. není k dispozici. Dále prosím o radu ještě se dvěma věcmi v tabulce(formuláři). 1. u tabulky 95+ mám u každého řádku čísla a chtěl bych, když na to kliknu se v políčku u čísla udělal krížek a číslo zůstalo pod ním, pokud to jde. 2. aby u tabulky stav se mi počítal výsledek. Když zadám v tabulce výsledek legy 2:1 nebo 2:0 započítal 1 bod na straně kde je 2 a kde je 1 nebo 0 zůstala nula. s tím aby se to pak na dalším řádku sečetlo nebo byl rovno. Předem děkuji za pomoc.

Příloha: xlsx37691_zapis-vzor.xlsx (57kB, staženo 2x)
Zaslat odpověď >

#037692
avatar
ps: doplnění tabulky o to jak by to mělo vypadat ve výsledku v bodě 2. Ještě jestli by se dalo udělat aby mi to dole ukázalo průběžný výsledek. předem děkuji za rady a pomoc
Příloha: xlsx37692_zapis-vzor.xlsx (57kB, staženo 3x)
citovat
#037693
avatar
Dd,
zkuste. Pokud vyhovuje, zkopirujte si vzorce pro stavy/skore. Krizkovani je makrem.
Příloha: zip37693_37692_zapis-vzor_macro.zip (66kB, staženo 7x)
citovat
#037694
avatar
Pr.

EDIT: Aha, tak neskoro :) Takmer to isté :) Dobrý nápad s označením inej bunky, aby bolo možné odkrížikovať práve zakrížikovanú.
Příloha: zip37694_zapis-vzor2.zip (57kB, staženo 6x)
citovat
#037700
avatar
děkuji moc za pomoc super. sám bych na to nepřišel.citovat
#037702
avatar
A viete čo by možno stálo za skúšku ? Nepoužiť Worksheet_SelectionChange ale namiesto nej Worksheet_BeforeRightClick. Výhody by to malo 2:
1. Väčšinou sa prekliknete omylom ľavým tlačítkom, nie pravým.
2. Ostane Vám kurzor na danej bunke.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Dim Bunka As Range
If Target.Cells.Count = 1 Then
Set Bunka = Intersect(Target, Range("N14:AA15,N17:AA18,N20:AA21,N23:AA24,N27:AA28,N30:AA31,N33:AA34,N36:AA37,N42:AA43,N45:AA46,N48:AA49,N51:AA52,N55:AA56,N58:AA59,N61:AA62,N64:AA65"))
If Not Bunka Is Nothing Then
With Bunka.Borders(xlDiagonalDown)
.LineStyle = IIf(.LineStyle = xlContinuous, xlNone, xlContinuous)
End With
With Bunka.Borders(xlDiagonalUp)
.LineStyle = IIf(.LineStyle = xlContinuous, xlNone, xlContinuous)
End With
Cancel = True
End If
End If
End Sub

Len je tam doplnený ten 1 riadok
Cancel = True

EDIT: Malá úprava na žiadosť v prílohe.citovat
#037731
avatar
zde posílám novou tabulku, kde bych to křížkování potřeboval rošířit po celé tabulce, kde jsou ty čísla. děkuji
Příloha: xlsx37731_zapis-sipky-new.xlsx (85kB, staženo 3x)
citovat
#037732
avatar
Pozerám, že včera mi to nezožralo prílohu. Takže tu je aj tá N:AI aj tá N:AR, zmena v jedinom písmenku.

PS: Ešte ak chcete si vyskúšajte normálne cez formát bunky, aká Vám bude najviac vyhovovať hrúbka čiary a farba čiary. A Dajte vedieť.
Příloha: zip37732_zapis-vzor2.zip (195kB, staženo 7x)
citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura III

Oblíbený formulář Faktura byl vylepšen a rozšířen. Formulář faktura III
Více se dočtete zde.

Aktivní diskuse

Odkaz na jiný soubor bez makra

rotri • 24.10. 10:15

Nestandardní využití numerické klávesnice

Vovka • 24.10. 10:09

Excel 2016 - otravné zobrazení

elninoslov • 24.10. 7:59

Excel 2016 - otravné zobrazení

Ambra006 • 23.10. 22:02

Číselnè kombinace

Vovka • 23.10. 14:21

Kurník šopa, pojďte na pivo :-)

eLCHa • 23.10. 12:01

Kurník šopa, pojďte na pivo :-)

eLCHa • 23.10. 12:00