Results 1 to 3 of 3
Hybrid View
-
31st August 2016 20:40 #1
,
, , . , .
, , for "", b a, for "i", c d. b c, a d sum , .. a d, b c, Sheet1.Cells(i, 1).Value. , ?Code:Sub neshto-si() Dim b, c As Double Dim a, d As String Dim sum As Integer sum = 0 For k = 1 to 20 b = Sheet2.Cells(k, 2).Value a = Sheet2.Cells(k, 3).Value For i = 1 to 50 c = Sheet1.Cells(i, 2).Value d = Sheet1.Cells(i, 3).Value If b = c Then sum = sum + 1 End If If a = d Then sum = sum + 1 End If If sum = 2 Then Sheet1.Cells(i, 1).Value = Sheet2.Cells(i, 1).Value End if sum = 0 Next i Next k End Sub
.Only real eyes
realise
real lies
-
31st August 2016 23:44 #2
, "" ? , ?
"" ?
', , :
A, B, C D .
E :
(A = C, "y", "n") - A C , .
F , , :
( B = D, "y", "n") - B D .
G :
( = "y", ( F = "y", "y", "n"), "n") - , "y".
- / - / "y" "G".
, . , , , .Last edited by ifch0; 31st August 2016 at 23:47.
, , , .: ( ) - (); (..) - (..).
-----! , ...
-
1st September 2016 13:03 #3




Reply With Quote
Lenovo ThinkPad 15 IdeaPad 15
5th May 2023, 22:16 in