Automatické spuštění makra po změně buňky

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

Moderátor: Mods_senior

Wertigo
nováček
Příspěvky: 7
Registrován: březen 16
Pohlaví: Muž
Stav:
Offline

Automatické spuštění makra po změně buňky

Příspěvekod Wertigo » 27 zář 2017 10:14

Zdravím přítomné

Rád bych požádal místní odborníky o radu s následujícím scénářem:

Mám dva soubory excelu (excel1 a excel2). Excel1 je připojený k Excel2 ( tento je uložený na síti) a načítá z něj data. Nahrál jsem makro pomocí záznamu makra, které v určitém rozsahu buněk každého listu souboru Excel1 nahradí veškeré znaky zástupným znakem "X". Teď potřebuju vyřešit moment, kdy se na základě změny v jakékoliv buňce sešitu Excel1 (po aktualizaci a načtení vzdálených dat) toto makro má spustit.

Makro je následující:

Kód: Vybrat vše

'
' Makro1 Makro
'

'
    Range("B5:P36").Select
    Selection.Replace What:="*********", Replacement:="X", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
     

Poradil by někdo prosím, kam uvedenou proceduru vložit? Popřípadě, jestli v ní není nějaká očividná kravina....s VBA nemám zkušenosti.

Děkuji a přeji příjemný den

Reklama
guest
Pohlaví: Nespecifikováno

Re: Automatické spuštění makra po změně buňky

Příspěvekod guest » 27 zář 2017 15:46

Událostní procedura Workbook_SheetChange (změna obsahu buňky vesměs po ručním zásahu do buňky) v modulu ThisWorkbook. Přirozeně pak nestačí ale uvést jen Range ale i list (viz objekt Sh). Ono není ale jasné, jestli skutečně myslíte změnu v jakémkoliv listu (objekt Sh) a jakékoliv buňce (objekt Target). Navíc zde není řešeno "po aktualizaci". To lze teoreticky provést v události Workbook_SheetCalculate (přepočet listu v sešitu).

Wertigo
nováček
Příspěvky: 7
Registrován: březen 16
Pohlaví: Muž
Stav:
Offline

Re: Automatické spuštění makra po změně buňky

Příspěvekod Wertigo » 27 zář 2017 16:45

Dobrý den

Děkuji za reakci.Skutečně je myšlena změna v jakémkoliv listu (objekt Sh) a jakékoliv buňce (objekt Target).

Wertigo
nováček
Příspěvky: 7
Registrován: březen 16
Pohlaví: Muž
Stav:
Offline

Re: Automatické spuštění makra po změně buňky

Příspěvekod Wertigo » 29 zář 2017 08:31

Dobrý den

Po vložení makra do události Sheet change a otestování - makro proběhne,ale na konci skončí s touto chybou (screen viz. příloha). Věděl by někdo kde je chyba?
Přílohy
error.jpg


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • 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
  • 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
  • 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
    260
    od Grimm Zobrazit poslední příspěvek
    12 bře 2024 21:43
  • VBA Excel 365 vložit obrazek do buňky
    od wlk60 » 19 dub 2023 15:43 » v Kancelářské balíky
    1
    1624
    od atari Zobrazit poslední příspěvek
    19 dub 2023 21:53

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