MS Excel

Dobrý den,

potýkám se s dvěma problémy, které se týkají podmíněného formátování. V příloze je velmi zjednodušený příklad - jedná se o dobu trvání montáže s uvedením pracovníka, který montáž provádí. Některé buňky mohou být sloučeny v případě, že montáž trvá déle než v hlavičce uvedený časový interval.

nyní k věci

1. v oblasti A1:F10 mám nastaveno podmíněné formátování. Uměl by někdo poradit, jak zajistit, aby po znovu rozdělení sloučených buněk podmíněné formátování fungovalo? Funguje totiž vždy jen u jedné rozdělené buňky (u ostatních buněk, které byly součástí sloučené buňky, bohužel ne). Například pokud v přiloženém souboru rozdělím sloučenou buňku obsahující jméno Petr, přijdu o podmíněné formátování u buněk D6 a E6.

2. v podmíněném formátování mám nastaveno i vnější ohraničení buněk kolem buněk. U jednotlivých (nesloučených) buněk to funguje bez problémů, ale u sloučených buněk je ohraničení neúplné (jen v levé části sloučené buňky).

Měl by někdo tip, jak oba uvedené případy zdárně vyřešit?

Děkuji moc

Miroslav

Zaslat odpověď >

Strana: « předchozí 1 2 3

Imh0tep(16.10.2019 20:00)#044665

Díky za váš čas pánové. Jak píše Zbygi, tak mi řešení od JoKe taky nefunguje. Zbygiho řešení funguje, ale našel jsem ještě jedno řešení, které funguje ještě lépe.

Není to bohužel z mé hlavy a upřímně řečeno, úplně do detailu tomu kódu nerozumím.

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range
Set rng = Range("A1:F10")
If Not Intersect(Target, rng) Is Nothing Then
With rng.FormatConditions
.Delete
.Add xlNoBlanksCondition
End With
With rng.FormatConditions(1)
.Borders.LineStyle = xlContinuous
With .Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.ThemeColor = xlThemeColorAccent3
.TintAndShade = 0.399975585192419
.PatternTintAndShade = 0
End With
End With
End If
End Subcitovat

Imh0tep(16.10.2019 20:30)#044666

Pomohl by mi to prosím někdo trochu ozřejmit?

rozumím tomu zhruba takhle:

-Jedná se o událostní proceduru, která se spouští při každé změně příslušného listu.

-Proměnné rng je přiřazeno pole A1:F10

- pokud neexistuje průnik mezi "Target" a rng, bude formátování smazáno (zde netuším, co je to target resp co obsahuje target... beru to logicky jako test, zda je označená buňka v uvedeném poli prázdná. Mohl by mi někdo blíže vysvětlit ten target (je to proměnná? jak se plní hodnotami? jak funguje?)

- rng.FormatConditions(1) ta jednička na konci v závorce funguje jako else k podmínce If (If Not Intersect(Target, rng) Is Nothing Then)? Jedná se jen o nějaký zjednodušený zápis?

díky moccitovat

marjankaj(16.10.2019 21:28)#044667

Imh0tep napsal/a:

Pomohl by mi to prosím někdo trochu ozřejmit?
díky moc

Takže ti to moc nefunguje.

Target=bunka alebo vyznačené bunky, ktoré sa menia. Zmena sa robí pomocou klávesnice- najčastejšie.
Ak je target mimo oblasť A1:F10, tak sa nič nedeje.

Inak nechápem, prečo sa tak babreš so zlúčenými bunkami. Excel je pôvodne určený na iné úlohy. Je to tabuľkový kalkulátor, slúži na výpočty a nie na podobné vymaľovánky.citovat

Strana: « předchozí 1 2 3

Téma: Podmíněné formátování sloučených/rozdělený buněk

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje