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

or

Excel'de birden çok seçim veya aralık nasıl kopyalanır?

Örneğin, büyük bir çalışma sayfanız var ve şimdi yalnızca seçilen bazı aralıkları kopyalayıp diğer çalışma sayfalarına dağıtmak istiyorsunuz. Ancak, birden çok aralığı seçip kopyala'yı tıkladığınızda, "Bu komut birden çok seçimde kullanılamaz" hatırlatan bir istem iletişim kutusu görünecektir. Bu durumda, birden çok seçili aralığı nasıl hızlı bir şekilde kopyalarsınız? İşte bu görevi çözmeniz için bazı püf noktaları.


Pano ile birden çok seçili aralığı kopyala

Yardımıyla panoya, seçilen tüm aralıkları aynı anda başka bir aralığa veya çalışma sayfasına yapıştırabilirsiniz. Lütfen aşağıdaki işlemleri yapın:

1. tıklayın Anasayfa > doc birden çok aralığı kopyala 09 içinde panoya görüntülemek için grup panoya Bölmesi.. Ekran görüntüsüne bakın:

2. Ve sonra ihtiyacınız olan seçili aralıkları birer birer kopyalayın. Aynı zamanda, kopyalanan aralıklar, panoya Bölmesi. yukarıdaki ekran görüntüsüne bakın:

3. Kopyalanan tüm aralıkları yapıştıracağınız hedef aralığın ilk hücresini seçin ve Tümünü Yapıştır düğmesi panoya Bölme.

Ve sonra kopyalanan tüm aralıklar, belirtilen hedef aralığına yapıştırılmıştır.

Birçok çalışma sayfasından / çalışma kitabından birden çok seçimi tek bir çalışma sayfasına / çalışma kitabına kolayca birleştirin

Farklı çalışma kitaplarından düzinelerce sayfayı tek bir sayfada birleştirmek yorucu olabilir. Ancak Kutools for Excel's ile Birleştir (çalışma sayfaları ve çalışma kitapları) yardımcı program, sadece birkaç tıklama ile halledebilirsiniz! Tam Özellikli Ücretsiz Deneme 30 günlük!
reklam birleştirme sayfaları kitaplar 1

Kutools for Excel - Excel için 300'den fazla kullanışlı araç içerir. 30 günlük tam özellikli ücretsiz deneme, kredi kartı gerekmez! Şimdi alın

VBA kodu ile birden fazla seçili aralığı kopyalayın

VBA kodu ile, birden fazla seçili aralığı kopyalayabilir ve bunları başka bir çalışma sayfasına yapıştırabilirsiniz.

1. Tutma Ctrl tuşuna basın ve kullanmak istediğiniz bitişik olmayan birden çok aralığı seçin.

2. Basın Ara Toplam + F11 tuşlarını aynı anda açmak için Uygulamalar için Microsoft Visual Basic Pencere, tıklayın Ekle > modülve aşağıdaki kodu Modüle girin:

Seçenek Açık Alt CopyMultipleSelection () Dim SelAreas () As Range Dim PasteRange As Range As UpperLeft As Integer Dim NumAreas As Integer, i As Integer Dim TopSow As Long, LeftCol As Integer Dim RowOffset As Long, ColOffset As Integer Dim NonEmptyCellCount As Tamsayı Olarak Dim bir aralık seçilmezse TürAdı (Seçim) <> "Aralık" Sonra Mesaj Kutusu "Kopyalanacak aralığı seçin. Çoklu seçime izin verilir." Exit Sub End If 'Alanları ayrı Range nesneleri olarak sakla NumAreas = Selection.Areas.Count ReDim SelAreas (1 To NumAreas) For i = 1 To NumAreas Set SelAreas (i) = Selection.Areas (i) Next' Sol üst kısmı belirleyin çoklu seçimdeki hücre TopRow = ActiveSheet.Rows.Count LeftCol = ActiveSheet.Columns.Count i = 1 To NumAreas If SelAreas (i) .Row <TopRow Then TopRow = SelAreas (i) .Row If SelAreas (i) .Column <LeftCol Then LeftCol = SelAreas (i) .Column Next Set UpperLeft = Hücreler (TopRow, LeftCol) 'Yapıştırma adresini alın Hatada Devam Ettir Sonraki Ayarla PasteRange = Application.InputBox _ (Prompt: = "Yapıştırma için sol üst hücreyi belirtin aralık: ", _ Başlık: =" Çoklu Seçimi Kopyala ", _ Tür: = 8) Hata Durumunda Git 0 'İptal Edildiyse Çık TürAdı (PasteRange) <>" Aralık "Sonra Alttan Çık' Yalnızca sol üst hücrenin kullanılan Set PasteRange = PasteRange.Range ("A1") 'Mevcut veriler için yapıştırma aralığını kontrol et NonEmptyCellCount = 0 i = 1 için NumAreas RowOffset = SelAreas (i) .Row - TopRow ColOffset = Sel Alanlar (i) .Column - LeftCol NonEmptyCellCount = NonEmptyCellCount + _ Application.CountA (Range (PasteRange.Offset (RowOffset, ColOffset), _ PasteRange.Offset (RowOffset + SelAreas (i) .Rows.Count - 1, _ ColOffset + SelAreas (i) .Columns.Count - 1))) Sonraki i 'Yapıştırma aralığı boş değilse kullanıcıyı uyarın Eğer NonEmptyCellCount <> 0 Sonra _ If MsgBox ("Mevcut verilerin üzerine yazılsın mı?", vbQuestion + vbYesNo, _ "Çoklu Seçimi Kopyala ") <> vbYes Sonra Alt Çık 'Her alanı kopyalayıp yapıştırın i = 1 için NumAreas RowOffset = SelAreas (i) .Row - TopRow ColOffset = SelAreas (i) .Column - LeftCol SelAreas (i). RowOffset, ColOffset) Next i End Sub

