Aktarma yapılırken formülde siliniyor

[mesutnet24]

Değerli forum üyeleri
Formül içeren bir hücreden veri aktarma yapılırken, formül silinmeden sadece veriyi aktarmanın bir çaresi varmı?

Dosya örneği ektedir. Fazla yer kaplamasın diye ilgili sayfaların dışındaki sayfaları sildim. Programın tamamını bitirdiğimde paylaşıma sunarım.

 

[Seyit Tiken]

Sub Düğme33_Tıklat()
[f5] = [c11]
End Sub

 

[parsley2]

cevabı formülünde zaten

Set S1 = Sheets("ANAİŞLEM")
Set S2 = Sheets("ANAİŞLEM")
SATIR = IIf(S2.[F5] = "", 5, S2.[B65536].End(3).Row + 1)

S2.Cells(SATIR, 6) = [C11]

'[C11] = "" (düzeltilecek kısım)

[A1].Select
Set S1 = Nothing
Set S2 = Nothing
MsgBox "VERİLERİNİZ AKTARILMIŞTIR.", vbInformatio
kendi formulünü kendin sildiğin için formülde silinmiş oluyor. kodu bu şekilde düzeltirsen düzelir.

 

[mesutnet24]

çook teşekkür ederim arkadaşlar
inşallah birgün bende başkalarına yardımcı olacak seviyeye gelirim.