- Katılım
- 6 Temmuz 2008
- Mesajlar
- 1,875
- Excel Vers. ve Dili
- OFFİCE 2010- TÜRKÇE
Kod:
Range("C5:O65536").ClearContents
sat = 5
For i = 2 To Sheets(S1).[C65536].End(3).Row
If Range("D3") = Sheets(S1).Cells(i, "C") Then
Cells(sat, "C") = Sheets(S1).Cells(i, "C")
Cells(sat, "D") = Sheets(S1).Cells(i, "D")
Cells(sat, "E") = Sheets(S1).Cells(i, "E")
Cells(sat, "F") = Sheets(S1).Cells(i, "F")
Cells(sat, "G") = Sheets(S1).Cells(i, "G")
Cells(sat, "H") = Sheets(S1).Cells(i, "H")
Cells(sat, "I") = Sheets(S1).Cells(i, "I")
Cells(sat, "J") = Sheets(S1).Cells(i, "J")
Cells(sat, "K") = Sheets(S1).Cells(i, "K")
Cells(sat, "L") = Sheets(S1).Cells(i, "L")
Cells(sat, "M") = Sheets(S1).Cells(i, "M")
Cells(sat, "O") = Sheets(S1).Cells(i, "O")
sat = sat + 1
Else: End If
Next i
kolay gelsin arkadaşlar yukarıda bulunan kodda "sat = 5"" ve sat = sat + 1 ne anlama geliyor ve koddaki yeri nedir?
