Belirli bir sütundan sadece formülleri almak

[S.Yiğit]

Merhaba,

Belirli bir sütundan formülleri almam gerekiyor. Formülleri alacağım sütunda normal(Formülsüz) veriler var bunlar gelmeyecek. Sadece formüller gelecek. Lütfen eki inceleyiniz. Makro değil de formül olursa sevinirim. Teşekkürler.

 

[Ergün Güler]

Merhaba,

Belirli bir sütundan formülleri almam gerekiyor. Formülleri alacağım sütunda normal(Formülsüz) veriler var bunlar gelmeyecek. Sadece formüller gelecek. Lütfen eki inceleyiniz. Makro değil de formül olursa sevinirim. Teşekkürler.

Selam,

Dosyanızı inceledim. Sorunuz bana karışık ve mantıksız geldi.
Birincisi;
dosyanızda "bu sütuna b sutununda bulunan formülleri getireceğiz." diyorsunuz. Ancak, verdiğiniz B sütunundaki formüller ayrı, D sütunundaki formüller ayrıdır. Yani aynı değil.
İkincisi;
MAKRO'suz, bir hücrenin içinde FONKSİYON kullanmadan başka bir hücreden olsa dahi Mantıken formül yazamasınız.
Yani B1 sütununa = A1 + A2 + A3 yazacaksınız. D1'e de C1 + C2+ C3 yazacak.
Fonksiyonlar ile olmaz böyle birşey.
Ancak makro ile olur. Hem formül taşımana gerek kalmaz.

İyi çalışmalar.

 

[S.Yiğit]

Ergün bey merhaba,

Dediğiniz gibi bunda mantık yok farkındayım. Asıl çalışmayı ekleyemediğim için böyle bir veri oluşturdum.

B2 Hücresinde bulunan =+A2+A3+A4+A5 formülünü D2 hücresine aldığımda =+C2+C3+C4+C5 şeklinde olmalı.

B7 Hücresinde bulunan =+A7+A8 formülünü D7 hücresine aldığımda =+C7+C8 şeklinde olmalı.

vb..

Özel yapıştır'dan formülleri yapıştırdığımda formülsüz olan verilerde geliyor bunların gelmemesi lazım. İlginiz için teşekkürler.. Başka bir çözüm yolu araştırmam lazım.

 

[Ömer]

Basit bir mantıkla bu istediğiniz olur sanırım. ( Tabi doğru anladıysam.)

B sütunu kopyalayıp D sütununa yapıştırın. Daha sonra D sütunu fare ile seçin;

F5 / Özel / Sabitler / Delete

.

 

[S.Yiğit]

Ömer bey,

Çok teşekkür ederim. Sabit'in ne olduğunu bilmediğim için aklıma gelmemişti.. İyi geceler.

 

[Ergün Güler]

Ömer bey,

Çok teşekkür ederim. Sabit'in ne olduğunu bilmediğim için aklıma gelmemişti.. İyi geceler.

Selam,
Ömer Hocam'a ben de teşekkür ederim.
Veri girişi sonrası değişiklikleri güncellemek isterseniz aşağıdaki kodları kullanabilirsiniz. Siz kendiniz sayfa ve aralıkları düzenleme ve tanımlarını istediğiniz gibi şekillendirebilirsiniz.

İyi çalışmalar.

Sub sabitle()
    
    Application.ScreenUpdating = False
    
    Columns("D:D").Clear
    Columns("B:B").Copy
    Columns("D:D").PasteSpecial xlPasteAll
 
    ActiveSheet.Paste
    Columns("D:D").SpecialCells(xlCellTypeConstants, 23).Select
    Application.CutCopyMode = False
    Range("D1").Select
    
    Application.ScreenUpdating = True
    
End Sub