- A Föld teraformálásával építene galaktikus birodalmat Elon Musk
- Ilyen beviteli eszközről álmodnak a digitális művészek
- Idővel a képgenerálást is megkapja a PlayStation
- Felhasználóbarát módosítást kaphat az EU-ban a Nintendo Switch 2
- Már fut az Intel grafikus vezérlőin az év egyik legjobban várt címe
-
PROHARDVER!
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
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 IntegerIgen, 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
- PC Game Pass előfizetés
- Xbox / Microsoft Store feltöltőkártya kód (digitális, HU) több címlet, több db, azonnal, olcsón
- Game Pass Ultimate előfizetések 1 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- MEGA AKCIÓ! - Jogtiszta Windows - Office & Autodesk & CorelDRAW - Azonnal - Számlával - Garanciával
- AKCIÓ! Asus TUF A17 FA707RR FHD Gamer notebook - R7 6800H 16GB DDR5 512GB SSD RTX 3070 8GB W11
- Új FULL HD webkamera + Számla
- AKCIÓ! BESZÁMÍTÁS! Részletfizetés 0% THM ÚJ RTX 5090 több típusban 3 év garanciával 27% áfával
- Raktáron lévó 1851-es lapok! Garanciás termékek! Részletfizetésre is!!! ÉRDEKLŐDJ!!
- Apple iPhone 13 Pro Max Graphite 128GB használt karcmentes 100% új akku 6 hónap garancia
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest


)
Fferi50
