DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Sub tabloyudoldur()
Set s1 = Sheets("data")
[c3:h65536].ClearContents
sut = WorksheetFunction.Match([L5], s1.[3:3], 0)
For a = 3 To 54
For b = 4 To s1.[b65536].End(3).Row
If s1.Cells(b, sut) = 0 Then GoTo 10
If s1.Cells(b, "b") = [L4] And s1.Cells(b, "d") = Cells(a, "b") Then
sut2 = WorksheetFunction.Match(s1.Cells(b, "e"), [2:2], 0)
Cells(a, sut2) = s1.Cells(b, sut)
End If
10 Next
Next
End Sub
Bu MATCH yani KAÇINCI fonksiyonunun VBAda kullanılan şeklidir......
Aşağıdaki fonksiyonu çözemedim biraz açıklayabilirmisin ?
sut=WorksheetFunction.Match([L5], s1.[3:3], 0)