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

• #2672 bundli tag

  Új Válasz 2016-02-23 21:54:52 #2672

  Ú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

  

  bundli

  tag

  Sziasztok!

  Van egy 5x5-ös cellatartományom, legyen ez most A1:E5.

  Azt szeretném megcsinálni, hogy egy gombnyomásra ezt az 5x5-ös területet másolja be ezalá mégegyszer. Ha megint megnyomom a gombot, akkor a következő alá illesztené be és így tovább.

  Eddig idáig jutottam, hogy:

  ActiveCell.Range("A1:E5").Select
  Selection.Copy
  ActiveCell.Offset(6, 0).Range("A1").Select
  ActiveSheet.Paste

  Ez pont azt csinálja ami nekem kéne, de csak akkor ha "jó helyre van kattintva".
  Tehát ha máshova van kattinva induláskor, akkor már el van rontva az egész. Egy Rows("1:1").Select után tökéletes, egészen a második kattintásig, mert utána ugyanúgy mindig az 1:1 cellától fog indulni.
  Valahogy azt kéne megoldani, hogy elmentse egy változóba azt, hogy hányszor lett már másolva. Ezt akár egy segédcellába is le lehetne menteni, de nem tudom hogyan. Azért is jó lenne ezt elmenteni, mert minden egyes másolt blokk mellé oda kéne írni, hogy ez éppen hanyadik.

  Nagyon megköszönék bármi nemű segítséget!

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