Hirdetés
-
MultiVersus - Fókuszban a PVE mód
gp Az egymás elleni csatározások mellett többek között egyéb kihívások is várnak az érdeklődőkre.
-
One UI 6.1 frissítésekkel túlórázik a Samsung
ma Középkategóriás telefon és ütésálló tablet is részesült belőle a hétvége előtt.
-
Posztapokaliptikus Radeon kártya készül a Sapphire műhelyében
ph A Navi 32 GPU-ra épülő, limitált darabszámú modell a vizuális dualizmus jegyében született, és a 11 Bit Studios láttamozta.
-
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
-
Delila_1
Topikgazda
válasz mikroli #25659 üzenetére
Arra az esetre
Sub Paratlanok()
Dim sor As Long
sor = 2
Do While Cells(sor, 1) > ""
If Application.CountIf(Range("A:B"), Cells(sor, "A")) = 1 Then _
Range("D" & Application.CountA(Columns(4)) + 1) = Cells(sor, 1)
sor = sor + 1
Loop
sor = 2
Do While Cells(sor, 2) > ""
If Application.CountIf(Range("A:B"), Cells(sor, "B")) = 1 Then _
Range("D" & Application.CountA(Columns(4)) + 1) = Cells(sor, 2)
sor = sor + 1
Loop
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
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: Ozeki Kft.
Város: Debrecen