Sabit Label Nesnesi

[Çetin Çelik]

Arkadaşlar Merhaba.

Küçük bir koda ihtiyacım var.

Örnek dosya linki : https://lifeboxtransfer.com/s/e00d18ab-2bb1-465f-b3d9-ca51c43235f7

dosyadaki label nesnesi, ben sayfanın alt satırlarına indiğimde yukarıda bölünmüş alanın altına gidiyor ve kayboluyor. benim gittiğim satıra göre yerini korusun istiyorum.

şimdiden herkese teşekkür ederim.

 

[ÖmerBey]

Merhaba,
İlgili sayfanın kod bölümüne aşağıdaki kodu kopyalayıp deneyiniz.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Label1.Top = Rows(ActiveWindow.ScrollRow).Top
End Sub

 

[Muzaffer Ali]

Merhaba.
Seçili hücrenin hizasına gelmesi için aşağıdaki kodu sayfanın kod kısmına kopyalayın.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Sayfa1.Label1.Top = ActiveCell.Top
End Sub

 

[Çetin Çelik]

Merhaba.
Seçili hücrenin hizasına gelmesi için aşağıdaki kodu sayfanın kod kısmına kopyalayın.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Sayfa1.Label1.Top = ActiveCell.Top
End Sub

Arkadaşlar kodlar işe yaramadı. Çünkü sayfanın alt hücrelerine inmek için mause'nin ortasındaki yuvarlak tuşu kullanıyorum genelde.

 

[Çetin Çelik]

Şöyle bişey yapabilirsek belki mümkün olur.
Label nesnesini sabit olan ilk 3 satırdan birine sabitleyebilirmiyiz. ama boyutu şuanki hali ile kalacak.

burdaki amaç şu. label nesnesinin altındaki hücrelerin kullanılmasını yada değiştirilmesini engellemek. Label nesnesi ise bilgi göstergesi. İşlem yapıldıkça label nesnesinin caption değişiyor.

Sayfanın "R4" ile "AY65536" arasındaki hücrelerinde herhangi bir değişiklik yapılmasını engelleyacak başka bir kod var ise bilgi ekranını (label caption olayı) başka bir şekilde çözebilirm. Sayfayı korumayı denedim ama kilitli hücrelere makro ile veri yazıldığı için olmadı.

 

[Çetin Çelik]

Merhaba,
İlgili sayfanın kod bölümüne aşağıdaki kodu kopyalayıp deneyiniz.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Label1.Top = Rows(ActiveWindow.ScrollRow).Top
End Sub

Arkadaşlar kodlar işe yaramadı. Çünkü sayfanın alt hücrelerine inmek için mause'nin ortasındaki yuvarlak tuşu kullanıyorum genelde.

 

[Muzaffer Ali]

R:AY arasını gizleyin.

Daha önce tüm hücreleri seçip, sağ tıklatın "Hücre Biçimlendir" den Koruma kısmındaki Kilitli tikini kaldırın.
sonra R:AY aralığını seçin Kilitli tik koyun.
R:AY gizleyin, sayfa koruması yapın.

 

[Çetin Çelik]

R:AY arasını gizleyin.

Daha önce tüm hücreleri seçip, sağ tıklatın "Hücre Biçimlendir" den Koruma kısmındaki Kilitli tikini kaldırın.
sonra R:AY aralığını seçin Kilitli tik koyun.
R:AY gizleyin, sayfa koruması yapın.

Teşekkür ederim. Gerçekten hiç ummadığım bir sonuç ama işimi gördü.