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

• m.zmrzlina senior tag

  #17697

  #17696 Kobe

  2013-04-09 22:28:29

  Új Válasz

  Ú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

  

  m.zmrzlina

  senior tag

  #17696 Kobe

  #17696 Kobe

  köszi, megnézem ezt is

  közben felvetnék még egy kis makró tervezést, amolyan elméleti síkon ki hogy csinálná. Tehát az alapszitu:

  Adott 2 excel tábla, ami nagyon hasonló adatokat tartalmaz, az oszlopok olyan 60%-ban megegyeznek. Mind a két fileban a tételeket kommentálni kell, az egyikben már alapból benne vannak ezek. Az egyik tételhez tartozó kommenteket szeretném átmásolni a másik fileba, hogy ne manuálisan kelljen, időt spórolva. Ezt a következő lépésekben gondoltam megvalósítani a makróval, csak érdekelne szerintetek mennyire életképes:

  1. adatbázisból kiexportálni a tételeket - gyak létrehozni a Workbook1-et, egy megadott hálózati mappában, adott néven - ez csak egy ideiglenes file lenne, amit a folyamat végén jó lenne törölni.
  2. Workbook1-ben létrehozni egy egyedi azonosítót, amire VLOOKUP-pal lehet majd hivatkozni a másik fileból.
  3. Megnyitni Workbook2-t valamely hálózati mappából
  4. létrehozni Workbook2-ben benne ugyanazt az azonosítót
  5. A megadott cellákba VLOOKUP-pal Workbook1-ből Workbook2-be másolni az adatokat
  6. Mivel az ideiglenes filet törölni kellene, ezért a vlookup által adott adatokat értékként beilleszteni ugyanazokba a cellákba (mivel ha törlődik workbook1, megszakadna a link a fileok között, és csak #N/A maradna a cellákban
  7. Workbook2 mentése, Workbook1 törlése

  Szerintetek ez összesűríthető 1 makróba ? a legpöpecebb lenne ha az egy access-es gombnyomásra lefutna Szerintem megvalósítható, az egyetlen probléma az, hogy Workbook2-ben nem minden tételre kellene bemásolni az adatokat. Workbook2 ben van egy oszlop, amiben van egy azonosító - "Hazai" vagy "külföldi", ez a két féle érték van a cellában. A makrónak ebben az esetben csak a "hazai" tételekre kellene kitölteni a dolgokat (a "külföldi" tételekre futna egy ugyanilyen makró egy másik adatbázisból és azt az töltené ki), gondolom ez egy sima If-fel menne, pl.

  IF A1="hazai" then
  makró szövege
  Else
  Exit sub

  Én a Wb2 "hazai"-"külföldi" értékeket tartalmazó tartományán mennék végig pl egy For Each ciklussal amiben egy megfelelően felparaméterezett If Then Else szerkezetttel másolnám aWb1-ből a Wb2-be a cellatartalmakat.

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