• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Makro ile bul ve yaz gibi birşey

sorununuzu süz komutu ile gideremez misiniz?
 
yardımınız için teşekkürr ederim, ama malesef süz komutu yeterli olmuyor, bu konuda yardım edecek kimse yokmu aceba?
 
makro olmak zorundamı
düşeyara kullanabilirsin cpu sayfasında a19 a
WINFAST K7S741GXMG-6L SC-A V+S+L yaz c19 a aşağıdaki formülü yaz
=DÜŞEYARA(A19;Sayfa1!$C$2:$K$1067;4;0)
 
umarım işinizi görür. geliştirmek size kalmış

Sub bulyaz()
z = 20
For i = 1 To 5000
mnz = Sheets("Sayfa1").Cells(i, 1)
If mnz = 23 Or mnz = 24 Then
Sheets("CPU").Cells(z + 1, 1) = mnz
Sheets("CPU").Cells(z + 1, 2) = Sheets("Sayfa1").Cells(i, 2)
z = z + 1
End If
Next
End Sub
 
Sn. mnz,
çok teşekkürler tam istediğim gibi, makrodan hiç anlamasamda değişiklikleri kolayca yapabildim çok teşekkürler emeğinize sağlık.
 
Geri
Üst