How To Copy Page Formatting When Pasting Into New Workbook
Dec 28, 2011
I've been trying to code a macro that will select a worksheet (that has formulas) to copy just the values into a new workbook. I want the page setup data to also be included. It seems that if a select the workbook and do a copy, it includes the formulas. If I select the cells, then do a paste/special values into the new workbook, the page setup is the default one. Each worksheet that I want to copy/paste has different page setup values and I'd like to be able to carry over the page setup. Otherwise, I have to have code to do all the page setup in the macro. There are over 20 worksheets and it's slow.
This code does the copy/paste special but no worksheet page setup is included
Worksheets("Data1").Range("A1:E22").Select
Selection.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveWorkbook.SaveAs Filename:= _
"U:My DocumentsLearning VBA filesTestNewWorkbook.xls"
Windows("ProjectFilesChapter07 test.xls").Activate
View 3 Replies
ADVERTISEMENT
Jul 29, 2006
I am a novice when it comes to excel, but I have a project due at work where I need to search out correct addresses and copy and paste them into the cells where the incorrect info already exists. Here is my problem, I have been working on this no problem for about a week now and today all of a sudden when I copy the text from my search result on google and try to paste it into the cell, it pastes the google link, instead of the text I copied. It does this for the entire row but will not do it for row after row, I might be able to get the next 5 or 6 rows to accepet the correct text, and if I try to just type the info in, it appears as a clickable link.
I cannot figure out what I did, if anything or how to fix it so that I can get this work done.
View 3 Replies
View Related
Nov 18, 2008
I regularly copy into notepad then copy that into excel because I don't want to carry over the text formatting. Is there a better way to do this? To set up the cells so that they don't try to carry the formatting over?
View 4 Replies
View Related
Nov 8, 2012
If you want to copy and paste a row from a workbook to another workbook based on a critertia such as that column A must have the number '1213' in it which also has over a 100 other numbers, do you use absolute or relative? And what do you write in the macro so that it search in column A all the rows with '1213' in them and paste them into the other workbook?
View 1 Replies
View Related
May 18, 2009
Is there a way to copy page setup settings from one workbook to another in VBA?
Example, I have a spreadsheet with 5 tabs with each of them different page setup options.
I have a second spreadsheet with 5 tabs where I need to make the page setup the same for each tab as the saved spreadsheet #1.
Background: This is a workaround for not being able to do copy/paste special values for pivot tables. My workaround is to save an .xlsx as a .mht then reopen and save as .xlsx. The only problem is that I lose page setups through the process.
View 4 Replies
View Related
May 18, 2009
Is there a way to copy page setup settings from one workbook to another in VBA?
Example, I have a spreadsheet with 5 tabs with each of them different page setup options.
I have a second spreadsheet with 5 tabs where I need to make the page setup the same for each tab as the saved spreadsheet #1.
Background: This is a workaround for not being able to do copy/paste special values for pivot tables. My workaround is to save an .xlsx as a .mht then reopen and save as .xlsx.
View 2 Replies
View Related
Apr 8, 2008
I generate several reports, all saved as seperate files, with the same page settings (margins, headers, footers, etc.). Is there any way to copy these page settings from one file to another so that I don't have to enter the settings seperately for each file?
View 13 Replies
View Related
Mar 20, 2014
Trying to write a macro to copy the formatting from a worksheet in a closed workbook. I can get it to work when I have the file I want to copy from open but I want it to be able to run without having to open the second file. The file location is "C:UsersapotcontinentDesktopTemplateRetail ReportsRetail Stabilized Prop NOI.xls". The name of the worksheet I want to pull the formatting from is "Retail Stab Prop NOI Avg Rn". I want to copy the formatting from the whole sheet and paste it on the sheet "NOI" within my active workbook.
Below is the code that has been working when I have the second workbook open.
Code:
Windows("Retail Stabilized Prop NOI.xls").Activate
Cells.Select
Selection.Copy
[Code]....
View 1 Replies
View Related
Jul 14, 2009
I need another big macro to search a different workbook "database" for a match. An example of what the "drawing number" will look like that the macro will search for is;
View 5 Replies
View Related
May 13, 2014
I am using the below code (i have combined different bits of code which i found on these forums) to open a new workbook, copy all the data in it and paste it into Sheet2 in the active workbook . Also, i want the data to be pasted on the next empty row as there is already data in Sheet2. The data that is being copied and pasted has the same format and it is going to be repeated many times.
The problem i am having is that it is not offsetting the data to the next empty row - i think it is a simple change but i can't seem to get there :s
Also, the code is currently selecting all of the data from the workbook that i open - is there a way i can select all of the data, excluding the first row (the first row contains the headings which i already have in Sheet2 in the active workbook).
[Code].....
View 5 Replies
View Related
Dec 26, 2013
What I want to do, is to populate the Lois, Beth, Kelly and Shelley pages with the rows from the Que page when they get assigned to one of them. I tried to program then off of a different example in the forum. It didn't work. Will include the copy.
Tracking(HELP).xlsx
View 6 Replies
View Related
Nov 14, 2013
In my header I am trying to show the current page number and the total number of pages in the workbook. So if I have 10 pages in my workbook, page 5 would read "5 of 10".
I have this in my header "&[Page] of &[Pages]". All worksheets with 1 page read "1 of 1" and worksheets with 2 pages read "1 of 2" on the first page and "2 of 2" on the second page.
View 6 Replies
View Related
Nov 20, 2009
I am in a situation where I have to copy-n-paste text from a webpage into Excel. When I do this, the pasted text keeps the formatting of the webpage. The font is the webpage font. The background color is the background color of the webpage. Etc.
I know that I can paste just the text itself, without any of the formatting, by right-clicking, selecting "Paste Special...", and then selecting "Text" instead of "HTML". I am wondering if there is an option somewhere that will do this automatically when I hit CTRL-V instead of requiring me to pull up the Paste Special dialog box.
View 9 Replies
View Related
Feb 24, 2010
I am making template and trying to preserve formatting when users paste into a cell. From my research, I have found that this is impossible with simple format protection, it works to prevent changing formating, but if something is pasted (with normal paste), the format will change.
I have found a few solutions, but can't get them to work correctly
Solution A: Disable normal paste and substitute Paste Special - Values
How will this work with pasting via CTRL + V and the right click menu? I need both to function.
Solution B: Allow users to paste normally, but use a macro to copy formatting from a hidden sheet
I actually found code for this, but I couldn't figure out exactly how to impliment it. The sheet that users will be pasting into is called "Batch Summary" and I was trying to pull formatting from a sheet names "Batch Summary Format", but was getting an error.
View 9 Replies
View Related
Jun 4, 2013
Is it possible to preserve original text formatting when copying and pasting only part of a cell. Like, for example, a cell may contain ten words one of which is in red and underlined. How do you copy that one word and paste it in another cell so that it remains in red and underlined?
View 4 Replies
View Related
Feb 11, 2010
I have inherited a monstrous speadsheet on which all data appears on a single sheet rather than being broken up across several sheets in some logical fashion.
One portion of this monster is a set of quite a few form letters, each of which reference various cells elsewhere in the spreadsheet.
I want to move all of these letters, together, to another tabbed sheet as a first step in reorganizing the monster.
Simply copying and pasting the cells or columns doesn't work. It fails in different ways depending on which pasting options I employ.
A very simplified version of my problem appears on the 5 sheets of the attached file, with what I hope is just enough further detail about the difficulty.
By the way, I also tried using the "Insert Copied Cells" option when pasting but since this failed with the exact same results as one of the other options I didn't include the results in the example shreadsheet.
View 5 Replies
View Related
Mar 31, 2014
I have browsed for two days looking for material on effecting this. The technique quoted most is watch for undolist for paste & auto fill then undo the change and paste the value again with specific formatting needs. This technique can be implemented in a worksheet_change event handler. The problem that I am facing is that the user can copy and past while my VBA is running. Once it is caught inside my own application class object event handler all that undo stack is already cleared. Therefore I have nothing that tells me if the user has entered the value via a paste action. By the time the value is pasted, all that formatting would have been entered. For example, a value that is interpreted by another workbook as DATE will have my destination formatting changed to DATE as well even though it is designed to be TEXT at design time.
So far I have not been able to think of a scheme to deal with this.
My basic intention is to always ensure the destination cell formatting remains as TEXT. If something is already interpreted as DATE after the paste even if I can convert to TEXT the string will appear totally differently. I have to find a way to paste the whole thing as TEXT in order to keep the string the same. The problem is that there is no intrinsic PASTE event in VBA. Without a method to undo that paste I cannot catch this at all.
View 1 Replies
View Related
Aug 9, 2013
I have "wbThis" as the original workbook to be pasted to and "wbTarget" as the workbook that is being opened and copied from. (2 different workbooks). I have written a code for the user to chose the workbook (wbTarget) to open and copying the data from (the getopenfilename). I want to paste these values to the "wbThis" worksheet. The code is running, however it does not copy paste the values from one workbook to another, and it is not giving me an error either.
Code:
Private Sub CommandButton1_Click()
Dim wbTarget As Workbook
Dim wbThis As Workbook
[Code].....
View 2 Replies
View Related
Mar 19, 2013
How to copy and paste conditional formatting with our changing the cell values. My first row of data starts in row 4 and here is what I have in D4
If D4 is less than or equal to AA4, AW4, BS4, CO4 then it will highlight D4
Now I want to copy that format and paste it for all rows in column D. The problem I'm having though is when I paste the formula it doesn't change to match the row I'm on. For example, when I paste it in D5 this is what I get
If D5 is less than or equal to AA4, AW4, BS4, CO4 then it will highlight D5
How do I paste it so that it will update to show AA5, AW5, BS5, and CO5. I want to be able to do this for 500 rows.
View 6 Replies
View Related
Jul 16, 2009
I'm running a code to copy rows from one workbook and paste into another...Code runs but doesn't paste anything into the workbook.
Sub Macro2()
Workbooks.Open Filename:="J:BestExIncMikey_copy.xls", UpdateLinks:=3, ReadOnly:=False
Dim c As Range
Dim rng As Range
Dim ws As Worksheet
Dim Row As Integer
Dim LstRow As Integer
Dim i As Variant
For Each ws In Worksheets
Select Case ws.Name
Case "Total Locked Pipeline"
Range("I2").Select
Selection.End(xlDown).Select...........
View 9 Replies
View Related
May 20, 2013
I have a very large spreadsheet that is run by a different department. Regularly, I need to go into it do the following:
-filter the sheet by the information in one particular column - - the column is always the same but the number within it by which I filter changes as needed
-double-click each column to autofit the columns
-go to the page break preview to make the document fit one page
-print the results.
My question is can I automate this somehow with a macro or something else?
View 3 Replies
View Related
Feb 26, 2009
I'm trying to do is record a macro that will copy data from cells A1/A2 of Test.xls and paste it to cell A1/A2 of Text2.xls. Then when I run the macro again, it will copy B1/B2 of Test.xls to B1/B2 of Test2.xls, and then do that for the remaining cells.
View 9 Replies
View Related
Jun 9, 2009
When I view a sheet under Page Break Preview, it shows the Page numbers in the centre of the Page. While I am aware that it would not print the page number I was wondering if there is an option to remove/hide the page numbers.
View 3 Replies
View Related
Jan 4, 2013
I am trying to copy information specifically addresses into an excel spreadsheet to turn into labels in a mail merge. My first column is a name and then the next column is the address. I need the address to be in one box, in three or however many lines, instead of three different rows because when I go to merge it into word, it comes out has several different labels and not all the information on one.
View 3 Replies
View Related
May 29, 2007
I have a sheet with data in columns A to F, sorted by column B
Column B contains a list of names which may occur once or up to one hundred times.
What i would like to do is look at column B and for each name select columns A to F and copy those cells to another workbook which is then saved and closed.
However I would only like a maximum of 20 rows at a time to be copied.
As an example
Bob occurs 16 times so those 16 rows are copied
Fred occurs 26 times so only the first 20 Fred's are copied and then the next 6 are done.
Wally occurs 54 times so the first 20 are done then the next 20 and then the remaining 14
View 14 Replies
View Related
Mar 8, 2007
I would like a macro that would analyze a range (H15:GI15) to see if they contain FH, FS, FB, FR, or FC and if they do, copy the related picture associated with the 5 variables and paste it in the cell.
I did this code and it worked, but the code is very long. Another problem I have is there needs to be a way to delete the existing pictures before the code runs too. Because the cells may change and the button that runs the macro would be labeled "update" or something to that effect. I don't really need it to run everytime the cell is updated, just when the "update" button is pushed.
View 9 Replies
View Related
Jul 27, 2006
I need a macro which goes thru the columns A to K, picks up the value in the filled cells and paste them all in 1 column on another sheet, like sheet2 A1 onwards. Attached is an example of the file.
View 8 Replies
View Related
Feb 8, 2010
I'm working on a quality control project (for products with Model #'s "1098", "1190", & "1220") for the company I work for and I'm having an issue with a macro.
I have data coming from worksheet "Sheet1" AB6:AB21, that's getting "sent" to worksheets "1098", "1190", & "1220" E86:E101, and "Sheet1" AC6:AC21 -> worksheets in E151:E166
In "Sheet1" cell F4, you enter the Model # ("1098" "1190" "1220"). I'd like this data above to ONLY go to the corresponding worksheet as cell F4 and not ALL model # worksheets. Is there a way that I can do this?
View 8 Replies
View Related
Feb 18, 2010
I'm working on a quality control project (for products with Model #'s "1098", "1190", & "1220") for the company I work for and I'm having an issue with a macro.
I have data coming from worksheet "Sheet1" AB6:AB21, that's getting "sent" to worksheets "1098", "1190", & "1220" E86:E101, and "Sheet1" AC6:AC21 -> worksheets in E151:E166
In "Sheet1" cell F4, you enter the Model # ("1098" "1190" "1220"). I'd like this data above to ONLY go to the corresponding worksheet as cell F4 and not ALL model # worksheets. Is there a way that I can do this?
View 2 Replies
View Related
May 12, 2014
I am using the following code to paste an excel generated chart into ppt. How do I adapt it such that it only pastes the charts from sheet2 and not the entire workbook?
[Code] .....
View 11 Replies
View Related
