MS Excel

Téma: Podminka vyvolani MACRA

Zaslal/a VERONIKA-93 30.7.2016 8:41

Dobry den, snažím se upravit následující MACRO aby pokud v bunce D2 byla číselná hodnota >=0 tak zavolat Macro1 a pokud bude hodnota <0 tak zavolat Macro2. Na konkrétní hodnoty funguje dobře ale takhle už ne.... nevěděl by si někdo rady?

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("D2")) Is Nothing Then
Application.EnableEvents = False
Select Case Range("D2")

Case ">=0": Call Makro1: GoTo ex
Case "<0": Call Makro2: GoTo ex

End Select
ex:
Application.EnableEvents = True
End If
End Sub

Zaslat odpověď >

syd(30.7.2016 9:07)#032169

Zkuste bez tech uvozovek ""
anebo:

Case Is >= 0 ...
Case Is < 0 ...
sydcitovat

VERONIKA-93(30.7.2016 11:07)#032170

syd to je onooooo díky moc

citovat

Uživatelské menu

Nejste přihlášen(a)

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.