-
IT café
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
-
spe88
senior tag
Hello!
Ez tutira működik? Mit rontok el?
az AG oszlopban lévő OK-okra kell rászűrni és az összes ilyen sort törölni!
Sub SP_Delete()
'
' SP_Delete Makró
'
'
With Main_BOM
.AutoFilterMode = False
.Range("ag1:ag1").AutoFilter 'Filter bekapcsolása
.Range("ag1:ag1").AutoFilter Field:=1, Criteria1:="OK" 'Kritérium megadása
.Range("A2:bb1000000").SpecialCells(xlCellTypeVisible).EntireRow.Delete 'Kritériumnak eleget tevő cellák törlése
Cells.AutoFilter 'Filter törlése
Range("A1").Select 'Alap kiindulópont beállítása
Application.CutCopyMode = False 'Kijelölés megszüntetése
MsgBox ("Ok")
End With
End SubKöszönöm
Spóroljunk! Kerül, amibe kerül!
Új hozzászólás Aktív témák
- Elektromos rásegítésű kerékpárok
- Aliexpress tapasztalatok
- CADA, Polymobil, és más építőkockák
- Gaming notebook topik
- Politika
- A hátsó raktárból érkezhet a Galaxy S24 FE főkamerája
- Eredeti játékok OFF topik
- iPhone topik
- Az Xbox Series X|S konzolnak három új verziója jön idén
- Autós topik
- További aktív témák...
- Adobe Creative Cloud - 2024. 04. 05 - 2025. 04. 05-ig
- Windows 10/11 Home/Pro , Office OEM/Retail kulcsok
- AKCIÓ! - STEAM kulcsok / Punch Club, Oddworld: Soulstorm, Children of Morta, stb. - 2024.05.16.
- Steam kulcsok - UTALÁS/REVOLUT
- Autómatricák a legjobb minőségben, több ezer minta! PH tagoknak 30% kedvezmény!
- Need For Speed + minden más csak egyben
- Eladó bontatlan Fallout S.P.E.C.I.A.L. Anthology
- Tiny Tina's Wonderlands Vásárolnék
- Windows Server 2016, 2019, 2022 Standard, Datacenter, Essentials termékkulcsok - MEGA akció!
- Vírusirtó, Antivirus, VPN licenckulcsok - kedvezményes ajánlatok (frissítve: 2024. 05. 01.)
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen