Příspěvky uživatele


< návrat zpět

r13 napsal/a:

Prípadne pre "negatív" :
=MOD(SUBTOTAL(103;NEPŘÍMÝ.ODKAZ("B2:B"&ŘÁDEK()));2)


Super, děkuju 1

eLCHa napsal/a:

Nejjednodušší řešení je tabulka, jak píše r13. Pokud to chcete provést podmíněným formátováním, lze to - musíte použít funkci SUBTOTAL nebo AGGREGATE.


Zkusím to přes tu tabulku, ale pro zajímavost, jak by měl vzorec vypadat? Které hodnoty bych měla zadat při použití SUBTOTAL nebo AGGREGATE?

Zadám toto '=MOD(ŘÁDEK();2)' a pokračuji '&AGGREGATE(???;5;$A$2:$D$8)'?

Dobrý den,
nevím jestli to vůbec jde, ale chci mít barevně označené řádky kromě těch skrytých. Samozřejmě, když je zobrazím, aby se mi zase barevně označily.

Pro barevné rozlišení jsem použila podmíněné formátování pomocí vzorce '=MOD(ŘÁDEK();2)'

Ale ve chvíli kdy skryju řádek, tak mám nad sebou dva stejně barevné řádky.

Předem děkuji za pomoc.

veny napsal/a:

do buňky B1 si dejte vzorec
=ČÁST($A1;SLOUPCE($A$1:A$1);1)
a potáhněte doprava a případně dolů,
jen dát pozor na velikost oblasti podle nejdelšího slova(čísla)


Také děkuji 1

pavelo napsal/a:

Dobrý den,
vyhovovalo by přiložené jednoduché řešení?Příloha: 51028_51026_rozlozeni-slov-a-cisel-bez-oddelovace-do-bunek.xlsx (10kB, staženo 2x)


Děkuji 1

Teď jsem zkusila vzoreček =ČÁST($A1;1;1) ale aby se mi v další buňce objevilo další písmenko nebo číslo, tak do ní musím vzoreček vepsat ve tvaru =ČÁST($A1;2;1) atd. Šlo by to nějak zautomatizovat, abych nemusela v každé buňce měnit start?

Dobrý den,
jak by měl prosím vypadat vzoreček na rozdělení slova či čísla do samostatných buněk?
Viz přiložený soubor s příkladem, jak bych si to představovala.
Děkuji 1

summer85 napsal/a:

Jiří497 napsal/a:ActiveCell.Comment.Text Text:=Left(ActiveCell.Comment.Text, 3) nebo ActiveCell.Comment.Text Text:=Replace(ActiveCell.Comment.Text, "f", "7")

Super, moc děkuju
Zatím se mi podařilo rozchodit to první makro, s dalšími se zkusím poprat.


Ještě prosím jak makro uplatním na vybrané komentáře - např. mám je v buňkách A1:A20, ale pokaždé mi to změní jen na té buňce kterou označím první.

Jiří497 napsal/a:

ActiveCell.Comment.Text Text:=Left(ActiveCell.Comment.Text, 3) nebo ActiveCell.Comment.Text Text:=Replace(ActiveCell.Comment.Text, "f", "7")


Super, moc děkuju 1
Zatím se mi podařilo rozchodit to první makro, s dalšími se zkusím poprat.

Jiří497 napsal/a:

Třeba takto. Výsledky zapisuje do buňky.
Jinak mrkněte třeba sem: https://office.lasakovi.com/excel/vba-funkce-vzorce/Textove-funkce-ve-VBA-Excel/

[hr]Sub koment()

Range("B1").Value = Range("A1").Comment.Text
'1.
Range("B2").Value = Left(Range("A1").Comment.Text, 3)
'2.
Range("B3").Value = Replace(Range("A1").Comment.Text, "def", "")

'3.
Text = Range("A1").Comment.Text
Range("B4").Value = Left(Text, InStr(1, Text, "(") - 1) & Right(Text, Len(Text) - InStr(1, Text, ")"))

'4.
Range("B5").Value = Replace(Range("A1").Comment.Text, "f", "7")
End SubPříloha: 50725_text.zip (14kB, staženo 1x)


Děkuji, ale chtěla bych, aby se výsledek zapsal do komentáře... respektive, aby se v něm projevily změny.

Dokážu napsat makro na přepsání textu v komentáři, ale tohle se mi nedaří zapsat.

Makro na přepsání textu v komentáři:

Sub prepis_komentar()
'přepíše text v komentáři na text A+B

If ActiveCell.Comment Is Nothing Then

Else
ActiveCell.Comment.Text Text:="A+B"
End If
End Sub

Děkuji za odkaz, ale ještě se mi tam nepodařilo najít, jak to aplikovat na komentář, vše je zatím řešeno v buňkách.

Palooo napsal/a:

to znie ako domaca uloha :)


Úkol to není, do školy nechodím už spoustu let 5
Jen mám ráda Excel a snažím se naučit VBA, ale tohle se mi nedaří vydedukovat 1

Dobrý den,
prosím o radu jak zapsat ve VBA příkaz pro smazání nebo nahrazení části textu ve všech komentářích.

Potřebuji napsat toto:

1. po určitém počtu znaků vše ostatní smazat (např. ABCDEFG - smazat vše od D, takže nechat jen první tři znaky)

2. smazat určitý text (např. ABCDEFG - smazat DEF)

3. smazat text ohraničený závorkou (např. AB(CD)EFG - smazat (CD) včetně závorky)

4. nahradit určitý text jiným (např. ABCDEFG - nahradit F číslem 7, ale F není ve všech komentářích na stejném místě)


Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

Která Ip otevřela sešit

Barth • 23.9. 12:27

Která Ip otevřela sešit

Barth • 23.9. 10:15

Která Ip otevřela sešit

Barth • 23.9. 9:48

Která Ip otevřela sešit

Scraper • 22.9. 12:47

Vyhledat s vícenásobných porovnáním

maxovo • 22.9. 11:29

spustit makro změnou hodnoty v buňce a svyhledat

Stalker • 21.9. 20:36

spustit makro změnou hodnoty v buňce a svyhledat

elninoslov • 21.9. 19:01