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

• #18211 sztanozs veterán vamzi #18208

  Új Válasz 2013-06-05 14:50:54 #18211

  Ú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

  

  sztanozs

  veterán

  válasz vamzi #18208 üzenetére

  Ezt egy kicsit átalakítva meg tudod csinálni makró nélkül is.

• #18210 m.zmrzlina senior tag vamzi #18208

  Új Válasz 2013-06-05 14:23:07 #18210

  Ú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 vamzi #18208 üzenetére

  Esetleg próbálkozz ezzel a (gondolatébresztő) saját függvénnyel:

  Function HOLAKORTE(tartomany As Range, ertek_1 As Variant, ertek_2 As Variant)
  
  For Each cella In tartomany
  If cella.Value = ertek_1 And cella.Offset(0, -1).Value = ertek_2 Then HOLAKORTE = cella.Offset(0, -2).Value
  Next
  
  End Function

  Három argumentumból az első az a tartomány amiben az ertek_1-et keresed (esetedben a C1:C9). Az ertek_1=100, az ertek_2="körte"

• #18209 m.zmrzlina senior tag vamzi #18208

  Új Válasz 2013-06-05 14:11:20 #18209

  Ú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 vamzi #18208 üzenetére

  Nekem ezzel a makróval (vagy valami nagyon hasonlóval) tűnik legegyszerűbbnek a feladat megoldása:

  Sub holakorte()
  For Each cella In Range("C1:C9")
  If cella.Value = Range("E1").Value And cella.Offset(0, -1).Value = Range("F1").Value Then Range("G1").Value = cella.Offset(0, -2).Value
  Next
  End Sub

  E1-ben és F1-ben adod meg a feltételeket. Az E1 ben lévő értéket fogja keresni a C oszlopban, az F1 értékét a B-ben és G1-be írja ki az eredményt.

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