kayıt geri alamama

[zeze]

değerli arkadaşlar
bir spc formumuz var, bu forma bilgiler kayıt edildikçe otomatik olarak grafik oluşmakta buraya kadar herşey normal, ancak yapmak istediğim şey ölçüm değeri girilip enter veya yön tuşlarına basıldıktan sonra en son girilen veya daha önce girilen değerlerde değişiklik yapılmasını istemiyoruz acaba bunu engelleyebilir miyiz?
ilgilenen arkadaşlara teşekkür ederim...

 

[Ferhat Pazarçevirdi]

Ekteki örneği inceleyiniz.

Sizin spc formunuza benzer mi bilmiyorum ama; sayfadaki basit form yapısı üzerinde; B7:H38 aralığına bir değer girildikten sonra, tekrar değiştirilmesine izin verilmez.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [B7:H38]) Is Nothing Then Exit Sub
ActiveSheet.Unprotect
For Each hucre In Range(Cells(Target.Row, 2), Cells(Target.Row, 8))
    If hucre <> "" Then: hucre.Locked = True
Next
ActiveSheet.Protect
End Sub

 

[zeze]

Ekteki örneği inceleyiniz.

Sizin spc formunuza benzer mi bilmiyorum ama; sayfadaki basit form yapısı üzerinde; B7:H38 aralığına bir değer girildikten sonra, tekrar değiştirilmesine izin verilmez.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [B7:H38]) Is Nothing Then Exit Sub
ActiveSheet.Unprotect
For Each hucre In Range(Cells(Target.Row, 2), Cells(Target.Row, 8))
    If hucre <> "" Then: hucre.Locked = True
Next
ActiveSheet.Protect
End Sub

yapmış olduğunuz form süper olmuş tam benim istediğim
ben bunu kendi formuma yapmaya çalışacağım
çok teşekkür ederim

 

[zeze]

bu dosyaya ben, yolladığın makroyu uygulayamadım

 

[Ferhat Pazarçevirdi]

Peki hangi hücreler, bu kapsama dahil edilecek?

 

[zeze]

Peki hangi hücreler, bu kapsama dahil edilecek?

yeşil olan kısım

 

[Ferhat Pazarçevirdi]

Şaka yapıyorsunuz herhalde... Dosyanızda, YEŞİL renkten eser yok

 

[zeze]

Şaka yapıyorsunuz herhalde... Dosyanızda, YEŞİL renkten eser yok

altta X1 yazılı olan kısım yeşil değil mi :=)
X1 verilerin girileceği alan (C55-AF55 aralığı)

 

[Ferhat Pazarçevirdi]

Ekteki örneği inceleyiniz.

Benim hala renk konusunda tereddütüm var

 

[zeze]

benim excel renklerim farklı da biraz arka plan falan
ben yeşil gördüğüm için öyle söyledim neyse önemli değil sanırım
sorun halloldu çünkü
harika bişey bu çok teşekkür ederim dostum
ama ben bunu neden makro olarak kayıt edemediğimi bi türlü anlamadım...

 

[Ferhat Pazarçevirdi]

Çnükü siz kodları, bir modül sayfasına kopyalamışsınız. Bu kodlar standart modül sayfasında çalışmaz. Onun yerine; "X-MR" sayfasının kod bölümüne yazıldı. VBE'de VBA Porject pencerisnde; Sayfa1 (X-MR) yazan kısma iki kere tıklarsanız, kodları görürsünüz.

 

[zeze]

çok teşekkür ederim
ellerine sağlık