sayfayı koruma özelliği

Katılım
4 Ekim 2007
Mesajlar
4
Excel Vers. ve Dili
TR
Merhaba,

Ben Excel de bi veri girldiğinde otomatik olarak o satırın kitlenmesini istiyorum.

Örneğin a-b-c-d : 1-2-3-4 satırına veri girilecek fakat veriyi girdikten sonra otomatik olarak o satırlar kitlenecek ve bir daha veri girilmesine izin vermeyecek. Bunu excel de yapabilir miyim?

Teşekkürler
 

Seyit Tiken

Uzman
Uzman
Katılım
23 Ağustos 2005
Mesajlar
4,651
Excel Vers. ve Dili
Excel : 2010
Aşağıdaki kodu, ilgili sayfanın kod bölümüne yapıştırın. Belirtilen hücrelere değer girdikten sonra, dolu hücrelere giriş yapmayı deneyiniz.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
If Intersect(Target, [a1:d4]) Is Nothing Then Exit Sub
If Target = "" Then
Exit Sub
Else
Target.Offset(, 1).Select
End If
End Sub
 

N.Ziya Hiçdurmaz

Özel Üye
Katılım
28 Nisan 2007
Mesajlar
2,218
Excel Vers. ve Dili
Office 2013 TR / 32 Bit
yanıt

Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Unprotect "123"
Target.Locked = True
ActiveSheet.Protect "123"
End Sub
 
Katılım
4 Ekim 2007
Mesajlar
4
Excel Vers. ve Dili
TR
kod bölümüne nasıl yapıştırabilirim? Teşekkürler
 
Katılım
4 Ekim 2007
Mesajlar
4
Excel Vers. ve Dili
TR
tekrar merhaba, dediğiniz uygulamayı yaptım fakat olmadı. Örnek dosyada da yeni verileri girildikten sonra kaydedip çıkıyorum daha sonra dosyayı tekrar açınca son girdiklerimde değişiklik yapabiliyorum.

Daha detaylı bilgi veriyim size, Formlar var ve üzerlerinde formüller. menuler ve formul lerin olduğu yerler kilitli. Yeni yazılacak verilerin birkez girdikten sonra tekrar değiştirilmemesi gerek ya da kilidi açıp yine değiştiremiyecek. hata yaparsa bir alt satırdan düzeltme yapabilecek. Bunu nasıl yapabilirim?
 
Üst