copy sheets

Hi, I have the following VBA Sub CopyTemplate() Dim wTemplate As Worksheet Dim wLIST As Worksheet Dim wCopy As Worksheet Dim r As Long Dim m As Long Application.ScreenUpdating = False Set wTemplate = Worksheets("Template") Set wLIST = Worksheets("Lookup") m =...

I have a sheet with the columns below: <colgroup><col><col></colgroup><tbody> DC ITEM # DC 1 1 DC 2 2 DC 3 2 DC 3 3 DC 3 4 DC 4 1 </tbody> I would like to do the following: 1. copy the 'master sheet' based on the number of unique values in Column "DC". In this case, this would...

Hi, I've got a macro that basically does the following: Opens data source files, that remain open (aprox. 8 files) Get a key from a list for filtering out data in the source files Copies result for and pastes in corresponding sheet in macro file Refreshes pivot tables and charts to export...

Hello, I am using the following code to copy multiple worksheets into a new workbook. Unfortunately, the worksheets aren't copying over. I am wondering if creating the new workbook is changing my "Activeworkbook" which is referenced on line 6. Any thoughts on how to correct this? Also, I...

hello - I have been working on how to check and copy (would love to merge or sync) sheets from one workbook to another. The reason is that I have to input data on a PC that is stripped and/or blocked from running macros, then work on the data in a different office that allows macros. So I have...

hi i could have up to 50 sheets all contain data. i need to copy all those sheets and data to to sheet1. any help will be appreciated.

Hi, I'm trying to take all the sheets of a specific color (in my code below it's light blue) from a group of workbooks and combine them into one new workbook. This code works for the first file, but then gives me a "subscript out of range" error when trying to copy the tabs from the second...

Hello, I want to copy worksheets from current workbook to a new workbook. The names of Worksheet have format: Name-Month Ex: Adam-Mar, Adam-Apr, John-Mar, John-Apr. Now what I am trying to do is copy all Adam sheets to one workbook and all John Worksheets to another. The code which I...

Hi, I am new to using VBA and need some help. I have 30+ sheets in my workbook each named after a product (Product A, Product B, ...). The cell A1 in each sheet has the name of the tab. For example: Cell A1 of Product A sheet has Product A listed. In another workbook, Cell A2 is a dropdown...

Hi all I'm trying to copy one sheet and insert it to another existing workbook (storing it for future reference)..... It will copy the sheet but it also copies over the other sheets already in the workbook..........I have no idea what I've done wrong I'm using Excel 2010 on Windows7 here's the...

Hello everyone I am a bit stuck on my current project and after searching these forums I got encouraged to post my question. Lets say I have some Workbooks saved in a specific path (C:\Workbooks). Each Workbook has a different name and within each Workbook there is a Sheet called "Final...

I have a workbook with many sheets one of the sheets is a Pivot Table. I would like to give the user the option to create a new sheet with the pivot table sheet and the sheet that contains its source data only. <?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p>...

Hello all, I have two sheets in a workbook, they are named as "List" and "Original" I have a list of 'strings' (like apple, banana etc.) in a column A of the sheet called "List". The list has somewhere around 25 to 50 items. I want - To make copies of sheet "Original". One copy for...

This is the code I use to copy sheets by vendor to thier own sheet. I would like for each new sheet to retain the visual aspects of the original sheet (column size, zoom, filter, etc.). What would I need to change? Sub CopyToNewSheetsByGroup_2() Dim strName As String, i As Integer Dim...