Arama butonu
Bu konudaki kullanıcılar: 1 misafir
2
Cevap
709
Tıklama
0
Öne Çıkarma
Excelde sekme sabitleme
Ş
geçen yıl
Yarbay
Konu Sahibi

Arkadaşlar excel dosyasında birden çok sekme mevcut ilk sekmeyi sabitlemek istiyorum.
Bir kaç formül buldum fakat ekleyip kaydettiğimde tekrar excel dosyasını açtığımda hiç birisi işe yaramadı. Ne önerirsiniz?

DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz.

Üye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.

Üye Ol Şimdi Değil



S
geçen yıl
Yarbay

Direk sabitleme yok.
1 2 yöntem var.
Birisi, son 2 sekme arasında gidip gelme (Bir kısayol tuşu ile son 2 sekme arasında geçiş yapma yöntemi)
Diğeri bir sekmeyi hep görünür yapma (Ama o sekme sürekli yer değiştirecek ve seçtiğin sekmenin hemen önüne kayacak)
2. için yöntemi güzelce anlatan bir link:
https://login.microsoftonline.com/common/oauth2/v2.0/authorize?client_id=a81d90ac-aa75-4cf8-b14c-58bf348528fe&redirect_uri=https%3A%2F%2Fanswers.microsoft.com&response_type=code%20id_token&scope=openid%20profile&state=OpenIdConnect.AuthenticationProperties%3DaJqz7XcFJUu6Cm4HveGEk1n7-80OqQ5TdwuR4TNvpLudqgrFqXTOd9swZEPECqs5Y39r6qHnxB39wR__PtOh7CnbZfsjpaGfB2nse6b6sKnqpSJKtkUnqcWSmdONlik6XYZKIUFU6EkOrwzDPwSsgk-Uw2CPkl4AXQ2RBxp-ub4KCZRvJBVPngkMh-e_1Ni0agnx55ERfdD4YgaGlMuMQOXug9_igIiM_V689gjAlmjS0Mnvgqeou8Oji_WE2oorg-tESEUaRMKFEuqtaNHEqIAtXx3ktOikDqXVc3XsLZK0yl-xQpoYRvFveWiqvUuuEZ7H-55R5IqDHYQbMeITnQ&response_mode=form_post&nonce=638499911099067758.MDk0MjIzYWUtMjczOC00YzY0LTljMjMtYzdiMmZkZjMxYjkzY2I1YjIwMzktNGY2Yy00MzVhLTgzY2ItN2Q5N2ZmNDFhYTk4&nopa=2&prompt=none&x-client-SKU=ID_NET472&x-client-ver=6.17.0.0

ÖZetle, makro kısmında, Thisworkbook altına şu kodu ekliyorsun (SekmeAdı yazan 3 yeri istediğin sekmenin adı yap).

quote:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)


Application.EnableEvents = False


Application.ScreenUpdating = False


If Application.ActiveSheet.Index <> Application.Sheets("SekmeAdı").Index Then


  Application.Sheets("SekmeAdı").Move Before:=Application.Sheets(Application.ActiveSheet.Index)


  Application.Sheets("SekmeAdı").Activate


  Sh.Activate


End If


Application.ScreenUpdating = True


Application.EnableEvents = True


End Sub


Ancak dosyayı farklı kaydet yapıp xlsm (Excel Makro Enabled Workbook) olarak kaydetmen lazım.
Ve ilk açılışta üstte mçıkan makroları çalıştır butonuna bu dosya için bir kereliğine onay vermen lazım.
Ancak o zaman makro çalışır.





< Bu mesaj bu kişi tarafından değiştirildi suphion -- 29 Nisan 2024; 15:38:29 >
Bu mesaja 1 cevap geldi.
DH Mobil uygulaması ile devam edin. Mobil tarayıcınız ile mümkün olanların yanı sıra, birçok yeni ve faydalı özelliğe erişin. Gizle ve güncelleme çıkana kadar tekrar gösterme.