sınav programı hakkında makro bilenlere

[NOKİ69]

komisyon ve gözcü sayılarını düşürmeden bir sütun daha ilave etmek istiyorum vbr kodları hakkında bilgim sınırlı bu bölüme komisyon ve gözcüleri azaltmadan nöbet bölümü eklerseniz memnun olurum email adresim noki69@mynet.com

 

[veyselemre]

Kodlarınızda ilgili bölümü aşağıdaki gibi düzenleyin.

[a17:h65536].ClearContents
For a = 1 To S1.[f65536].End(xlUp).Row
    For D = 8 To 14
        If S1.Cells(a, D) = [c7].Value Then
            c = c + 1
                For b = 1 To 7
                    Cells(c + 16, b) = S1.Cells(a, b).Value
                Next
             Cells(c + 16, 8) = S1.Cells(3, D)
        End If
    Next
Next


Range("B17").Select

 

[hsntetik]

sınav proğramı hakkında

yardımların ve ilgin için teşekkürler. istediğim tam anlamı ile sorun çözüldü çözüldü