Hirdetés
- Milyen okostelefont vegyek?
- Samsung Galaxy A54 - türelemjáték
- Google Pixel topik
- Poco X6 Pro - ötös alá
- Samsung Galaxy S24 FE - később
- Apple iPhone 16 - ígéretek földje
- OneSport OT07 - szevasztok, hollandok!
- Szívós, szép és kitartó az új OnePlus óra
- iPhone topik
- Samsung Galaxy S25 - végre van kicsi!
-
Mobilarena
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
-
Fferi50
Topikgazda
válasz
RAiN91 #40743 üzenetére
Szia!
Elképzelhető, hogy olyan tartományokat határoz meg, amelyek nem egybefüggőek, ezért nem tudja törölni. Bár akkor hibával meg kellene állnia.
A Range("A1") az első cella a munkalapon.
A CurrentRegion az A1 cella körüli összefüggő tartomány, amelyet egy üres sor és egy üres oszlop határol.
A Columns(5) ennek a tartománynak az 5. oszlopa. Ebben keressük az üres cellákat és rendeljük hozzá az egész sort.Talán érdemes megpróbálni így:
Sub Sortorles2()
Dim ures As Range, terulet As Range
Set ures = Range("A1").CurrentRegion.Columns(5).SpecialCells(xlCellTypeBlanks).EntireRow
For Each terulet In ures.Areas
terulet.Delete
Next
End SubDe problémát okozhat még esetleg az összevont cellák létezése is.
Persze ha túl nagy a terület, amit használsz, akkor lassú lehet a törlés így is.
Üdv.
Új hozzászólás Aktív témák
- DELL PowerEdge R730xd 12LFF+2SFF rack szerver - 2xE5-2680v3,64GB RAM,4x1GbE,H730 RAID v ZFS
- Asus ROG Flow Z13 GZ301VIC Acronym Limitált kiadás - 13.4" QHD 165Hz Érintő - 32GB - 1TB - RTX 4070
- Apple iPhone 14 Pro 128GB, Kártyafüggetlen, 1 Év Garanciával
- SEAGATE ST6000NM0034 6TB 7.2k SAS HDD, nettó 15747Ft + ÁFA, 1 év garancia
- Hp Prodesk 600 G5 SFF/ i5-8500, i5-9500, i7-9700 vagy "félkonfig"/ Win11- Számla, garancia
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest