Note: The other languages of the website are Google-translated. Back to English
Masuk  \/ 
x
or
x
Daftar  \/ 
x

or

Bagaimana cara menggabungkan atau menggabungkan lembar kerja atau buku kerja menjadi satu lembar kerja?

Dalam pekerjaan sehari-hari, kami mungkin mengalami masalah yang menggabungkan ratusan lembar atau buku kerja menjadi satu lembar untuk menganalisis data yang membutuhkan banyak waktu jika Anda menggunakan perintah Salin dan Tempel di Excel. Di sini, di tutorial ini, saya akan memberikan beberapa tip untuk menyelesaikan pekerjaan ini dengan cepat.

doc menggabungkan 1

NAVIGASI CEPAT

Menggabungkan semua lembar workbook aktif menjadi satu lembar dengan VBA
Menggabungkan puluhan lembar atau workbook menjadi satu worksheet / workbook dengan klik
Menggabungkan dua tabel menjadi satu dan memperbarui dengan kolom dengan klik
Unduh file contoh


Menggabungkan semua lembar workbook aktif menjadi satu lembar dengan VBA

Di bagian ini, saya memberikan kode VBA yang akan membuat lembar baru untuk mengumpulkan semua lembar buku kerja yang aktif saat Anda menjalankannya.

1. Aktifkan workbook yang ingin Anda gabungkan semua sheetnya, lalu tekan + kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Di jendela yang muncul, klik Menyisipkan > Modul untuk membuat skrip Modul baru.

3. Salin kode di bawah ini dan tempelkan ke skrip.

Sub Combine()
'UpdatebyExtendoffice
Dim J As Integer
On Error Resume Next
Sheets(1).Select
Worksheets.Add
Sheets(1).Name = "Combined"
Sheets(2).Activate
Range("A1").EntireRow.Select
Selection.Copy Destination:=Sheets(1).Range("A1")
For J = 2 To Sheets.Count
Sheets(J).Activate
Range("A1").Select
Selection.CurrentRegion.Select
Selection.Offset(1, 0).Resize(Selection.Rows.Count - 1).Select
Selection.Copy Destination:=Sheets(1).Range("A65536").End(xlUp)(2)
Next
End Sub
doc menggabungkan 2

4. tekan F5 key, maka semua data di seluruh sheet telah digabungkan ke dalam sheet baru bernama Combined yang ditempatkan di depan semua sheet.


atau bergerak

Apakah Anda Ingin Mendapatkan Gaji dan Banyak Waktu Untuk Menemani Keluarga?

Tab Office Meningkatkan Efisiensi Anda Hingga 50% Di Microsoft Office Bekerja Sekarang

Luar biasa, mengerjakan dua atau lebih dokumen lebih mudah dan lebih cepat daripada mengerjakan satu dokumen.

Dibandingkan dengan browser terkenal, alat tab di Office Tab lebih kuat dan lebih efisien.

Kurangi ratusan klik mouse dan ketikan keyboard setiap hari untuk Anda, ucapkan selamat tinggal pada tangan mouse sekarang.

Jika Anda biasanya bekerja di banyak dokumen, Office Tab akan menjadi penghemat waktu yang tepat untuk Anda.

Uji coba gratis 30-hari, tidak perlu kartu kredit.

Baca SelengkapnyaDownload Gratis Sekarang


Menggabungkan puluhan lembar atau workbook menjadi satu worksheet / workbook dengan klik

Dengan VBA, Anda hanya bisa menggabungkan lembar di buku kerja aktif, tapi bagaimana Anda bisa menggabungkan lembar di seluruh buku kerja ke lembar atau buku kerja?

Gabungkan lembar di seluruh buku kerja menjadi satu lembar
doc menggabungkan 18

Gabungkan lembar di seluruh buku kerja menjadi satu buku kerja
doc menggabungkan 3

Untuk menyelesaikan pekerjaan ini dan memenuhi persyaratan lain pada kombinasi lembaran, Menggabungkan fungsi telah dikembangkan dengan empat skenario kombinasi:

  • Gabungkan beberapa lembar atau buku kerja menjadi satu lembar
  • Gabungkan beberapa lembar atau buku kerja menjadi satu buku kerja
  • Gabungkan lembar nama yang sama menjadi satu lembar
  • Gabungkan nilai di seluruh lembar atau buku kerja menjadi satu lembar

Di sini mengambil opsi kedua sebagai contoh:

