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

• #35403 Juditta_56 aktív tag poffsoft #35399

  Új Válasz 2017-06-06 08:03:28 #35403

  Ú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

  

  Juditta_56

  aktív tag

  válasz poffsoft #35399 üzenetére

  Nagyon szépen köszönöm Neked is a segítséget!

  Először a Te javaslataidat próbáltam ki:

  A variant/integer különbséget nem találtam, sztem mindegyik integer:

  Dim EllSor, EllOszl, JelSor, HibaOszl As Integer
Dim OsszSor, OsszOszl, OsszOszlMax As Integer

  Igen, van Sheets(1) mindkét munkafüzetben, ezt már ellenőriztem - adott lapon: =LAP() -, de azért most változóba raktam mindkét lapnevet (LapNeve és ElsoLap), és átírtam őket.

  A Range hivatkozásait vagy hatszor ellenőriztem, jók, a cellákban, ahonnan a változók az értékeiket veszik, abszolút hivatkozás van az oszlopokra-sorokra, hogy ha kell, akkor be lehessen szúrni oszlopokat-sorokat.

  Sajnos, így sem működött, ugyanott, ugyanazt a hibát dobta.

  Viszont Delila megoldása tökéletes! Újra, és gondolom, nem utoljára, nagyon szépen köszönöm!

  ("Természetesen", Delila, az első válaszod után a másik három copy-paste blokkban nem az egész sort, csak a végét (PasteSpecial xlPasteValues) javítottam, mert a lényeget nem vettem észre! )

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