Tüm dosyalarmın N3 hücresine alttoplam ekleniyor sebebini bulamadım.

[kelkitli]

Selamlar,
Arkadaşlar tüm excel dosyalarımın N3 hücresine Alttoplam formülü kendiliğinden ekleniyor. Sebebini bulamadım. Format attım olmadı, bilgisayarı değiştim yine olmadı. Neden oluyor.

 

[Murat OSMA]

Daha önce de sormuştunuz... Format atıtıktan sonra yine devam etmesi ilginç...
Aklıma pek bir şey gelmiyor ama "C:\Documents and Settings\Emre\Application Data\Microsoft\Excel\Xlstart" klasöründe başlangıçta açılan herhangi bir Eklenti dosyası yok değil mi ?

 

[kelkitli]

Yok Murat Bey

 

[Murat OSMA]

Anladım... :dusun:
Sorunla ilgili bir şeyler bulursam yazarım.

İyi akşamlar...

 

[kelkitli]

Teşekkür ederim

 

[obagci20]

Merhaba,

Alt + F11 tuşlarına bastığınızda kodlar olduğunu görüyorsunuz. Modulle 1 ve Modulle 2 içindeki kodları silerek ve N sütunundaki kodları silerek dosyanızı kaydedin.

Ömer BAĞCI

 

[kelkitli]

Dosyayı üst sağdaki kapat düğmesine tıkladığımda 6 hücreyi yazıp kapanıyor.

 

[kelkitli]

Arkadaşlar sebebini buldum.

Sub Auto_Close()
On Error Resume Next
'Sheets("veri").Select
'Range("n7").Select
'ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[5]C:R[65529]C)"
'Range("o7").Select
'ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[5]C:R[65529]C)"
'Range("p7").Select
'ActiveCell.FormulaR1C1 = "=+RC[-2]-RC[-1]"
'Range("N5").Select
'ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[5]C[-3]:R[65529]C[-3])"
'Range("O5").Select
'ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[5]C[-3]:R[65529]C[-3])"
'Range("P5").Select
'ActiveCell.FormulaR1C1 = "=+RC[-2]-RC[-1]"
'Range("N3").Select
'ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[5]C[-6]:R[65529]C[-6])"
'Range("O3").Select
'ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[5]C[-6]:R[65529]C[-6])"
'Range("P3").Select
'ActiveCell.FormulaR1C1 = "=+RC[-2]-RC[-1]"
'Range("P4").Select

End Sub

Dosyanın birinde şu kod var. Bir kaç dosya açıkken hangi dosyada işlem yapsam o dosyaya yazıyor.

 

[obagci20]

Tebrikler, en iyi sorun çözülmüş sorundur.

Ömer BAĞCI