Etkin çalışma sayfasındaki tüm tabloları aralıklara nasıl dönüştürürsünüz?
Excel'de veri kaydetmek için bazı tablolar kullanıyor olabilirsiniz; ancak bazen, daha kolay düzenleme yapabilmek için bu tabloyu bir aralığa dönüştürmek isteyebilirsiniz. Genellikle aynı anda yalnızca bir tabloyu aralığa dönüştürebilirsiniz. Ancak bir sayfada onlarca tablo varsa ve bunların tamamını aralığa dönüştürmeniz gerekiyorsa bu işlem oldukça yorucu olabilir. İşte Geçerli Çalışma Sayfası içindeki tüm tabloları tek seferde aralığa dönüştürebilen bir VBA kodu.
Geçerli Çalışma Sayfası içindeki tüm tabloları VBA ile aralığa dönüştürme
Geçerli Çalışma Sayfası içindeki tüm tabloları VBA ile aralığa dönüştürme
1. Dönüştürmek istediğiniz tabloları içeren sayfayı etkinleştirin, ardından Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.
2. Ekle > Modül seçeneğine tıklayarak yeni bir modül betiği oluşturun ve aşağıdaki kodu boş modüle kopyalayıp yapıştırın.
VBA: Geçerli Çalışma Sayfası içindeki tüm tabloları aralığa dönüştürme
Sub ConvertTablesToRange()
'UpdatebyExtendoffice20180530
Dim xSheet As Worksheet
Dim xList As ListObject
Set xSheet = ActiveWorkbook.ActiveSheet
For Each xList In xSheet.ListObjects
xList.Unlist
Next
End Sub
3. Kodu çalıştırmak için F5 tuşuna basın. Artık geçerli çalışma sayfasındaki tüm tablolar başarıyla aralığa dönüştürüldü.
En İyi Office Verimlilik Araçları
Excel becerilerinizi Kutools for Excel ile güçlendirin ve hiç olmadığı kadar verimli çalışmanın keyfini çıkarın.Kutools for Excel, üretkenliğinizi artırmak ve Zamanı Kaydet için 300'den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli arayüz getirir ve işlerinizi çok daha kolay hale getirir
- Word, Excel ve PowerPoint içinde sekmeli düzenleme ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
- Birden fazla belgeyi yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açın ve oluşturun.
- Günlük üretkenliğinizi %50 artırır ve size her gün yüzlerce fare tıklamasından tasarruf sağlar!
Tüm Kutools eklentileri — tek bir yükleyiciyle!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint için eklentileri ile birlikte Office Tab Pro’yu da içerir; bu da Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek yükleyici, tek lisans— birkaç dakikada kurulum (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında verimliliği akıcı hale getirir
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat-performans— tek tek eklenti satın almaya göre tasarruf edin