aktivace makra při změně označených buněk v daném rozsahu

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

ynka
nováček
Příspěvky: 1
Registrován: duben 20
Pohlaví: Žena
Stav:
Offline

aktivace makra při změně označených buněk v daném rozsahu

Příspěvekod ynka » 24 dub 2020 13:32

Ahoj.
Mám v Excelu udělaný roční kalendář, kde si vybarvuju žlutě buňky pro Dovolenou.
Udělala jsem funkci, které mi počítá, kolik podbarevných buněk v kalendáři mám (zeleně označený výsledek).

dovolená 2020.PNG



funkce vypadá takto:
Function Color_Cell_Count(ColorCell As Range; DataRange As Range)

Dim Data_Range As Range
Dim Cell_Color As Long

Cell_Color = ColorCell.Interior.ColorIndex

For Each Data_Range In DataRange

If Data_Range.Interior.ColorIndex = Cell_Color Then
Color_Cell_Count = Color_Cell_Count + 1
End If

Next Data_Range

End Function



co mě trápí je fakt, že když podbarvení v některé z buňěk odstraním (nebo přidám), tak funkce "nefunguje, automaticky se nespustí.
musím jít do funkce a odklepnout ho Entrem.
Za každou radu budu ráda :inlove:
(ve Vzorce-možnosti výpočtů-automaticky mám zaškrtnuto automaticky).

Reklama
  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • Aktivace Windows po změně disku Příloha(y)
    od JanC » 15 říj 2023 20:32 » v Windows 11, 10, 8...
    24
    3982
    od JanC Zobrazit poslední příspěvek
    08 lis 2023 08:19
  • Problém s připojením na wifi síť při změně PC Příloha(y)
    od Baader » 09 srp 2023 10:38 » v Sítě - hardware
    18
    3028
    od Baader Zobrazit poslední příspěvek
    10 srp 2023 14:16
  • PowerPoint osekává zvuk při změně snímku
    od Venus » 12 úno 2024 16:35 » v Kancelářské balíky
    2
    1121
    od Venus Zobrazit poslední příspěvek
    13 úno 2024 16:57
  • excel-posun makra
    od actionboy » 12 bře 2024 18:59 » v Kancelářské balíky
    1
    259
    od Grimm Zobrazit poslední příspěvek
    12 bře 2024 21:43
  • Tisk z excelu mění výšky buněk
    od Moonddur » 28 dub 2023 11:50 » v Kancelářské balíky
    1
    1652
    od atari Zobrazit poslední příspěvek
    28 dub 2023 12:08

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 3 hosti