AL napsal/a:
.Characters(Start:=1, Length:=Len(ActiveCell)).Font.FontStyle = "Bold"
.Characters(Start:=InStr(1, ActiveCell, "až"), Length:=2).Font.FontStyle = "Italic"
Tučné a kurzíva mi nefungovalo, ale je možné že na CZ/SK exceloch funguje
Skús toto makro
Sub Makro1()
ActiveCell.FormulaR1C1 = _
"=TEXT(R1C1/R2C1,""0,00"") & "" až "" & TEXT(R1C2/R2C2,""0,00"")"
ActiveCell = ActiveCell
With ActiveCell
.Characters(Start:=1, Length:=Len(ActiveCell)).Font.FontStyle = "Tučné"
.Characters(Start:=InStr(1, ActiveCell, "až"), Length:=2).Font.FontStyle = "kurzíva"
End With
End Sub
Skús funkciu MATCH česky POZVYHLEDAT. Teda ak je zoznam zoradený od najmenšieho po najväčšie.
kp57 napsal/a:
Ahoj! V tomto případě bez ohledu na logiku musí vzorec vrátit chybu "Cyklický odkaz". Nějak jsem to tu nikde nezaregistroval.
do stlpca A si vlož vzorec a skopíruj až dole. Stlpec A môžeš skryť
A spusti makro FILTRUJ
Na zrušenie filtra spusti makro ZRUS
@AL
máš pravdu.
Ale kde som písal, že sa mi ten vzorec páči?
Tiež som nechcel uraziť.
mikkinachtik napsal/a:
Díky moc, perfektní.
Cells(2,1) & Cells(2,2)
Ja keď potrebujem mať v F2 nejakú hodnotu, tak ju tam proste napíšen. Tu je to akosi naopak. Ak v F2 nie je nič, tak tam chce hodnotu. A ak v F2 je nejaká hodnota, tak to chce mať prázdne.Trochu zvláštna logika.
AL napsal/a:
No, hlavne, to čo máš, nie je vzorec, ale, ako by som sa slušne vyjadril, aby som neurazil
Čo je to VYSELEKTOVAL?
Ako má vyzerať výsledok?
A nemalo by to byť takto? Duplicitné hodnoty predsa nie sú jedinečné.
=SUM((COUNTIF(data; ""&data)=1)*1)
taktiež maticovo.
bloom napsal/a:
Díky za pomoc, sice to bohužel nefunguje (stále to jde vepsat). Ale pokusím se s to nějak obhájit bez toho. ;)
archangel napsal/a:
pro jiné může být zajímavější diskutovat o horním indexu
archangel napsal/a:
všichni jste se soustředili na POZADÍ , ale to byl jen příklad pro zjednodušení
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.