ekteki dosyada veri sayfasında ortalaması 1,80 ve üzerinde olan kişilerin adı ve soyadının liste sayfasında listelenmesini istiyorum... bunu nasıl yapabilirim.
Userform üzerindeki butona aşağıdaki kodu yazarak deneyin.
[vb:1:a0a911da4a]Private Sub CommandButton1_Click()
Set s1 = Sheets("veri")
Set s2 = Sheets("liste")
For b = 7 To s1.[b65536].End(3).Row
If s1.Cells(b, "d") >= 1.8 Then
c = c + 1
s2.Cells(c + 6, "c") = s1.Cells(b, "b")
s2.Cells(c + 6, "d") = s1.Cells(b, "c")
End If
Next
End Sub
[/vb:1:a0a911da4a]
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.