< návrat zpět

MS Excel


Téma: událostní procedura rss

Zaslal/a 5.4.2009 19:13

Ahoj.Mohu zadat na jeden list více událostních procedur jednoho typu(Change)?(jestli ano,tak jak na to.když zkouším zadat vše do jedné procedury potřebuji tam mít více podmínek ,ale to mi potom hází samou chybu...:(

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim h5 As Range
Dim f13 As Range
Set h5 = Range("h5")
Set f13 = Range("f13")
If h5 <= f13 Then
Call mmm
End If
End Sub

v podstatě potřebuji na jednom listu porovnávat vždy 2 bunky a po splnění podmínky vyvolat makro .pro každou variantu jiné...

Zaslat odpověď >

#000449
avatar
Private Sub Worksheet_Change(ByVal Target As Range)
Dim h5 As Range, f13 As Range
Set h5 = Range("h5")
Set f13 = Range("f13")
If h5 <= f13 Then
Call mmm
Else
Call nnn
End If
End Subcitovat
#000450
avatar
Vyzkoušel jsem to větvení a funguje mi zcela bezkonfliktně podle tvých požadavků. Jestli ti náhodou kolizi nezpůsobojí volaná makra. Já použil na testování jednoduché msgbox "mmm", respektive msgbox "nnn" 5citovat
#000452
avatar
No jasně .asi jsem se špatně vyjádřil.tohle makro funguje bez problémů , ale potřebuju ,abych měl na jednom listu tyhle makra 4x a to nevím jak mám udělat.potřebuju hlídat 4 bunky na jednom listu a tohle makro je pouze na jednu bunku z těch 4....citovat
#000453
avatar
Nevím, jestli jsem tě teď dobře pochopil. Zkusil jsem následující kód pro dvě porovnávané dvojice buněk a opět funguje podle požadavků. Žádnou chybu mi to "neháže". A bude to jistě fungovat pro další a další dvojice buněk 6
Ale možná to má vyvolávat makro jen v případě změny vztahu některé ze sledovaných dvojic buněk a na jiné změny nereagovat. TAk je to míněno ? 4citovat
#000454
avatar
Private Sub Worksheet_Change(ByVal Target As Range)
Dim a1 As Range, b1 As Range, c1 As Range, d1 As Range
Set a1 = Range("a1")
Set b1 = Range("b1")
Set c1 = Range("c1")
Set d1 = Range("d1")
If a1 <= b1 Then
Call mmm
End If
If c1 <= d1 Then
Call nnn
End If
End Subcitovat
#000456
avatar
tahle si to představuju a jsem to i zkoušel a to mi házelo chyby.zkusím to ještě jednou až se dostanu domu .napíšu jak to dopadlo a dám vědět.zatím děkuji za odezvu.citovat

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

Makro na opakovanou změnu barvy tlačítka

Jiří497 • 26.1. 20:31

Pozvyhledat s vnořeným COUNTIF

Jiří497 • 26.1. 19:36

Makro na opakovanou změnu barvy tlačítka

alois1111 • 26.1. 13:24

Pozvyhledat s vnořeným COUNTIF

majovy-bycek • 26.1. 12:45

Makro na opakovanou změnu barvy tlačítka

alois1111 • 26.1. 12:32

Makro na výmaz hodnoty pouze v modře podbarvené

Anonym • 26.1. 11:29

SVYHLEDAT (generovaná cesta oblasti vyhledávaní)

eLCHa • 26.1. 10:05