< návrat zpět

MS Excel


Téma: kopie pouze změněného formátu rss

Zaslal/a 14.9.2021 7:23

Dobrý den, prosím o radu. Mám několik sešitů a v každém jsem barevně označil některé buňky (vždy list1). Např.: sešit_1 - označeno B1 a C3; sešit_2 - označeno D2:D18; sešit3 - označeno A6 a B6:B9; atd. sešitů je více a buněk v každém sešitu taky označeno více.
Nyní bych potřeboval v jiném sešitu na jednom listě vidět všechny označené buňky.
Zkoušel jsem přes kopírování formátu, ale tím vždy přepíšu předchozí stav a nepodařilo se mi dohledat jak tomuto zabránit (přes vložit jinak). Pracuji s office 2019. Děkuji.

Jméno
Kontrola
Text
  b i u s img code url hr   1 2 3 4 5 6 7 8 9 10

#051211
avatar
A to akože chceš vo výslednom hárku vidieť zjednotenie množín označených buniek jednotlivých hodnotených zošitov alebo nebodaj aj informáciu, v ktorom zo zošitov je daná bunka označená? Čo potom v prípade, ak je konkrétna bunka označená vo viacerých zošitoch?citovat
#051214
avatar
Informaci o zdroji (sešitu) nepotřebuji. V tomto případě mám buňky označeny všechny stejnou barvou. Pokud by tomu tak nebylo, pak by měla platit vždy ta barva z nejnovějšího souboru (sešit_3). Jde mi pouze o přenesení vybarvení buňky, zbytek obsahu není pro mě podstatný. Děkuji.citovat
#051219
avatar
Na inšpiráciu prikladám výpis makra, ktoré ti vyhodnotí prvé tri hárky a do štvrtého ti označí bunky, ktoré sú označené v prvých troch hárkoch (označenie = podfarbenie musí byť červenou farbou s indexom 255).
Pracuje v oblasti, ktorá je zjednotením tebou uvedených príkladov (A1:D20)
Ostatné (vyhodnocovanie zošitov a nie hárkov; farba podfarbenia; iný rozsah buniek) je už len nadstavba...
Makro:
Sub Oznacenie()
Application.ScreenUpdating = False
PocRiadkov = 20
PocStlpcov = 4
PocHarkov = 3

Range(Cells(1, 1), Cells(PocRiadkov, PocStlpcov)).Interior.Pattern = xlNone
For i = 1 To PocHarkov
For j = 1 To PocRiadkov
For k = 1 To PocStlpcov
If Sheets(i).Cells(j, k).Interior.Color = 255 Then Sheets(PocHarkov + 1).Cells(j, k).Interior.Color = 255
Next k
Next j
Next i
End Sub
citovat

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

Kumulace listů do jednoho listu

MonikaV • 24.9. 17:18

skenovani a vyhledavani a oznaceni v tabulce

djph • 24.9. 13:44

Sečíst sloupec od 4 řádku

madar5 • 23.9. 8:32

Ověření dat

lubo • 22.9. 11:25

Ověření dat

Baja • 21.9. 22:33

Ověření dat

elninoslov • 21.9. 22:16

Ověření dat

Baja • 21.9. 21:53