-
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
-
Delila_1
Topikgazda
A J1:J6 tartományba írtam be a keresendő neveket. Az If WF kezdetű sorban ezt írd át (2 helyen) a saját neveidet tartalmazó területre.
Sub torlesek()
Dim LR As Long, i As Long, WF As WorksheetFunction
Application.ScreenUpdating = False
Set WF = Application.WorksheetFunction
LR = Cells(Rows.Count, 2).End(xlUp).Row
For i = LR To 2 Step -1
If WF.CountIf(Range("J1:J6"), Range("B" & i)) + WF.CountIf(Range("J1:J6"), Range("C" & i)) = 0 Then
Rows(i).EntireRow.Delete Shift:=xlUp
End If
Next i
Application.ScreenUpdating = True
End SubProgramozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
Új hozzászólás Aktív témák
- Szinte bankkkártya méretű a LattePanda x86-os SBC-je
- Azonnali mobilos kérdések órája
- Mesterséges intelligencia topik
- Gaming notebook topik
- Vezetékes FÜLhallgatók
- World of Tanks - MMO
- ThinkPad (NEM IdeaPad)
- Kertészet, mezőgazdaság topik
- Milyen billentyűzetet vegyek?
- Milyen egeret válasszak?
- További aktív témák...
- Megmaradt - Eredeti Humble, Choice - Steam kulcsok
- Adobe Creative Cloud - 2024. 04. 05 - 2025. 04. 05-ig
- AKCIÓ! - STEAM kulcsok / Punch Club, Oddworld: Soulstorm, Children of Morta, stb. - 2024.05.16.
- Warhammer Online - Age of Reckoning (DE) Collectors Box (Figurával!)
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Alpha Laptopszerviz Kft.
Város: Pécs