birleştirlen .xls lerde formüller yok oluyor

[bulentcigali]

iyi günler 2 gün önce bu konuyu açmıştım kusura bakmayın cevap alamayınca tekrar yazmak zorunda kaldım. ekte sunduğum örnekte "toppuan" klasöründe bulunan puantaj bilgilerini (formüllü olan sahaların) ayrı bir excel çalışma ("puantajprg.xls\tümü" sayfasında) sayfasında "BİRLEŞTİR" komutuyla birleştiriyorum ancak "puantajprg.xls\tümü" sayfasında birleştirdiğim .xls lerde olan formüllü sahaların formülleri değil değerleri görünüyor.ben ise formüllerin görünmesini istiyorum.

 

[serqet]

Birleştir komutu ile değil makro ile birleştirme yapıyorsunuz Formülle değil ki?

 

[bulentcigali]

merhaba serget
evet birleştir butonuna bağlamış olduğum makro ile .xls leri ayrı bir .xls e de birleştiriyorum ancak value değerleri alıyor ben hücrelerde tanımladığım formülleride kopyalasın istiyorum.

 

[parametre]

sub formulkopyala()
'
'

'secilen hucreler 
    ActiveWindow.SmallScroll Down:=-18
    Range("AK8").Select
    ActiveWindow.SmallScroll Down:=15
    Range("W40").Select
    ActiveWindow.SmallScroll Down:=-18
    Range("AJ7:AK33").Select
    Selection.Copy
    ActiveWindow.SmallScroll Down:=15
    [COLOR="Red"][B]aktarılacak yer [/B][/COLOR]Range("AJ36").Select
    Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
    ActiveWindow.SmallScroll Down:=12
End Sub

ub formulkopyala()
bunu ornek olarak yazdım sen aralıklara gore kendin duzenle kolay gelsin

 

[bulentcigali]

teşekkürler parametre,
göndermiş olduğunuz kodu yapamadım daha doğrusu nereye ne yazacağımı bilemedim.sağolun