• DİKKAT

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

Veriye göre satıra formül uygulatma

Katılım
7 Nisan 2010
Mesajlar
2
Excel Vers. ve Dili
office 2007
Selam arkadaşlar foruma yeni oldum size bir olcaktı umarım yardımıcı olarabilirsiniz.

Şimdi elimde olan bir formulü belli bir satıra uygulamak istiyorum ama uygulamak istediğim satır sayısınıda başka bir formülle hesaplamam lzm. şimdi örneğin "x" diye bir formülü kullanarak A1 de bir sayı buldum ve "y" diye başka bir formülüde A1 de bulduğum sayı kadar sutuna uygulamam lzm. mesela A1 de 5 çıktıysa o formülü B1 den B5 e kadar uygulatmam lzm. Umarım anlatabilmişimdir. şimdiden teşekkürler
 
Merhaba,

Çalışma sayfasının kod bölümüne kopyalayınız..

Kod:
Private Sub Worksheet_Calculate()
Application.EnableEvents = False
If Range("A1") <> 0 Then
    Range("B2:B65536").ClearContents
        Range("B1").Copy Range("B2:B" & [A1])
End If
Application.EnableEvents = True
End Sub
.
 
Teşekkürler işime yaradı
 
Geri
Üst