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

• #9464 perfag aktív tag Break #9457

  Új Válasz 2011-02-15 12:04:58 #9464

  Ú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

  

  perfag

  aktív tag

  válasz Break #9457 üzenetére

  A problémát kicsit pontosabban kellene definiálnod. A táblázatod folytonos, vagy vannak benne üres cellák is? Nem mindegy!

  Folytonos tábla esetén, feltételezve A oszlopot referenciaként, feltételezve, hogy 100-nál nem lehet több sor, feltételezve, hogy a referencia munkanap neve Munka1:
  =INDIREKT("Munka1!A"&DARAB2(Munka1!A1:A100))

  Ha lehetnek üres sorok (A oszlopban üres cellák), akkor kell egy számláló cella a Munka1 nevű lapon, legyen ez pl. F6:
  {=MAX(SOR(A1:A100)*(A1:A100<>""))}
  Ez egy tömbképlet, a kapcsos zárójeleket Ctrl-Shift-Enter egyidejű lenyomásával lehet odavarázsolni (Fire tudott mást, egyszerűbbet itt a fórumban, de én elfelejtettem)
  A hivatkozás ekkor így alakul:
  =INDIREKT("Munka1!A" & Munka1!F6)

• #9458 bugizozi őstag Break #9457

  Új Válasz 2011-02-15 09:56:42 #9458

  Ú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

  

  bugizozi

  őstag

  válasz Break #9457 üzenetére

  Hello! Én a következő kis makróval oldanám meg...

  

  ucso = Sheets("Munka1").Range("A" & Rows.Count).End(xlUp).Row
  Sheets("Munka2").Range("A1") = Sheets("Munka1").Range("B" & ucso)

  A Munka1 munkalapon lévő táblázat A oszlopának megvizsgálja az utolsó sorát (program első sora), majd a Munka2 munkalap A1 mezőjébe írja a B oszlop utolsó sorában lévő értéket, ami jelen esetben 5 (program második sora).

  Remélem ez alapján el tudsz indulni!

  ui: lehet makró nélkül is meg lehet oldani, de nekem ez juttott hirtelen eszembe

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