Gabungkan beberapa lembar atau buku kerja menjadi satu buku kerja

Setelah pemasangan gratis Kutools for Excel, lakukan seperti di bawah ini:

1. Aktifkan Excel, klik Kutools Plus > Menggabungkan, sebuah dialog muncul untuk mengingatkan Anda bahwa buku kerja yang ingin Anda gabungkan harus ditutup. Klik OK untuk melanjutkan.
doc menggabungkan 4
doc menggabungkan 5

2. Dalam Gabungkan Lembar Kerja langkah 1 dialog, periksa Gabungkan beberapa lembar kerja dari buku kerja menjadi satu buku kerja pilihan. Klik Berikutnya untuk melanjutkan ke langkah wisaya berikutnya.
doc menggabungkan 6

3. klik menambahkan > fillet or Map untuk menambahkan buku kerja yang ingin Anda gabungkan ke Daftar buku kerja panel, lalu Anda dapat menentukan lembar kerja mana yang akan digabungkan dengan memeriksa nama di Daftar lembar kerja panel. Klik Berikutnya untuk pergi ke langkah terakhir wizard.
doc menggabungkan 7

4. Pada langkah ini, tentukan pengaturan yang Anda butuhkan. Lalu klik selesai.
doc menggabungkan 8

5. Sebuah jendela muncul untuk Anda memilih folder untuk menempatkan buku kerja gabungan, lalu klik Hemat.
doc menggabungkan 9

Sekarang workbook telah digabungkan menjadi satu workbook. Dan di depan semua lembar, lembar master bernama Kutools for Excel juga dibuat yang mencantumkan beberapa informasi tentang lembar dan tautan untuk setiap lembar.
doc menggabungkan 10

Demo: Gabungkan lembaran / workbook menjadi satu sheet atau workbook

Kutools for Excel: 200 + alat praktis yang berguna, menyederhanakan tugas rumit di Excel menjadi beberapa klik.

Ucapkan Selamat Tinggal Pada Tangan Tikus dan Spondylosis Serviks Sekarang

300 alat canggih Kutools for Excel menyelesaikan 80% tugas Excel dalam hitungan detik, menarik Anda keluar dari ribuan klik mouse.

Mudah menangani 1500 skenario kerja, tidak perlu membuang waktu untuk mencari solusi, punya banyak waktu untuk menikmati hidup Anda.

Tingkatkan produktivitas 80% untuk 110000+ orang yang sangat efektif setiap hari, tentu saja termasuk Anda.

Tidak lagi tersiksa oleh formula dan VBA yang menyakitkan, berikan otak Anda istirahat dan suasana kerja yang menyenangkan.

Uji coba gratis 30 hari dengan fitur lengkap, uang kembali 30 hari tanpa alasan.

Tubuh yang Lebih Baik Menciptakan Kehidupan yang Lebih Baik.


Menggabungkan dua tabel menjadi satu dan memperbarui dengan kolom dengan klik

Jika Anda ingin menggabungkan dua tabel menjadi satu dan memperbarui data berdasarkan kolom seperti gambar di bawah ini, Anda dapat mencoba Tabel Menggabungkan kegunaan Kutools untuk Excel.
doc menggabungkan 11

Kutools for Excel: lebih dari 200 add-in Excel yang berguna untuk menyederhanakan tugas rumit menjadi beberapa klik di Excel

Setelah pemasangan gratis Kutools for Excel, lakukan seperti di bawah ini:

1. klik Kutools Plus > Tabel Menggabungkan untuk mengaktifkan Tabel Menggabungkan wizard.
doc menggabungkan 12

2. Di langkah 1 panduan, Anda perlu memilih tabel utama dan rentang tabel pencarian secara terpisah. Lalu klik Berikutnya.
doc menggabungkan 13

3. Centang kolom kunci yang ingin Anda perbarui datanya di tabel utama. Klik Berikutnya.
doc menggabungkan 14

4. Kemudian centang kolom pada tabel utama yang ingin Anda perbarui datanya berdasarkan tabel lookup. Klik Berikutnya.
doc menggabungkan 15

5. Di langkah 4 wizard, centang kolom yang ingin Anda tambahkan dari tabel pencarian ke tabel utama. Klik Berikutnya.
doc menggabungkan 16

6. Pada langkah terakhir wizard, tentukan opsi pengaturan yang Anda butuhkan. Lalu klik selesai.
doc menggabungkan 17

