Hücrelerin hareket ettirilmesini engellemek istiyorum

[saat1]

İşyerinde birkaç kişinin gün boyu kullandığı bir Excel programı var. Fakat içinde başka sütunlara bağlı olarak çalışan formüller bulunan hücreler var ve hücreler fare ile tutulup başka yere sürüklendiğinde ilgili sütunlardaki formüller bir şekilde bozuluyor ve içlerinde hata mesajı beliriyor. Bunu önlemek için hücrelerin fare ile tutulup sürüklenmesini engellemek istiyorum. Bunu en kolay şekilde nasıl yapabilirim?

 

[hamitcan]

Sayfayı korumayı deneyin

 

[Seyit Tiken]

Aşağıdaki kodları deneyiniz.

Alternatif 1 :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveCell.Select
If ActiveCell.HasFormula Then
Target.Offset(0, 1).Select
MsgBox "Dikkat Hücrede Formül Var", vbInformation
End If
End Sub

Alternatif 2 :

Sub Makro2()
Application.CellDragAndDrop = False
End Sub

 

[altanson]

Sayın Seyit Tiken,

makrolar konusunda pek bilgim yok, bu kodları kod görüntüle seçeneğine kopyaladıktan sonra nasıl çalışır hale getirebiliriz?

teşekkürler.

 

[N.Ziya Hiçdurmaz]

Sayfa kod bölümüne yerleştireceksiniz. Seçtiğiniz hücrede formül var ise kod kendi çalışıp size uyarı verecek(sayfa sekmesine sağ tuş yapıp kod görüntüle deyip kodu yapıştırabilirsiniz.)

 

[altanson]

teşekkürler oldu fakat şimdi hiç bir hücre taşınamıyor ve çoklu seçim yapılamıyor,

sanırım formül olan hücrenin değiştirilmesini engellemek için en iyi yol "sayfa koruma".

ayrıca bu kodları denedikten sonra yeni açtığım excel dosyalarında, hücrenin sağ alt köşesinin üstüne gelince diğer hücrelere uygulama seçeneği (anlatabildim sanırım) gözükmüyor. farkında olmadan neresini bozdum???

 

[Levent Menteşoğlu]

İşyerinde birkaç kişinin gün boyu kullandığı bir Excel programı var. Fakat içinde başka sütunlara bağlı olarak çalışan formüller bulunan hücreler var ve hücreler fare ile tutulup başka yere sürüklendiğinde ilgili sütunlardaki formüller bir şekilde bozuluyor ve içlerinde hata mesajı beliriyor. Bunu önlemek için hücrelerin fare ile tutulup sürüklenmesini engellemek istiyorum. Bunu en kolay şekilde nasıl yapabilirim?

araçlar-seçenekler-düzen-hücre sürüklemeye ve bırakmaya izin ver kutusundaki işareti kaldırın.

 

[altanson]

araçlar-seçenekler-düzen-hücre sürüklemeye ve bırakmaya izin ver kutusundaki işareti kaldırın.

teşekkürler böylece benim de sorunuma cevap vermiş oldunuz.

 

[saat1]

Cevap veren herkese teşekkürler.

 

[Mahir64]

Merhaba

Levent Menteşoğlu ve Seyit Tiken bey teşekkür ederim buna ihtiyacım vardı koşullu biçimlendrme zarar görmesin diye

Çalışma Sayfasına uyguladığım hali
Açılışta Engellemek İçin
Sub AUTO_OPEN()
'hücre Taşıma Engelleme Pasif
Application.CellDragAndDrop = False
End Sub

Çalışma Kitabını Kapatırken Aktif olması için
Sub Auto_close()
'Hücre Taşıma Etkinleştir
Application.CellDragAndDrop = True
End Sub