birden fazla hücre seçimini engelle

[mozdem]

merhaba,
sayfa1 de hücreye veri girdiğimde girilen veri ile ilgili bir bilgi sayfa2 hücresine kayıt yapılıyor.
Sayfa1 deki hücrede yazılı veriyi sildiğimde, sayfa2 de o hücrede yazılı veri için ne yazılmış ise buda siliniyor. Bunlar VBA kodu ile yapılıyor.
Ancak, Sayfa1 de birden fazla hücre seçerek silersem, Sayfa2 deki veriler silinemiyor.


Bu nedenle, birden fazla hücre seçilmesi engellensin.
Teşekkür ederim.

 

[turist]

Uygulama yaptığınız çalışma sayfanızın(Sayfa1) VBA'daki kod bölümüne;

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Selection.Cells.Count > 1 Then
        MsgBox "Birden fazla HÜCRE seçemezsiniz!!!", vbCritical
        ActiveCell.Select
        Exit Sub
    End If
End Sub

Şeklinde yazıp deneyin.

 

[mozdem]

Uygulama yaptığınız çalışma sayfanızın(Sayfa1) VBA'daki kod bölümüne;

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Selection.Cells.Count > 1 Then
        MsgBox "Birden fazla HÜCRE seçemezsiniz!!!", vbCritical
        ActiveCell.Select
        Exit Sub
    End If
End Sub

Şeklinde yazıp deneyin.

Çok teşekkür ederim.