3. Ardından, koşmak kodu çalıştırmak için düğmeye basın.

4. Ve şimdi aralıkları açılışta yapıştırmak için lütfen bir hücre belirtin Çoklu Seçimi Kopyala iletişim kutusunu tıklayın ve OK buton. Ekran görüntüsüne bakın:


Bir çalışma sayfasından birden çok seçili aralığı hızla kopyalayın

The Birden Fazla Aralığı Kopyala yarar Kutools for Excel Etkin çalışma sayfasından birden çok aralığı kolayca kopyalamanıza yardımcı olabilir. Lütfen aşağıdaki işlemleri yapın:

Kutools for Excel - Excel için 300'den fazla kullanışlı araç içerir. 30 günlük tam özellikli ücretsiz deneme, kredi kartı gerekmez! Şimdi alın

1. Kullanmak istediğiniz aralıkları tuşunu basılı tutmadan tek tek seçin. Ctrl tuşuna ve ardından tıklayın Kutools > Aralıkları Kopyala. Ekran görüntüsüne bakın:

2. In Birden Fazla Aralığı Kopyala iletişim kutusu, işaretleyin Tümü opsiyon Özel yapıştır bölümüne tıklayın ve Tamam button. Yukarıdaki ekran görüntüsüne bakın:

Not: Satır yüksekliğini ve sütun genişliğini orijinal aralıklar olarak tutmak istiyorsanız, lütfen kontrol edin Satır yüksekliği dahil seçenek ve Sütun genişliği dahil Birden Çok Aralık Kopyala iletişim kutusundaki seçeneği.

3. Ve aralıkları aşağıdaki istem kutusuna yapıştırmak için bir hücre belirtin ve OK düğmesine basın.

Ve şimdi seçilen tüm aralıklar, orijinal seçimlerle aynı satır yüksekliği ve sütun genişliğiyle belirtilen hücreye yapıştırılacaktır.

Birden Çok Aralığı Kopyalama yardımcı programı hakkında daha fazla bilgi için burayı tıklayın       

Kutools for Excel - Excel için 300'den fazla kullanışlı araç içerir. 30 günlük tam özellikli ücretsiz deneme, kredi kartı gerekmez! Şimdi alın


Birçok çalışma sayfasından / çalışma kitabından birden çok aralığı kopyalayın

Kutools for Excel başka bir Çalışma Sayfalarını Birleştirin birçok çalışma sayfasından veya birçok çalışma kitabından birden çok aralığı Excel'de kolayca kopyalamak için yardımcı program. Lütfen aşağıdaki işlemleri yapın:

Kutools for Excel - Excel için 300'den fazla kullanışlı araç içerir. 30 günlük tam özellikli ücretsiz deneme, kredi kartı gerekmez! Şimdi alın

1. tık Kutools Plus > Birleştirmek.

2. Çalışma Sayfalarını Birleştir - Adım 1/3 iletişim kutusunun açılışında, lütfen Çalışma kitabındaki birden çok çalışma sayfasını tek bir çalışma sayfasına birleştirin seçeneğini tıklayın ve Sonraki düğmesine basın.

3. Çalışma Sayfalarını Birleştir - Adım 2/3 iletişim kutusunda, lütfen aşağıdaki işlemleri gerçekleştirin:

(1) Çalışma kitabını seçin Çalışma kitabı listesi bölümünü ve ardından Araştır her çalışma sayfasından aralığı belirtmek için her çalışma sayfasının arkasındaki düğmesi;
(2) Arkadaşlarınızdan aralıkları kopyalayacağınız diğer çalışma kitaplarını eklemek için düğmesine basın ve ardından eklenen çalışma kitabındaki aralıkları belirtmek için yukarıda (1) öğesini tekrarlayın.
(3) Bitiş düğmesine basın.

