Page Setup Changes On Different Machines
I set up a spreadsheet for use by my colleagues, on an Acer 17 inch portable. My colleagues all use HP or Dell with 15 inch monitors (and different graphics cards to mine). They all complained that when they opened my sheet, the page breaks were all in the wrong place. When they fixed the breaks on their machines and I opened those file, the breaks were now in the wrong place on mine, but were all right on theirs.
I have now "upgraded" to a Toshiba 17 inch laptop, and find that my original spreadsheet done on the Acer 17 inch shows page breaks in the wrong place on my new machine.
Is this something to do with display adaptors? If so, does anyone know what I can do to standardise this across the board? (My boss uses a 20 inch screen, and the sheet for him is even more wildly out).
View Complete Thread with Replies
Related Forum Messages:
Excel Page Setup Up
This might seem a strange type of Excel question.
Some "Clever" person decided to create a site plan using MS Excel. It has been done quite well tbh. The problem with Excel is that I am unable to set a custom page size as this plan sits nicely on a paper size I made ealier through using Word. Guess what there is a custom page size selection on Word but not Excel. Is there a walkaround for this ?
The only other way I can do this, is to print off 2 a4 landcape print out but the printer goes to the next page and leaves a nasty seperation.
The copy of Excel i have is 2003 sp3
Speeding Up Page Setup
This part of my macro can be improved as it runs through over 100 sheets and takes a while?
For Each sh In Worksheets
.Zoom = False
.LeftFooter = "&F" & Chr(10) & "&A"
.CenterFooter = "&P of &N"
.RightFooter = "&D"
.FitToPagesWide = 1
.FitToPagesTall = 1
.LeftMargin = Application.InchesToPoints(0.15748031496063)
.RightMargin = Application.InchesToPoints(0.15748031496063)
.TopMargin = Application.InchesToPoints(0.393700787401575)
.BottomMargin = Application.InchesToPoints(0.354330708661417)
.HeaderMargin = Application.InchesToPoints(0.511811023622047)
.FooterMargin = Application.InchesToPoints(0.196850393700787)
.TopMargin = 1
.BottomMargin = 1
.Orientation = xlPortrait
Using XLM4 Page Setup
I visited all of the sites listed in the various posts & downloaded the XLM function help file.
My question is which syntax would I use? I'm wanting to add this to an existing macro (one that currently takes FOREVER). I think syntax 1 for worksheets & macro sheets, but I'm adding to visual basic, so maybe syntax 3 for vb modules?
Here's my existing code, if anyone wants to help me change this to XLM4pageSetUp ..
Page Setup/Print Preview Vba
I am testing some code to have my sheets print consistently on different computers. I have
.CenterHorizontally = True
.Orientation = xlPortrait
.FitToPagesWide = 1
but it still previews at more than 1 page wide. Any suggestions?
Page Setup And Zoom Property
I was curious if in VBA is there a way to switch in the page setup from Fit to X Page by X Page to the Scaling %.
I have set all my pages to fit 1 x 1 and would now like to know the scaling % (Zoom) of the sheets.
Coding The Page Setup Efficiently
I've managed to clean up my code removing all of the selecting to get the macro to run faster but it seems to slow down when it gets to the page setup. Is it because of the ActiveSheet? Is there a better way to code the following?
Page Setup Multiple Sheets
I have an 6 sheet excel workbook that generates 27 additional sheets upon an executed macro. I am trying to page setup the additonal 27 sheets only to a zoom of 90. Here is what I have so far but this zooms all 33 sheets.
HTML Sub zoom_2()
Application.ScreenUpdating = False
Dim wk As Worksheet
For Each wk In ThisWorkbook.Worksheets
.zoom = 90 End With
Copy Page Setup From One Workbook To Another
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.
Macro Gets Hung Up On Page Setup
Once a week I need to export data to excel for a report. Some weeks there may be 30 rows and other weeks there may be 100 rows. I created a macro in the attached spreadsheet called 247 formattedV2 that seems to work fine except that it seems to get caught up in the Page Set up area. Here is the things that I have already in the macro that need to be accomplished.
1.All cells should be set to wrap text
2.Bottom justify text on row 1 for wrap text
3.Top justify all rows below it for wrap text
4.Adjust width of columns to exactly what is shown. If text runs over, it should wrap (shown in parenthesis)
5.Center all titles at the top of each column - show with grey background as indicated
6.Center text in columns A, B & C
7.Lighten grey cell in beteen each call (keep them in for all notes, they were accidently removed in this version)
8.Darken grey cell for column headers
Page setup: Set margins to narrow setting at .25 top, bottom, left, right. Set to landscape. Should be 1 page width, as many as necessary for height
Set for 8.5x14 paper (legal size)
•A - Last Call Date (w=10),
•B - Priority (w=7),.............
Error On Some Machines And Not Others
I have code that sends a section of the worksheet and copies a macro button after selecting cell L52 by
This code ran on another computer for months without problem. Now my coworker is getting this error "Runtime 1004 Paste Method of Worksheet Class failed."
The macro has ActiveSheet.Paste highlighted when I click debug.
This exact same worksheet running on my machine works perfectly. What can I look for? I checked the security settings on the rogue machine and Trust Access to VB project is clicked (to allow the code for button to transfer).
Buttons Disappear On Some Machines
In recent weeks, when I've been asked to demonstrate excel applications which make use of buttons, I've found that on some machines the buttons will variably display as flat grey rectangles with no label, or boxes with red 'x's, or alternatively not appear at all. There seems to be no pattern since the variations have all happened on single machines, then not at all on similar machines.
So far it has only been company laptops (not my own machine), hooked up to overhead projectors which end up with this problem. I can't think of anything I would have done manually to disable the buttons from appearing.
Is this a known issue, or is this simply down to the user preferences and/or security settings?
Connecting To A Database Without The Local Machines Odbc
I'm working on a spreadsheet that will connect to a firebird DB (Programmed using VBA and ADO intially).. The spreadsheet itself will reside on a server in a shared folder..
When a user opens the file up, I'd like for the spreadsheet to use the servers ODBC connection, and not the client machine.. This way we don't have to install the Firebird ODBC driver on each client workstation..
Put In Error Handling In Case The Format Of The Page Changes Or The Internet Page Is Unavailable
I have some code that parses an html table. I want to put in error handling in case the format of the page changes or the internet page is unavailable. I am testing without an internet connection and the run time error is not being branched off to the error handler and is fatally ending the macro. This is true also if I raise an error manually.
Private Sub ParseInjuryPage()
On Error Goto ErrorHandl
Dim strPage As String
Dim webIE As SHDocVw.InternetExplorer
Dim myURL As String
Dim tableBeg As Long
Dim tableEnd As Long
Dim RowBeg As Long
Dim rowEnd As Long
Dim cellBeg As Long
Dim cellEnd As Long
Dim strBeg As Long
Dim strEnd As Long
Dim myCell As Range
Dim rowNum As Integer
Set myCell = .Range("A2")
.Range("A:F").Value = vbNullString
rowNum = 2
Set webIE = New SHDocVw.InternetExplorer
myURL = "http://www.sportsline.com/nfl/injuries"
Do Until webIE.ReadyState = READYSTATE_COMPLETE
strPage = webIE.Document.body.innerhtml...................................
Macro To Print Page Based On Active Page
I need a macro that will print a hidden page that is linked to the page I have active.
It needs to be able to find the correct hidden page that corresponds to the active page because there are multilple pairs of the hidden/visible pages. The name of the hidden page is the same as the visible one with "printout" added to the end. When created, the sheet code names are sheetn and sheetm; n and m being consecutive numbers.
Printing One Page Grayscale And One Page Color With Code
I have a report that I use and right now I have a command button that prints the report x2. What I would like to do is to have it print one in color and one in grayscale. I could do this I think with two different buttons, but I would like to utilize just one. I tried creating a macro but it did not pick up the fact that I changed the properties to black and white.
Countif Formula: Take Data From One Page And Graph It On Another Page
I am looking for a formula that will take data from one page and graph it on another page. The data I am trying to graph is arranged like so:
1 q 2009.05.01
2 w 2009.05.02
3 w 2009.05.01
4 q 2009.05.01
I am looking for something that will look at column A and if the answer is "q" and then look at column B and if the answer is "2009.05.01" Excel will take that and count it in a specific cell on another page. In the case above, I want Excel to give me the answer of "2" in a designated cell.
Remove Page Numbers In Page Break Preview
how to get rid of the page numbers that appear when using page break preview mode. The page numbers appear in large grey font in the middle of each page and sometimes makes it difficult to read cells. Can I use this view with all the same functionality without that one feature?
Transfer Specific Data On Each Page To A Different Colum On That Same Page
I have a workbook that has 9 different tabs in it. Once all the information has been completed throughout the workbook, is there a code that could transfer specific data on each page to a different colum on that same page? I need to do this for 9 pages at one time. The information is listed differently on each page. I need to transfer data from the current data column to the previous data column once the entire workbook has been filed out.
Change Start Page Of Multi Page UserForm
Is it possible to Change Start Page Of Multi Page UserForm Based on 8 CommandButtons. on a WorkSheet, for example.
UserForm1.MultiPage1.Value = 0
UserForm1.MultiPage1.Value = 1
UserForm1.MultiPage1.Value = 2
UserForm1.MultiPage1.Value = 3
Could I use 1 multipage UserForm Instead of 8 UserFoms. Is it better to use 1 multipage UserForm with 8 pages or 8 UserForms. I dont know if this make sense or not?
I have an Excel Workbook that is linked to Word.docm files and I want to put them on a CD, But I need for it to have a setup/uninstall format attached. Or maybe you might have a better method. The reasons for the setup/uninstall is for the unknowing person, with limited computer skills. This way from the autorun to setup/uninstall it will already give a destination to install file and add an icon on desktop. More user friendly.
Basically, i've got 90 players on a ladder. When one beats the other they replace them in their position and the beaten player moves down one.
Has anyone got any idea how I can set it up so that I have got a box come up with players names in a drop down box. I can then select the player on the left who has won, and the player on the right who has lost, enter it and the ladder to automatically update.
If I have a database of 1000 records that are logged and counted as to which of these records are successful and unsuccessful sales,
can excel be programmed to give an accurate forecast of what will be the number/ percentage of successful sales records over the next 100, 50, 30 and 10 new record entry ranges, using the database history?, then which of the new records within each selected range are most likely to be successful sales using the database history?
If so, what components or data references are needed in a worksheet to meet these requirements to allow for creating an accurate forecasting application within excel?
How To Setup A Spreadsheet
I am trying to set up a costings sheet for my other half. So far I have worked out his costs for this basics i.e. van etc. man power, days, mileage. He now wants to be able to enter his miles to a job, man power, days etc, Then to show total invoice cost and show profit i.e. if miles need to be changed.
Correlation Tables -- Setup
I'm trying to Pearson Ranks correlation table. This is the formula I'm
This is placed in cell B3. When I copy the formula over to DT3 the formula
correctly adjusts the B in the second part of the formula all the way to DT
and still references the values in the B column.
But I want to now copy this down to C4, D5, E6 and then over to DT for each
so that it correctly makes the correlation table.
Copying 12 Months Data Across The Page To Down The Page
I have a dataset that is as follows:
Col1 2 3 4 ...... 45
123 456 xxx xxx xxx
100 234 xxx xxx xxx
221 543 xxx xxx xxx
This goes on from left to right for 45 odd columns.
I need to copy each set i.e set 1 is 123 down to 122 to say cell a25 and then copy the next set i.e. 456 to 234 below the first set.
I need to somehow write a loop code that knows where to get the 2nd, then 3rd set, etc and copy it to the bottom of the preceeding set
Wondering How To Keep Headers Repeating From Page To Page.
Working with 2000 Excel is bringing some new chalanges. I see things are done different. I am trying now to keep my header to repeat from page to page.
For example I have a header that may say something like:
People, numbers, date, ect. And there are so many new rows they go on for pages long. How can I keep my header on the top of each page when it prints out on paper.
Formula On A Page Updated When Any Value On The Page Is Changed
Assume that calculation is set to automatic and not manual, then is every formula on a page updated when any value on the page is changed, or only when the values in the cells pertaining to a particular formula change?
For instance, if cells a1-a10 have values and in a11 is a sum a1-a10 formula, and in b1-b10 are values and a sum b1-b10 formula in b11, if I change a value in range b1-b10 but do not change any values in a1-a10,then as well as the formula in b11 updating will the formula in a11 recalculate or does excel keep track of which cells have changed and thus is aware that the formula in a11 does not need to be recalculated?
How Would I Properly Setup A 2D Coordinate System?
I am setting up a spreadsheet to be able to calculate loads on spread footings. The thing is the footings may be as small as a 2 x 2 or as large as a 6 x 6 or any combination inbetween so I need a coordinate system (to the nearest inch with a max of 1800 inches) to be able to assign each spread footing to a certain spot in the system with which I can calculate the soil stresses.
I intend to make this as idiot proof as possible for anyone who uses this spreadsheet so I was going to set it up as in the attachment where a user can input each individual load on each footing and the distance between it and its neighbors. The numbers are just random values with in each footing and feet between each one. Naturally most people would probably begin data entry in the upper left footing first so I was going to make that the origin unless for coding purposes the lower left would be best.
In this case the upper left footing would be 0,0 and the footing to its right 20,0 and the one farther right 55,0 (20+35) and so forth.
Options Buttons (How Do I Setup Groups)
I have created options buttons in excel. You know the ones that are 3D and are round and you click in them? I've setup a sheet with questions and a yes, no, or N/A clickable button for each question. It is only allowing me to place a dot in one button at a time. I"m sure this has something to do with grouping. But, if I right click I don't have the choice to go to properties and change the group for the button. Please let me know how I should proceed. Wish I could copy and paste a picture of what I'm talking about. If I right click on the button I get these options:
Grouping (this button only lets me select the regrouping option that doesn't work)
Assign Macro (which I have it assigned to one that I've written)
Macros - Database Setup Using A Spreadsheet
I'm not sure if this is something that can be done by macro, I have a database setup using a spreadsheet in Excel. The first column is a list of customer names, that can be filtered by customer name. If I filter the column, using for example the name Jones, is there a way to add up all the units of the product that they have purchased?
Print The Area With Dynamic Setup?
My worksheet (excel 2003) contains lots of details and requires different page setup for printing e.g.
(a) Cells B3 to R3 downwards: Data details, which user may add more rows of records
(b) Cell S1-Z20: Data summary (formula) linked with (a)
(c) Cell AA1-AK15: Pivot Table linked with (b)
Therefore, I set buttons, linked with 3 macros to do page setup for the different ranges. However, I had some problems i.e.
1. For print area (a), how to define print area parameter in a macro to check the last row of data. i.e. check for last "blank cell" of column "C-E" (others columns contain formula before input the data)
2. In the future, if I or user insert new columns in area (a), is it possible to setup macro that have print area for (a) - (c) shifted without changing the parameter in the macro?
Setup A List Of Names That Is Populated From A Userform
I've setup a list of names that is populated from a userform, this works OK. I have then tried to use a combobox (on a separate form) to use these names as its values, I first used the rowsource property but this only returned the first name in the list and after searching for the last few hours and trying different methods it's still not working.
Here's what I have;
To populate the list;
Dim irow As Long
Dim ws As Worksheet
Set ws = Worksheets("Clients")
'find first row in database
irow = ws.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row
.Range("A" & irow) = txtNewClient.Value
I have also tried the userform_initialize, with no joy either,
Setup A Basic Stock Control Spreadsheet
I've set-up a basic stock control spreadsheet. Part of this requires updating prices of products. My approach was to use 3 columns A,B & C. C would show the current unit price of a product. Where there is a change in price this would be entered in A which would then result in a new average unit price to be calculated automatically in C. When ever this change occurs i need the then 'old' price which was in C to be shown in B aswell.
I've tried using various averaging formulaes but i'm thinking they were probably to basic or just plain wrong
Day Of Week -day Of Month List Auto Setup
What I'm after is a sheet that self generates the day of the week in column A and the day of the month in column B. I have a month long sheet where daily entries get made in the DOW row, the day of the month is a reference. I have a macro to generate a new sheet for the next month and would like to auto populate the DOW and DOM. This typically gets done on the second day of the month (data from the first day is entered on the second)
Correct Setup/Layout For Data On Worksheet
need to enter data of various patients in each row.each patient variables being entered in different rows.but problem is certain reports have multiple values pertaining to different dates but they are of the same patient. how is it possible to enter different values but for the same individual??
Setup A Vlookup For Each The Initiator Field For Each Threat In The E1, E2 Etc Worksheets
I need to create a vlookup function. here is how my spreadsheet looks like:
Threats - Fatigue, impact, external
Initiator - Stress, tension, anchor, vessel, etc etc
Section - E1, E2, E3 ......
1. First worksheet is the Data worksheet. It is a matrix of threats vs sections. Each threat has a few initiators. Eg.
Threat - Fatigue
Initiators - stress, tension, failure.
2. There is a separate worksheet for each section (E1, E2...)
3. In these section worksheets, the information of threats and initiators is displayed.
4. Problem: I would like to setup a vlookup for each the initiator field for each threat in the E1, E2 etc worksheets such that, all the initiators that have a yes in the data worksheet are displayed against the respective threats.
5. Attached: find the excel file.
Figure Out How The Best Setup Could Be Done To Make This Easier For Pivot Table Analysis
I am tasked with putting together an Excel Spreadsheet to analyze our accounts. There are over 80 items for the accounts - about 20 Income and about 60 expenses. These are for various years - actually the last 5 years - by months.
So, I am trying to figure out how the best setup could be done to make this easier for pivot table analysis.
So I have 12 "rows" for each account item for each year.
Maybe I should wait for comments and/or questions before going further.
Just need to figure out how to set up the workbook/worksheet.
Page Break By Asking The Input File For Page Break To Be Done
The code which you provided works fine no problem for a page break. I need to run the macro for the page break by asking the input file for page break to be done.
For Example, If excel filename "A" contain the code which you have given need to ask to input the filename "B" and process need to be done in file "B".
I have added some code to your code which you provided but it gives error message "1004" "Method 'Range' of object '_Application' failed" at following line :
Set rng = oExcel.Range(Cells(2, 2), Cells(Rows.Count, 2).End(xlUp))
Add A Second Sheet To Workbook Named "SetUp"
I have a "Menu" workbook that has 1 sheet named "MyMenu" which only has macros and Hyperlinks on it.
I would like to add a second sheet to this workbook named "SetUp".
Next, as an example, I would have the user list 20 Excel Workbook.xls files on the 2nd sheet (SetUp sheet) in Cells A1 thru A20 (as my example). In column B, directly adjacent to each file, they would enter a generic name of their choice, representing each file. These are files that they would be using frequently. The file names would be entered in cells B1 thru B20.
Now, I need 20 macros on "MyMenu" that can open these appropriate files listed on the SetUp sheet. As an example, I could have 20 macros that are located in Column D on "MyMenu". They could be located in cells D5 thru D24.
2 Things I want these macros to do . . .
First . . .
The Generic name would be displayed in the appropriate cell in column D so that the user would know which workbook they are going to open.
And Second . . .
Clicking on the Generic name would open the associated file.
NOTE: If the user were to enter a new file name in one of the cells in column A and a new Generic name, the name for the macro on "MyMenu" would automatically be changed and the new file name would be opened when the macro was clicked.
What I am looking for is a way of running macros from "MyMenu" sheet by clicking on any paticular macro I want to run just like normal . . . but, I want the macro on "MyMenu" to open the file that is listed in column A of the SetUp sheet.
"MyMenu" has to be a locked sheet. Therefore, the user can not enter or change macros on "MyMenu". I actually have 5 or 6 macros that I would like them to be able to change, but again, "MyMenu" has to be "Password" protected. Additionally, many of the users simply don't know anything about macros or hyperlinks
Row To Page
I have a spread sheet that has 64 rows a lot of columns of text (A-BR). Is there a way to copy each of the rows on a separate sheet and then format the text on that page to be easily read?
e.g Sheet 2 = Row 2, Columns A - BR.
I downloaded a free Excel Check Registry. The first page is what it should be. But the second, third etc. pages are only the basic Excel style. Please tell me how I can make all the pages to look like the first one. I hope I explained it right.
Fit To Page
I have the following VB code, which doesnt do the job. I want to fit my report to one landscape page. if i manaully click "fit to Page" its reduces the size to 49%. I tried outting this in the code, but seems to ignore it,
.Orientation = xlLandscape
.LeftMargin = Application.CentimetersToPoints(0.7)
.RightMargin = Application.CentimetersToPoints(0.4)
.TopMargin = Application.CentimetersToPoints(1.4)
.BottomMargin = Application.CentimetersToPoints(0.8)
.HeaderMargin = Application.CentimetersToPoints(0.5)
.FooterMargin = Application.CentimetersToPoints(0.5)
.Zoom = 49
.PrintErrors = 0