Excel'de kaydırırken bir grafiği her zaman görünür tutma nasıl yapılır?

Bir çalışma sayfasına bir grafik eklenmişse ve verileri görüntülemek için sayfayı aşağı kaydırdığınızda, aşağıdaki ekran görüntüsünde gösterildiği gibi grafik aynı anda görüntülenemez, bu da oldukça rahatsız edici olabilir. Bu makalede, sayfayı aşağı veya yukarı kaydırsanız bile bir grafiği her zaman görünür tutmak için bir VBA kodu tanıtacağım.

Bir grafiği her zaman görünür tut

Bir grafiği her zaman görünür tut

Sayfayı kaydırırken bir grafiği görünür tutmak için, aşağıdaki VBA kodunu uygulayarak bu sorunu çözebilirsiniz.

1. Grafiği görünür tutmak istediğiniz çalışma sayfası sekmesine sağ tıklayın ve Kod Görünümü bağlam menüsünden seçin. Ekran görüntüsüne bakın:

2. Açılan Microsoft Visual Basic for Applications penceresinde aşağıdaki kodu boş betiğe yapıştırın.

VBA: Grafiği her zaman görünür tut

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice20161111
    Dim CPos As Double
    Application.ScreenUpdating = False
    CPos = ActiveWindow.ScrollRow * ActiveCell.RowHeight
    ActiveSheet.ChartObjects("Chart 2").Activate
    ActiveSheet.Shapes("Chart 2").Top = CPos
    ActiveWindow.Visible = False
    Application.ScreenUpdating = True
End Sub

3. İletişim kutusunu kaydedip kapatın, ardından grafik, herhangi bir hücreye tıkladığınızda aşağı veya yukarı hareket edecektir.

Notlar:

(1) VBA kodunda, 'Chart 2', görünür tutmak istediğiniz grafik adıdır, ihtiyacınıza göre değiştirebilirsiniz.

(2) Bu VBA, bir grup grafiği her zaman görünür tutamaz.

Kutools AI ile Excel Sihirini Keşfedin

• Akıllı Yürütme: Hücre işlemleri gerçekleştirin, verileri analiz edin ve grafikler oluşturun—tümü basit komutlarla sürülür.
• Özel Formüller: İş akışlarınızı hızlandırmak için özel formüller oluşturun.
• VBA Kodlama: VBA kodunu kolayca yazın ve uygulayın.
• Formül Yorumlama: Karmaşık formülleri kolayca anlayın.
• Metin Çevirisi: Elektronik tablolarınız içindeki dil engellerini aşın.

Yapay zeka destekli araçlarla Excel yeteneklerinizi geliştirin. Şimdi İndirin ve daha önce hiç olmadığı gibi bir verimlilik deneyimi yaşayın!