Kutools for Excel - Excel için 300'den fazla kullanışlı araç içerir. 30 günlük tam özellikli ücretsiz deneme, kredi kartı gerekmez! Şimdi alın

4. Ardından bir Kutools for excel iletişim kutusu çıkar ve kombinasyon senaryosunu kaydetmenizi ister. Lütfen tıklayın Evet düğmesi veya Yok hayır İhtiyacınız olan düğme.

Şimdiye kadar birden çok çalışma sayfasından veya çalışma kitabından belirtilen tüm aralıklar kopyalandı ve yeni bir çalışma kitabına yapıştırıldı.


Demo: Bir çalışma sayfasından birden çok seçili aralığı kopyalayın

Demo: Birçok çalışma kitabından / çalışma sayfasından birden çok seçili aralığı kopyalayın


Kutools for Excel Excel için 300'den fazla kullanışlı araç içerir ve sınırlama olmaksızın 30 gün içinde ücretsiz olarak deneyebilirsiniz. Hemen İndirin ve Ücretsiz Deneyin!

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-2019 ve 365'i destekler. Tüm dilleri destekler. Kuruluşunuzda veya kuruluşunuzda kolay dağıtım. Tam özellikli 30 günlük ücretsiz deneme. 60 günlük para iade garantisi.
kte sekmesi 201905

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!
ofis tabanı
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.
    peter.habershon@eis2win.co.uk · 2 years ago
    Hi there,
    Great code but wondered how I can paste values rather than just paste?
    Thanks :)
  • To post as a guest, your comment is unpublished.
    Peter Habershon · 2 years ago
    Hi there,
    Great post and the VBA code works perfectly. Is it possible to change the code to paste special > values? If so, how?
    Thanks!
  • To post as a guest, your comment is unpublished.
    jacobkring@hotmail.com · 3 years ago
    Hi. Nice code, works great. Is it possible to modify the code in a way such that it is possible to insert/paste the market row/ranges multiple times instead of just one time?
    • To post as a guest, your comment is unpublished.
      kelly.extendoffice@gmail.com · 3 years ago
      Hi Jacob,
      Maybe this Insert Title Rows feature of Kutools for Excel can solve your problem.
      https://www.extendoffice.com/product/kutools-for-excel/excel-insert-title-rows.html
  • To post as a guest, your comment is unpublished.
    kmmanahan · 3 years ago
    Hi! How do I use the same VBA Code above but instead of simply pasting, I would like it to paste special for just the values. The table I am putting the values (constants) into is already formatted and with totals (formulas)
    Thanks so much in advance!
    • To post as a guest, your comment is unpublished.
      · 3 years ago
      Hi Katrina Manahan,

      Please open the Microsoft Visual Basic for applications window, and create a new Module, just press CTRL + V to paste the VBA code directly. The sequence numbers before code won't be pasted.
  • To post as a guest, your comment is unpublished.
    Steve O · 5 years ago
    Thanks for the code, works perfectly. This odd lack of function within Excel has stumped me many times in the past. It's normally quicker in the end to work around it, but in this case I have 4000 individually colour-coded cells so any work-around would have taken a long time, so I'm very grateful.
    Steve
  • To post as a guest, your comment is unpublished.
    David Hedin · 5 years ago
    Hi,
    Is it possible to adjust the code so that the copied cells can be pasted in another sheet? Now I get the error message "400" when I attempt this. I use Office 2010.

    Also, is it possible to copy so that empty lines are deleted? I have a big document and I copy some cells with hundreds of non-copied rows between them. This makes for a rather bulky output.
  • To post as a guest, your comment is unpublished.
    Yunivor · 5 years ago
    I found that if you have the Clipboard task plane open you can copy multiple rows simply using ctrl+C and paste them in order with crtl+V using Excel 2007.
  • To post as a guest, your comment is unpublished.
    M · 6 years ago
    Thank you SOOOOOO much - what a great site
  • To post as a guest, your comment is unpublished.
    Lyn Mc · 6 years ago
    Found above explanation of options to copy multiple ranges very helpful - thanks! I used the 'clipboard' option to copy multiple rows. Had to select each group of consecutive rows and copy it, move on and select next row or group of consecutive rows and copy it, etc.. But after this its easy, go to where you want to paste them, eg a new sheet, and click 'Paste all' from the Clipboard and all the rows are copied to there with out any gaps! Exactly what I wanted - thanks again!
  • To post as a guest, your comment is unpublished.
    Abani Pattanayak · 6 years ago
    I want to select the rows like 1, 5,6,10. so how can i copy these rows ???
    • To post as a guest, your comment is unpublished.
      David Hedin · 5 years ago
      In this case you can just select the rows and copy them as usual.
      • To post as a guest, your comment is unpublished.
        K Raj · 4 years ago
        How can I copy cell a1, e5, g2, and so on.... (more than 1000 cells in same column) and paste them into b1, f5, h2 (right into the next column in same row.)