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

• #2197 bende126 csendes tag

  Új Válasz 2013-09-05 20:05:51 #2197

  Ú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

  

  bende126

  csendes tag

  Sziasztok!
  Bocsánat, hogy eltűntem, de nem akartam, csak annyit beírni, hogy oké megpróbálom, amíg nem próbáltam ki ténylegesen. Szóval próbálgattam, de már nagyon nagyon fáj a fejem, hogy ennyire tré vagyok.
  Jelenleg itt állok.
  Sub nyomtatas()
  sora = 1
  sorb = 2
  sore = Cells(sora, 1)
  sore2 = Cells(sorb, 1)
  
  
  Do
  sora = sora + 1
  sorb = sorb + 1
  sorc = sora - 1
  sore = Cells(sora, 1).Value
  sore2 = Cells(sorb, 1).Value
  
  Loop While sore = 2
  sork = Cells(1, 1)
  sorv = Cells(sorc, 12)
  Range(Cells(1, 1), Cells(sorc, 13)).Select
  
  Cells(2, 20).Value = "OK"
  Cells(2, 21).Value = sora
  Cells(2, 22).Value = sorb
  Cells(2, 23).Value = sore
  Cells(2, 24).Value = sore2
  End sub

  Ez annyit csinál, hogy ami 2-es berendezés, az kijelölődik, Innen már csak nyomtatni kell, azzal nem boldogulok, valamint azzal sem, hogy hogyan tudom megkeresni a 3-as aztán a 4-es és így tovább a többi terméket majd kinyomtatni. Nem tudom elmenteni azt a változót, hogy megjegyezze, hogy hol hagyta abba a sorok számolását. Az OK, hogy megszámolja, hogy mondjuk, 6 sornyi 2-es berendezés van, ezt el is menti változóként, viszont hogyan tudom felhasználni, ezt a következő termékek ek megszámolásához? A 7-dik sortól kell elkezdenie számolni, de nem tudom, hogyan lehetne, illetve, hogy hogyan tudom megmondani neki, hogy most már a 3-as berendezést kezdje el számolni, aztán nyomtatni.
  Nekem ez nagyon nehéz. Bárki tud segíteni annak nagyon hálás lennék.
  Mellékelek egy képet az excel-ről.

  Rehor Gyula

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