• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

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)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse