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

• #12691 háma csendes tag Delila_1 #12684

  Új Válasz 2012-01-24 23:30:11 #12691

  Ú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

  

  háma

  csendes tag

  válasz Delila_1 #12684 üzenetére

  Szia.

  Sikerült beillesztenem a táblázatomba.
  Az eredeti feladat az volt, hogy x db munkalapból, y db oszlopból, 8 meghatározott munkalapra fűzzön össze adatokat. Az alap kóddal amit megadtál sikerült megcsinálni.

  Még egyszer respect.

• #12685 poffsoft veterán Delila_1 #12684

  Új Válasz 2012-01-24 12:20:52 #12685

  Ú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

  

  poffsoft

  veterán

  válasz Delila_1 #12684 üzenetére

  Megint egy kis problémám lenne:
  Az Éves!K10 cella string-ben tartalmazza a szükséges képletet,
  '=A10+B11
  tehát elvileg a MyFormul$-nek magának a formulának kell lennie, mégis hibaüzenetet kapok rá.

  Mi a hiba? És mi a megoldás? Vagyis a value-t hogyan tudom formula-vá konvertálni? Esetleg a legelső aposztrof okozza a hibát a cellában?

  MyFormul$ = ThisWorkbook.Sheets("Éves").Range("K10").Value
  
  ThisWorkbook.Sheets(1).Activate
  Range("AM20").Formula = MyFormul$

  Ja, és ahhoz, hogy egy lapon kijelöljek, másoljak tartományokat, mindenképpen aktiválnom kell azt a lapot ( pillanatnyilag az !Éves lapon nyomógombbal hívom meg ezt a másoló sub-ot, és nem tetszik, hogy végiglapozza az évet...)?

  Más:

  Ha egy lapon végeztem (copy-paste makróból) és azt szeretném, hogy ne maradjon kijelölve semmi, és a B20 cellára álljon a kurzor( meg a lapgörgetések is teljesen fent és balra, vagyis az ablak tetején az A1 cella látszódjon), azt milyen utasítással lehet elérni?

  Köszi

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