Új hozzászólás Aktív témák

• #11233 m.zmrzlina senior tag pitman #11231

  Új Válasz 2011-09-05 18:24:21 #11233

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  m.zmrzlina

  senior tag

  válasz pitman #11231 üzenetére

  Én is ezen gondolkoztam, hogy viszonylag jól körülhatárolt feltételek alapján lehet a bevihető adat 1 vagy 2 akkor minek az érvényesítés de ha ez kell ám legyen.

  Ezt tedd a képletbe:

  =VAGY(HA(ÉS(B1<>"M";SZÁM(HOL.VAN(B2;H2:I2;0)));B5=1);HA(ÉS(B1="M";SZÁM(HOL.VAN(B2;J2:K2;0)));B5=2))

  A kérdés második felére:
  Van a Workbook objektumnak SheetChange eseménye:

  Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
  MsgBox "A(z) " & ActiveSheet.Name & " munkalapon a " & Target.Row & ". sor és a(z) " & Target.Column & ". oszlop" & Chr(10) & " metszéspontjában lévő cella módosult!"
  End Sub

  Sosem használtam még de kipróbáltam és úgy tűnik működik.
  Jobbklikk a ThisWorkbook-on majd View Code helyre másolni.

• #11232 Delila_1 veterán pitman #11231

  Új Válasz 2011-09-05 18:06:57 #11232

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Delila_1

  veterán

  válasz pitman #11231 üzenetére

  Már csak azt nem értem, mi az -nek érvényesítés! Egy szép hosszú, egészséges képlettel be tudod íratni a B5-be az 1-et, vagy 2-t. A felhasználó úgyis csak azt választhatná a két érték közül, ami a B1 és a B2 értéke szerint 1, vagy 2.

  =HA(ÉS(B1<>"M";SZÁM(HOL.VAN(B2;H2:I2;0)));1;HA(ÉS(B1="M";SZÁM(HOL.VAN(B2;J2:K2;0)));2;""))

  Ha egyik feltétel sem igaz, akkor üres string kerül a B5-be.

  A B6-ban az =B5=1 képlet IGAZ eredményt ad, ha valóban egyenlő a B5 1-gyel, minden más esetben HAMIS lesz az értéke. Nem tudom erre van-e szükség.

Új hozzászólás Aktív témák