Stránka 1 z 1

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

Napsal: 27 zář 2017 10:14
od Wertigo
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

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

Napsal: 27 zář 2017 15:46
od guest
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).

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

Napsal: 27 zář 2017 16:45
od Wertigo
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).

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

Napsal: 29 zář 2017 08:31
od Wertigo
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?