Soru Hücremdeki formülü gizleyemiyorum

[sesar]

Merhaba;
Formülümü gizleyip kitlemek istiyorum. Fakat bu işlemi yaptığımda filtreleme çalışmıyor.

Önce tüm sütun satırları seçip kitli ve gizli tik atıp kaldırıyorum. Sonra iki hücremin sütunlarını seçip kitle ve gizle diyorum. Sonra sayfayı koru diyorum.
Altta tüm sekmeleri seçiyorum.

Formülü gizlemek ve kitlemek istediğim hücreler yeşil olanlardır ( SİSTEM DURUM - SİSTEM TARİH )

Hatta keşke düz yazı olarak gözükse daha şık olur.

Nasıl yapabilirim?
Teşekkürler.

 

[Muzaffer Ali]

Merhaba.

Yaptığınız şeyi değil de ne yapmak istediğinizi söyleyip bu doğrultuda sorarsanız daha anlaşılır olur.

Hangi hücrelerdeki formüllerin görünmesini istemiyorsunuz?
Yeşil başlıklı hücrelerde formül zaten yok onları neden Kilitlemek istiyorsunuz?

 

[sesar]

Formülleri kaldırmıştım. Şu an yükledim formülle çalışan dosyayı.

Ayrıca;
Başka bir excel dosyasını farklı bir sekmede açtırıp ondan veri çektiriyorum. Farklı sekmede açılan dosyayı da sürekli sistemden çekerek üzerine kaydediyorum güncellenmiş oluyor. Bütün dosyalarımda bu şekilde ilerliyorum

Bu veri çekme mantığında da hatam varsa bilgi verirseniz sevinirim.

 

[sesar]

yardımcı olunursa sevinirim.

 

[sesar]

Merhaba.

Yaptığınız şeyi değil de ne yapmak istediğinizi söyleyip bu doğrultuda sorarsanız daha anlaşılır olur.

Hangi hücrelerdeki formüllerin görünmesini istemiyorsunuz?
Yeşil başlıklı hücrelerde formül zaten yok onları neden Kilitlemek istiyorsunuz?

Doğru dosyayı yükledim hocam.

 

[Ömer]

Merhaba,

Eklediğiniz dosyada (üretim sayfası), sayfayı koruma yapınca filtreleme yapılıyor. ?

 

[sesar]

Merhaba,

Eklediğiniz dosyada (üretim sayfası), sayfayı koruma yapınca filtreleme yapılıyor. ?

Merhaba;
Sütun başlıklarında süzme işlemi yapılabiliyor. Fakat üst barda Filtre, Temizle vs butonları deaktif oluyor.

O butonların çalışma imkanı yok mu korumalı sayfada?

 

[Ömer]

Maalesef istediğiniz gibi olmuyor.

Amacınız formülleri gizlemekse, formülleri makro ile alabilirsiniz.

Üretim durumu sayfasının kod bölümüne kopyalayın. Sayfa aktif olduğunda kodlar kendini günceller.
Sayfa koruması yapmanıza gerek yok.

Private Sub Worksheet_Activate()

    Dim i As Long, S1 As Worksheet
    
    Set S1 = Sheets("Sayfa1")
    
    Application.ScreenUpdating = False
    Range("V2:W" & Rows.Count).ClearContents

    For i = 2 To Cells(Rows.Count, "A").End(xlUp).Row
        Cells(i, "V") = WorksheetFunction.VLookup(Cells(i, "A"), S1.[A:L], 10, 0)
        Cells(i, "W") = WorksheetFunction.VLookup(Cells(i, "A"), S1.[A:L], 12, 0)
    Next i
    
End Sub