Excel çalışma sayfasına kayan tablo veya metin kutusu nasıl eklenir?

Çalışma sayfasını yukarı veya aşağı kaydırsanız bile çalışma sayfası ekranında her zaman görünmesini istediğiniz bazı önemli verileri içeren bir tablonuz veya metin kutunuz varsa. Bu ilginç bir görev olabilir, bu makale, bunu çözmek için hızlı bir numara sunacağım.

VBA kodu ile kayan tabloyu Excel'e ekleyin

VBA kodu ile kayan metin kutusunu Excel'e ekleyin

VBA kodu ile kayan tabloyu Excel'e ekleyin

Kayan tabloyu eklemenin doğrudan bir yolu yoktur, bu nedenle tablo verilerini bir görüntüye dönüştürmeniz ve ardından bitirmek için bir kod uygulamanız gerekir, lütfen şu şekilde yapın:

1. Görünmesini istediğiniz veri tablosunu seçin ve ardından kopya > Resim olarak kopyala altında Anasayfa sekmesi, ekran görüntüsüne bakın:

2. Dışarı fırladı Resmi Kopyala iletişim kutusunu seçin Ekranda gösterildiği gibi itibaren Görünüm bölüm ve seçin Resim altında oluşturulan bölümüne tıklayın, tıklayın OK iletişim kutusunu kapatmak için ve ardından resmin çıktısını almak için bir hücreye tıklayın, en sonunda Ctrl + V bu resmi yapıştırmak için ekran görüntüsüne bakın:

3. Tabloyu resme dönüştürdükten sonra, her zaman görünür olmasını istediğiniz tablo resmini içeren sayfa sekmesine sağ tıklayın ve seçin Kodu Görüntüle bağlam menüsünden ve açılan Uygulamalar için Microsoft Visual Basic penceresinde, aşağıdaki kodu boş Modüle kopyalayıp yapıştırın:

VBA kodu: Kayan tabloyu excel'e ekleyin:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    If Target.Cells.Count > 1 Then Exit Sub
        With ActiveSheet.Shapes("Picture1")
            .Top = ActiveWindow.VisibleRange.Top + 5
            .Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - .Width - 45
        End With
    Application.ScreenUpdating = False
End Sub

not: Bu kodda, Resim1 oluşturduğunuz resmin adıdır, lütfen ihtiyacınıza göre değiştirin.

4. Ardından, çalışma sayfasını kaydırıp bir hücreye tıkladığınızda, kod penceresini kaydedin ve kapatın, tablo resmi her zaman çalışma sayfasının sağ üst köşesinde tutulur.

VBA kodu ile kayan metin kutusunu Excel'e ekleyin

Kayan bir metin kutusu eklemek için, işte bu görevi çözmek için bir VBA kodu da var.

1. İlk olarak, bir metin kutusu eklemelisiniz. Geliştirici sekmesini tıklayın Geliştirici > Ekle > Metin Kutusu (ActiveX denetimi)ve ardından metin kutusunu çizin ve istediğiniz bilgileri metin kutusuna girin. Ekran görüntüsüne bakın:

2. Ardından her zaman görünür olmasını istediğiniz metin kutusunu içeren sayfa sekmesine sağ tıklayın ve Kodu Görüntüle bağlam menüsünden ve açılan Uygulamalar için Microsoft Visual Basic penceresi, aşağıdaki kodu boşluğa kopyalayıp yapıştırın modül:

VBA kodu: Excel'de kayan metin kutusu ekleyin:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    With ActiveWindow.VisibleRange
        TextBox1.Top = .Top + 5
        TextBox1.Left = .Left + .Width - TextBox1.Width - 45
    End With
    Application.ScreenUpdating = True
End Sub

not: Bu kodda, Metin Kutusu1 eklediğiniz metin kutusu adıdır, lütfen ihtiyacınıza göre değiştirin.

3. Ardından, çalışma sayfasını herhangi bir yere kaydırdığınızda, kod penceresini kaydedin ve kapatın, eklenen metin kutusu her zaman çalışma sayfasının sağ üst köşesinde tutulur.

---

En İyi Ofis Üretkenliği Araçları

Kutools for Excel Sorunlarınızın Çoğunu Çözer ve Verimliliğinizi% 80 Artırır

• Yeniden: Hızlıca yerleştirin karmaşık formüller, grafikler ve daha önce kullandığınız her şey; Hücreleri Şifrele şifre ile; Posta Listesi Oluşturun ve e-posta gönder ...
• Süper Formül Çubuğu (birden çok metin ve formül satırını kolayca düzenleyin); Okuma Düzeni (çok sayıda hücreyi kolayca okuyun ve düzenleyin); Filtrelenmiş Aralığa Yapıştır...
• Hücreleri / Satırları / Sütunları Birleştirme Veri kaybetmeden; Bölünmüş Hücre İçeriği; Yinelenen Satırları / Sütunları Birleştirme... Yinelenen Hücreleri Önleyin; Aralıkları Karşılaştır...
• Yinelenen veya Benzersiz'i seçin Satırlar; Boş Satırları Seçin (tüm hücreler boştur); Süper Bul ve Bulanık Bul Birçok Çalışma Kitabında; Rastgele Seçim ...
• Tam kopya Formül referansını değiştirmeden Birden Çok Hücre; Otomatik Referans Oluştur Birden Çok Sayfaya; Madde İşaretleri Ekle, Onay Kutuları ve daha fazlası ...
• Metni Çıkar, Metin Ekle, Konuma Göre Kaldır, Alanı Kaldır; Sayfalama Alt Toplamları Oluşturma ve Yazdırma; Hücre İçeriği ve Yorumları Arasında Dönüştür...
• Süper Filtre (filtre şemalarını kaydedin ve diğer sayfalara uygulayın); Gelişmiş Sıralama ay / hafta / gün, sıklık ve daha fazlasına göre; Özel Filtre kalın, italik ...
• Çalışma Kitaplarını ve Çalışma Sayfalarını Birleştirin; Tabloları anahtar sütunlara göre birleştirin; Verileri Birden Çok Sayfaya Bölme; Toplu dönüştürme xls, xlsx ve PDF...
• 300'den fazla güçlü özellik. Office / Excel 2007-2021 ve 365'i destekler. Tüm dilleri destekler. Kuruluşunuzda veya kuruluşunuzda kolay devreye alma. Tam özellikler 30 günlük ücretsiz deneme. 60 günlük para iade garantisi.

Devamı ... Ücretsiz indirin... Satın alma... 

---

Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir

• Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
• Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
• Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!

Devamı ... Ücretsiz indirin... Satın alma...