Sekarang tabel utama telah mengupdate datanya dan menambahkan data baru berdasarkan tabel lookup.

Demo: Gabungkan lembaran / workbook menjadi satu sheet atau workbook

Kutools for Excel: 200 + alat praktis yang berguna, menyederhanakan tugas rumit di Excel menjadi beberapa klik.


Unduh File Contoh

mencicipi


Alat Produktivitas yang Direkomendasikan

Tab Office - Penjelajahan dengan Tab, Pengeditan, Pengelolaan Dokumen Di Microsoft Office 2019 - 2003 dan Office 365


tab kantor

Add-in Profesional untuk Mempercepat Excel 2019-2007, mengurangi jam tugas menjadi detik

Add-in ini mencakup lusinan grup profesional, dengan 300+ opsi akan mengotomatiskan sebagian besar tugas harian Anda di Excel, dan meningkatkan produktivitas Anda setidaknya hingga 50%. Seperti grup optons satu klik dan konversi batch.
Sekarang kesempatan Anda untuk mempercepat diri Anda dengan Kutools for Excel!


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.
    VJ · 4 years ago
    How can I modify the code to paste as value only?
  • To post as a guest, your comment is unpublished.
    Mike · 5 years ago
    This isn't a merge...it's simply stacking data. Change the title, please.
  • To post as a guest, your comment is unpublished.
    Maher · 5 years ago
    Thank, I used Kutools, it is so easy to use. Thanks again!
  • To post as a guest, your comment is unpublished.
    Eduardo · 5 years ago
    Used your first Macro and worked! Great work, thanks a lot!

    Kind regards
  • To post as a guest, your comment is unpublished.
    Shireen · 5 years ago
    My scenario - I require to be able to refresh the data from the source data also:

    2 worksheets in two different workbooks - the same formatting
    I need to bring the data across from both worksheets into one worksheet - in a separate workbook
    As the data is added to and changed daily I would need to refresh this data - this also means that the range in these worksheets would also change if rows are added.
    These sheets are also read only when being worked on by the User, so I would need to refresh each time the data is saved.
  • To post as a guest, your comment is unpublished.
    Shireen · 5 years ago
    My scenario.......but I need the function to refresh data as both sheets are added to and info is updated daily (so the ranges would also increase).

    2 worksheets in two different workbooks
    Data is formatted exactly the same in both sheets

    I want to consolidate these sheets into one sheet (and keep the formulas), but as the data changes daily I would need to be able to refresh the data from the source documents.

    Can you assist?
  • To post as a guest, your comment is unpublished.
    Kiran Kanth · 5 years ago
    Hi,

    thanks a lot this saved my time in consolidating 80 to 100 sheets in one work book.
    thanks once again


    Kiran Kanth
  • To post as a guest, your comment is unpublished.
    Saleem Ansari · 5 years ago
    Hi Daniel,

    thank for your support & information but my problem is still not resolve.

    i have four sheet in one workbook with the name of (Reason Code), (Offline Code), (Work File 1) and (Work File 2).

    i want to merge the data of only between two sheet (Work File 1) and (Work File 2) but it should not create any new sheet, data should be merge in (work file 2) sheet from work file 1
  • To post as a guest, your comment is unpublished.
    Ray and Eric · 5 years ago
    Thank you for the code! We had to copy 200 sheets into one, just one comments regarding the range; the maximum row/range is
    1,048,576 rows by 16,384 columns
  • To post as a guest, your comment is unpublished.
    Daniel · 5 years ago
    How do you omit a sheet?

    I have 3 sheets(Tracker)(Archive)(Note Options). I want to combine only (Tracker)(Archive)sheets to a master sheet.

    I am also trying to find a code that will auto refresh Combined sheet when new information is listed on (Tracker)(Archive)sheets .

    Please help if possible. Code Sample listed below.

    Sub Combine()
    Dim J As Integer
    Dim wrk As Workbook
    On Error Resume Next

    Set wrk = ActiveWorkbook

    For Each sht In wrk.Worksheets
    If sht.Name = "Master" Then
    MsgBox "There is a worksheet called as 'Master'." & vbCrLf & _
    "Please remove or rename this worksheet since 'Master' would be" & _
    "the name of the result worksheet of this process.", vbOKOnly + vbExclamation, "Error"
    Exit Sub
    End If
    Next sht

    'We don't want screen updating
    Application.ScreenUpdating = False


    Sheets(1).Select
    Worksheets.Add
    Sheets(1).Name = "Master"

    Sheets(2).Activate
    Range("A1").EntireRow.Select
    Selection.Copy Destination:=Sheets(1).Range("A1")



    For J = 2 To Sheets.Count
    Sheets(J).Activate
    Range("A1").Select



    Selection.CurrentRegion.Select
    Selection.Offset(1, 0).Resize(Selection.Rows.Count - 1).Select
    Selection.Copy Destination:=Sheets(1).Range("A65536").End(xlUp)(2)


    Application.ScreenUpdating = True
    Next

    End Sub

    Sub Worksheet_Change(ByVal Target As Range)

    If Intersect(Target, Me.Range("a:l")) Is Nothing Then Exit Sub
    Application.EnableEvents = False

    Call TrapTest

    Application.EnableEvents = True

    End Sub
  • To post as a guest, your comment is unpublished.
    Saleem Ansari · 5 years ago
    hi.

    i want to merge the data only two sheet. but it should not create in new sheet.

    it should be merge from sheet 1 to sheet 2

    please help.
  • To post as a guest, your comment is unpublished.
    steve · 5 years ago
    you rock, thanks a bunch....
  • To post as a guest, your comment is unpublished.
    Antonia · 5 years ago
    The VBA code worked great! If I update one of the worksheets (i.e. enter more data) will that data automatically be entered into my new 'Combined' worksheet?
  • To post as a guest, your comment is unpublished.
    Guzman · 5 years ago
    Hi ! Thanks for the code.
    About -[b]"Merge all worksheets of active workbook into one worksheet with VBA code"[/b]-

    Is it possible to do it with a For Each construct to navigate through the Sheets?
    Thanks.
  • To post as a guest, your comment is unpublished.
    Janett · 5 years ago
    Thank you, this has helped me a lot!
  • To post as a guest, your comment is unpublished.
    Nat · 5 years ago
    When using the VBA providied above, is there a way for the combined sheet to automatically update when the sheets that is combined are added to it, so it is always running?

    Thanks!
  • To post as a guest, your comment is unpublished.
    ronald bthakur · 5 years ago
    Hello Everyone,
    This is awesome to merge the multiple worksheet into one worksheet via vba coding or macros, but can anyone help me to merge data from multiple worksheet in to one blank worksheet using excel functions.
    Thanks
  • To post as a guest, your comment is unpublished.
    ronald bthakur · 5 years ago
    this is awesome to merge the multiple spreadsheets using macro, but can anyone help if i can do the same process using excel functions....because i do not know the vba coding....
  • To post as a guest, your comment is unpublished.
    Gabriel · 5 years ago
    Thank you!
    The code worked perfectly!
  • To post as a guest, your comment is unpublished.
    Andre · 5 years ago
    Thanks a lot for the combine code
  • To post as a guest, your comment is unpublished.
    Trey · 5 years ago
    I have 12 worksheets (1 for each month of 2015), running Excel 2010. Each worksheet has approximately 45k rows. When I run the macro it copies about 6 of the the 12. There should be plenty of rows. If I start from scratch and run the VBA again, it still only combines the same month/worksheets? I checked my headers and I think they all match, but maybe that could be the issue?
  • To post as a guest, your comment is unpublished.
    dan · 5 years ago
    Does anyone know of a way to have the combined worksheet to ouput the actual data values only from the other sheets, as opposed to formulas? The formulas don't translate to the combined page.
  • To post as a guest, your comment is unpublished.
    Somasekhara G · 5 years ago
    Thank you so much the initial code is worked for me. But i need to know that, i have some blank rows in the middle, but i need to copy the entire data. would like to know how to modify this. Thanks again.
  • To post as a guest, your comment is unpublished.
    Dhanapal · 5 years ago
    Wow very nice tool to merge multiple sheets....Superb
  • To post as a guest, your comment is unpublished.
    Ravi · 5 years ago
    Thank's Brother I have visited many times on this page but i couldn't recognised now finally I find it. Thanks ;-)
  • To post as a guest, your comment is unpublished.
    Maurice · 5 years ago
    In lieu of a donate button I'm gonna get kutools for my personal computer. This little macro saved me and my 20 coworkers from having to enter more than 9,200 accounting entries for our payroll. Thanks, guys!
  • To post as a guest, your comment is unpublished.
    Clive · 5 years ago
    Can't get the macro to work in excel 2013. But I think its because I am trying to combine 18 sheets in 1 workbook.
  • To post as a guest, your comment is unpublished.
    kamal · 5 years ago
    when i run the code it only merges 3 sheets only out of total 20 sheets.any body please help
  • To post as a guest, your comment is unpublished.
    yathi · 6 years ago
    hi thanks for the code,

    it works great. .

    can you plz help me in getting the respective worksheet names in front of the data which are combined.

    i.e if i am combining 2 columns of data from 20 worksheets, i want to get one more column of data which gives name of the sheet that particular data is fetched from.

    thanks in advance

    Yathish
    • To post as a guest, your comment is unpublished.
      Vijay Dilli · 5 years ago
      I have this need as well to have an additional column with the worksheet name as 1st column. Is this possible? I am not very familiar with VBA and I am not sure I can make these changes myself with out impacting the existing results.

      Vijay
  • To post as a guest, your comment is unpublished.
    Mikael Hjelm · 6 years ago
    Thanks for the macro. Now I can use it with empty rows.
    I add an extra kolumn A (with all tabs marked) and fill it down with any letter as deep the largest table have rows.
    Well I did not check just estimated and used advsnced search with only unique values selected, and over the whole cell area, to remove the empty rows that comes in between in the Combine tab.
  • To post as a guest, your comment is unpublished.
    Elahi baksh · 6 years ago
    Thank u very much this program reduces my efforts of doing copy paste job
  • To post as a guest, your comment is unpublished.
    Peter · 6 years ago
    Is there a solution to merge 6 tables into one row, please?

    It`s hard to describe, but I have converted a pdf into excel and it simply pasted the date into separate sheets, means every 6 sheet would be one row and I have around 6136 pages...

    Thanks,
    Peter
  • To post as a guest, your comment is unpublished.
    Rodrigo · 6 years ago
    you saved my lyfe...tks
  • To post as a guest, your comment is unpublished.
    Leslie · 6 years ago
    Great, worked perfectly!
  • To post as a guest, your comment is unpublished.
    Omar · 6 years ago
    Thanks a million :-)
  • To post as a guest, your comment is unpublished.
    Subhashini K · 6 years ago
    I downloaded the tool but it is not working. I want to combine multiple sheets. I open the requisite excel sheets and then as soon as I click on enterprise and then combine, all the sheets disappear. Nothing happens and if I try to open them again I get the alert that the sheets are locked by another user. I have to restart my system to again work on them. Can you please suggest a solution for this?
  • To post as a guest, your comment is unpublished.
    Searcher · 6 years ago
    The code works great, but if the macro is not resident in the Active worksheet, if works on the wrong worksheet. I adapted it it to work with the Active workbook as follows:

    Sub Combine()
    Dim J As Integer

    On Error Resume Next

    With ActiveWorkbook

    .Sheets(1).Select

    .Worksheets.Add ' crteate a new worlsheet; it becomes the new SHEETS(1)
    .Sheets(1).Name = "Combined" ' Call it 'COmbined'. Hopefully there is no conflict!
    .Sheets(2).Activate ' go to the first user's worksheet
    Range("A1").EntireRow.Select ' Select Row 1
    Selection.Copy Destination:=.Sheets(1).Range("A1") '
    For J = 2 To .Sheets.Count ' these are the User's original worksheets
    .Sheets(J).Activate
    Range("A1").Select
    Selection.CurrentRegion.Select
    Selection.Offset(1, 0).Resize(Selection.Rows.Count - 1).Select ' adjust selection by removing Row 1
    Selection.Copy Destination:=.Sheets(1).Range("A65536").End(xlUp)(2) ' Assumes Column A always has data
    Next ' worksheet

    End With

    End Sub
    • To post as a guest, your comment is unpublished.
      sung · 5 years ago
      Great, I didn't need this code. but the code listed seems not perfect, so started read and this seems great!!..

      I know i might need the code soon or later so i'm taking it

      [quote name="Searcher"]The code works great, but if the macro is not resident in the Active worksheet, if works on the wrong worksheet. I adapted it it to work with the Active workbook as follows:

      Sub Combine()
      Dim J As Integer

      On Error Resume Next

      With ActiveWorkbook

      .Sheets(1).Select

      .Worksheets.Add ' crteate a new worlsheet; it becomes the new SHEETS(1)
      .Sheets(1).Name = "Combined" ' Call it 'COmbined'. Hopefully there is no conflict!
      .Sheets(2).Activate ' go to the first user's worksheet
      Range("A1").EntireRow.Select ' Select Row 1
      Selection.Copy Destination:=.Sheets(1).Range("A1") '
      For J = 2 To .Sheets.Count ' these are the User's original worksheets
      .Sheets(J).Activate
      Range("A1").Select
      Selection.CurrentRegion.Select
      Selection.Offset(1, 0).Resize(Selection.Rows.Count - 1).Select ' adjust selection by removing Row 1
      Selection.Copy Destination:=.Sheets(1).Range("A65536").End(xlUp)(2) ' Assumes Column A always has data
      Next ' worksheet

      End With

      End Sub[/quote]
  • To post as a guest, your comment is unpublished.
    Derek · 6 years ago
    Thank you for this! With a little tweaking of datasets, this worked like a charm.
  • To post as a guest, your comment is unpublished.
    Melisa · 6 years ago
    I have a workbook with 7 sheets that I would like to combine.

    Each of the sheets is a check list and the completion date is in a different column on each sheet depending on the number of steps so on one sheet it is column H another it is column AR for example.

    I thought that the best way to get around this issue would be to make a named Data set which includes the desired columns as the columns would be in the same order regardless of which sheet it is on.

    Is there any way to modify this code to looks at the dataset on the sheets rather than all active cells? and keeps information in the same columns?
  • To post as a guest, your comment is unpublished.
    Bhumika · 6 years ago
    I just used the Merge Worksheet function. Worked like a charm! Thank you SO much for posting this! It is a life saver. Even the MS office website didn't list this...
  • To post as a guest, your comment is unpublished.
    akmuseums · 6 years ago
    it's only compiling about a 1/4 of my data! how can I get the rest of my sheets into it?

    thank you!
    • To post as a guest, your comment is unpublished.
      kamal · 5 years ago
      same problem here...i have 20 sheets but it only combines 3 sheets
  • To post as a guest, your comment is unpublished.
    maryam · 6 years ago
    hello
    thanks alot for your merge program.you help me that my boss be happy :lol:
  • To post as a guest, your comment is unpublished.
    Mary · 6 years ago
    This is perfect for what I need. Thank you.

    How can I tell it to not copy the headings on each tab, just the data. I'm ending up with headings in my combine tab 40 times...

    Sorry if this posts twice. I'm not seeing it in the refreshed comments...
  • To post as a guest, your comment is unpublished.
    Mary · 6 years ago
    This is exactly what I need. One issue: I don't want the headings from each tab, just the data. How do i tell it to not copy all the headings?

    Thank you.
  • To post as a guest, your comment is unpublished.
    Chris · 6 years ago
    Life saver. Thank you.
  • To post as a guest, your comment is unpublished.
    cherry codilla · 6 years ago
    please help me i cant find the merge worksheet. where i can find it?

    thank you,
    cherry
  • To post as a guest, your comment is unpublished.
    Kedar · 6 years ago
    At this moment I have got smth like this:

    Sub Combine()
    Dim J As Integer
    On Error Resume Next
    Sheets(6).Activate
    Range("A1:A3").EntireRow.Select
    Selection.Copy Destination:=Sheets(1).Range("A1")
    For J = 1 To 5
    Sheets(J).Activate
    Range("A1").Select
    Selection.CurrentRegion.Select
    Selection.Offset(3, 0).Resize(Selection.Rows.Count - 1).Select
    Selection.Copy Destination:=Sheets(6).Range("A65536").End(xlUp)(2)
    Sheets(6).Select
    Next
    End Sub

    Everything works just great. The only thing I want to do is to add some automatic refresh for VBA rule. I want to add new content to other Worksheets and see results at last one with VBA.
    • To post as a guest, your comment is unpublished.
      Antonia · 5 years ago
      Did you ever figure out how to do this?
  • To post as a guest, your comment is unpublished.
    Kedar · 6 years ago
    I have one simple question (I'm not a VB programmer).

    Please tell me how to modify that rule to paste the results inside already created worksheet (let's say "COMBINED") and not create new one?
  • To post as a guest, your comment is unpublished.
    kristin · 6 years ago
    please help me, and you did. I am so thankful, in life for the work experience, and even though I did the prints, I got a good , or even better a even review. I love my new job.
  • To post as a guest, your comment is unpublished.
    Chief · 6 years ago
    Amazing solution. how can you modify the code to work on cells that are protected?