Note: The other languages of the website are Google-translated. Back to English
Oturum aç  \/ 
x
or
x
Kaydol  \/ 
x

or

Word belgesindeki Tüm Tablolar Nasıl Seçilir?

Word'de bir tablo seçmek kolaydır. nokta-seçme-tablo-sembolü aşağıda gösterilen ekran görüntüsü gibi tablonun sol üst köşesindeki düğmesi. Ayrıca Tablo Seç özelliğine sahip bir tablo da seçebilirsiniz. Ancak, Word belgesinde tüm tabloları aynı anda hızlıca seçmenin bir yolu var mı? Bu makaledeki yöntemler, üstesinden gelmenize yardımcı olacaktır. 


VBA kodu ile Word'deki tüm tabloları seçin

Kutools for Word ile Word'deki tüm tabloları kolayca seçin


VBA kodu ile Word'deki tüm tabloları seçin

1. Basın Ara Toplam + F11 tuşlarını açmak için Uygulama için Microsoft Visual Basic pencere.

2. Açılışta Uygulamalar için Microsoft Visual Basic Pencere, tıklayın Ekle > modül, Ardından aşağıdaki VBA kodunu kopyalayıp Modül penceresine yapıştırın;

VBA kodu: Geçerli belgedeki tüm tabloları seçin:

Sub selecttables()
Dim mytable As Table

For Each mytable In ActiveDocument.Tables
mytable.Range.Editors.Add wdEditorEveryone
Next
ActiveDocument.SelectAllEditableRanges (wdEditorEveryone)
ActiveDocument.DeleteAllEditableRanges (wdEditorEveryone)
End Sub

3. Tuşuna basın. F5 kodu çalıştırmak için anahtar

Ardından, geçerli belgedeki tüm tablolar hemen seçilir.


Kutools for Word ile Word'deki tüm tabloları kolayca seçin

Bir belgedeki tüm tabloları seçmek için bir VBA kodu kullanmakla karşılaştırma, Kutools for Word Tabloları Seçin yardımcı program oldukça kullanışlıdır. Bu özelliği, bir seçimdeki veya tüm dokümandaki tabloları seçmek için kullanabilirsiniz. Lütfen aşağıdaki işlemleri yapın:

Kutools for Word : 100'den fazla kullanışlı Word eklentisiyle, 60 gün içinde hiçbir sınırlama olmaksızın ücretsiz denemek.

Le Marchê'nin deri koleksiyonlarını görmek için Kutools > tablolar > Tabloları Seçin. Ekran görüntüsüne bakın:

not: Seçimdeki tabloları seçmek için önce aralığı seçmeniz ve ardından özelliği uygulamanız gerekir.

Ardından sonuçları aşağıdaki gibi görebilirsiniz.

Seçimdeki tabloları seçin:

Tüm belgedeki tabloları seçin:

Bu yardımcı programı ücretsiz olarak denemek istiyorsanız, lütfen şu adrese gidin: yazılımı ücretsiz indirin önce ve sonra yukarıdaki adımlara göre işlemi uygulamaya gidin.


Demo: Kutools for Word ile Word'deki tüm tabloları kolayca seçin




Önerilen Word Üretkenlik Araçları

 

Kutools For Word - Word İçin 100'den Fazla Gelişmiş Özellik,% 50 Zaman Kazanın

  • Karmaşık ve tekrarlanan işlemler saniyeler içinde tek seferlik işlem yapılabilir.
  • Klasörler arasında birden çok görüntüyü aynı anda Word belgesine ekleyin.
  • Birden çok Word dosyasını klasörler arasında istediğiniz sırada birleştirin ve birleştirin.
  • Geçerli belgeyi başlık, bölüm sonu veya diğer kriterlere göre ayrı belgelere bölün.
  • Dosyaları Doc ve Docx, Docx ve PDF, ortak dönüştürme ve seçim için araçlar koleksiyonu vb. Arasında dönüştürün ...

Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Alex · 4 years ago
    It seeems that this macros does not work in Word 2016
    • To post as a guest, your comment is unpublished.
      Suril · 4 years ago
      It works in Word 2016. What error are you getting?
      • To post as a guest, your comment is unpublished.
        Alex · 4 years ago
        I understand already.
        For correct work macros cursor must to be not in table when you call macros.
        Thank you.
  • To post as a guest, your comment is unpublished.
    Iqbal · 4 years ago
    There are multiple tables in a document (about 200). I want to select all these tables only and paste them in a new document in the table format. When I select the tables as per above procedure then during paste operation it pastes them as text and not as table. Can you please help me?
  • To post as a guest, your comment is unpublished.
    Suril · 4 years ago
    The following modified code selects all tables, except tables having only one row:
    Sub SelAllTbls()
    ActiveDocument.DeleteAllEditableRanges (-1)
    Dim Tbl As Table
    For Each Tbl In ActiveDocument.Tables
    If Tbl.Rows.Count > 1 Then
    Tbl.Range.Editors.Add (-1)
    End If
    Next
    ActiveDocument.SelectAllEditableRanges (-1)
    ActiveDocument.DeleteAllEditableRanges (-1)
    End Sub

    The following code select only the header rows:
    Sub selallHeaders()
    On Error Resume Next
    ActiveDocument.DeleteAllEditableRanges (-1)
    Dim Tbl As Table
    For Each Tbl In ActiveDocument.Tables
    Tbl.Rows(1).Range.Editors.Add (-1)
    Next
    ActiveDocument.SelectAllEditableRanges (-1)
    ActiveDocument.DeleteAllEditableRanges (-1)
    End Sub

    I have many more such codes that select last rows, all bullets, small / long paras, etc. Watch my following video:
    https://www.youtube.com/watch?v=p_ZhufliFw8
  • To post as a guest, your comment is unpublished.
    Vinoth Murali · 4 years ago
    Wonderful I got the solution by using the VBA code. Thank you so much
  • To post as a guest, your comment is unpublished.
    JPF · 5 years ago
    Nifty code at first but it definitely corrupted a bunch of tables in Word 2010. Screwed up my file pretty good and had to revert back to an earlier version. Be wary!
  • To post as a guest, your comment is unpublished.
    rodrigo · 6 years ago
    excellent macro and very easy
  • To post as a guest, your comment is unpublished.
    refaat · 7 years ago
    thank you so much
    he is good program but after few days stopped and require password and user name