• DİKKAT

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

Hücreye girdiğim değere göre formül tekrarı

  • Konbuyu başlatan Konbuyu başlatan raburabu
  • Başlangıç tarihi Başlangıç tarihi
Katılım
14 Kasım 2008
Mesajlar
87
Excel Vers. ve Dili
türkçe
Merhaba arkadaşlar
Gönderdiğim örnek dosyada gerekli açıklama yaptım. Burda istediğim bir hesaplama tablom var. Bu tabloda çok formul kullanıyorum. Bu formulleri alt alta çoğaltıyorum. a sütununda a7 den başlıyarak girdiğim değere göre bu formullerin tekrar etmesi mümkünmü. Şimdiden teşekkür ederim.
 

Ekli dosyalar

VBE'de Sayfa1(koli) nesnesinin üzerine çift tıklayarak sağda açılan kod penceresine aşağıdaki kodu kopyalayın.

Kod:
Private Sub Worksheet_Change(ByVal Target As Range)

Dim tRow As Long

If Target.Column <> 1 Then Exit Sub
If Target.Row < 7 Then Exit Sub

tRow = Target.Row

Range("F" & tRow - 1 & ":G" & tRow - 1).Copy Range("F" & tRow & ":G" & tRow)
Range("V" & tRow - 1 & ":W" & tRow - 1).Copy Range("V" & tRow & ":W" & tRow)
Range("Y" & tRow - 1 & ":BV" & tRow - 1).Copy Range("Y" & tRow & ":BV" & tRow)

End Sub

A sütunundaki aktif hücrede bir değişiklik yapılması durumunda, bir üst satırdaki F-G + V-W + Y-BV sütunlarında bulunan formülleri aktif hücrenin satırındaki aynı sütunlara kopyalar.
 
Geri
Üst