< návrat zpět

MS Excel


Téma: udalost na liste (zmena obsahu bunky) nefunguje rss

Zaslal/a 10.2.2014 15:07

ahojte, na liste mam
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 1 And Target.Column = 1 Then
x = 3
End If
End Sub

pricom na riadku x=3 davam v editori STOPku.
Makrom vyplnujem bunku A1. Pri vyplnovani (vkladam do bunky obsah premennej Cells(1,1).value = cena, cena je premenna v ktorej mam vlozene cislo), sa mi to cele pekne zastavi na udalosti zmeny listu, riadok x=3. Nasledne (dalsim spustenim makra zelenou sipkou v editore) mi vsak makro vymaze tuto hodnotu (ostane prazdna bunka) ale k zastaveniu na x=3 uz nedojde. Existuje nejaka moznost ako makro zmeni hodnotu A1 bez toho aby sa spustila procedura Change na tomto liste?
Problem je totiz to ze vymazanie tejto hodnoty je neziaduce a ja neviem ako zistit kedy sa to stane (makro je dost dlhe a stane sa to v cykle kde cca 300x prechadzam 4000 riadkov (krokovanie by mi trvalo asi tyzden ak nie viac). Vopred dakujem za reakcie

Zaslat odpověď >

#017789
avatar
V tomto případě bych potřeboval křišťálovou věšteckou kouli ;-).
Událost Change funguje v pohodě a i vyplnění buňky A1 nebude problém... Důvod, proč se ti to sekne, bude pravděpodobně v tom makru, které jsi sem nedal.
P.citovat
#017790
avatar
teoreticky by som sem mohol dat aj cele 4 subory s ktorymi to makro pracuje, ide mi vsak hlavne o to ze na zaciatku je bunka A1 prazdna. Spustim makro a to mi v urcitom bode zmeni hodnotu bunky A1 (pritom sa ktivuje makro Worksheet_Change , a v nom sa to zastavi na tom riadku kdesom dal stopku, a spusti sa editor makier, ktory zobrazi kde je to stopnute - to je OK).
Cize v tomto bode je uz zmenena hodnota bunky A1 (to vidim, je to OK). Nasledne stlacim v editore zelenu sipku aby makro pokracovalo dalej, makro sa spusti a ked skonci tak bunka A1 je prazdna, avsak procedura Worksheet_Change sa uz nespusti aj napriek tomu ze bunka A1 zmenila svoju hodnotu. Stale mam stopku na riadku x=3 v procedure Worksheet_change takze by sa to pri spusteni procedury zastavilo.citovat
#017792
avatar
Zkoušel jsem na jednoduchém příkladě a funguje mi to.
Takže problém bude skutečně někde v tom makru...
P.citovat
#017797
avatar
ano , aj ja som to skusal na jednoduchom priklade a tam mi to funguje. Problem je ze to makro to vymaze bez toho aby sa spustila udalostna procedura. Viete mi niekto poradit inu moznost ako zistim v ktorom kroku mi makro vymaze tu hodnotu z A1? ako som pisal krokovanie napripada do uvahy.
dikcitovat
#017850
avatar
Nemáš tam něco jako

Application.EnableEventscitovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje