The bright colors work well, but when they print the sheet on a laserjet black/white printer, the colors make the data almost impossible to read.
Is there a way to allow them to print the sheets and, by default, not print the background fill colors?
Within the Workbook events there is a "Before_Print", however I also need something like "After_Print" which does not exist (as far as I can tell).
I have several rows of data which alternate colors. When I print it I want to take out the fill (so as to save ink) - which I can do in the "Before_Print" event. [No problem.] However, once it is done printing I need to restore the alternating colors, but I cannot think of any event or trigger which would enable this.
I have thought through several things and the closest thing I can think of is setting up a timer. But there is of course no way to now how long to set it for. [Before/After Save also has the same "issue".]
when I copy a worksheet from one workbook to another, the colors on the sheet in the destination workbook, become dull/faded. They actually change from the original colors to some off colors. I copy by selecting the source sheet, hold down ctrl key, then drag from one workbook to another). Also, is there a way to get the sheet back to the original colors.
View 2 Replies View RelatedHow can I fill a cell with a non-standard colour that is not available from Format Cells/Patterns?
View 3 Replies View RelatedCeck this attached file and let me knw what i did mistake in Conditional Formatting
=E2="we have more than 90 days" i like to fill green colors in e2 cell
=E2="we have less than 90 days" i like to fill red color in e2 cell
but its only showing green and white..
I am attempting to create simple charts to show survey results 2005 v 2006. I have a single series in a bar chart - chart type. The wizard initially makes both bars the same fill color. I right-clicked one of the bars to start the Format Data Series Wizard. On the 5th tab, "Options", I ticked "Vary Colors By Point". A new color was assigned to the top or first bar. So far so good. But instead of these colors, I would like to use a different fill effect for each data point in the series
So I walk through the wizard and desiqn a fill effect and click ok. The fill effect is assigned to both data points. I checked where I had ticked "Vary Colors By Point"
It is still ticked. Can I override this somehow so that each data point can have a unique fill effect?
I have a macro to print selected worksheets. It works well with one small problem. Whether I select the last worksheet or not, it always prints. I have tried a bunch of different ways to get around this, and all I succeeded in doing was getting a separate page printed first, then it would print the rest of my selection.
Sub PrintReportSelection()
Sheets("Actual").Select
Application.Goto Reference:="Actualprint"
ActiveSheet.PageSetup.PrintArea = "Actualprint"
Sheets("Deposits").Select
Application.Goto Reference:="Depositsprint"
ActiveSheet.PageSetup.PrintArea = "Depositsprint"
Sheets("Debt").Select
Application.Goto Reference:="Debtprint"
ActiveSheet.PageSetup.PrintArea = "Debtprint"
If Range("SelectVariance") = True Then Sheets("Variance").Select.........................
I'm using VBA code to select several worksheets at once, and print them. The code runs fine, but the result is multiple print jobs, not one job. This is OK when printing to the printer...but undesireable if you want to print to a pdf file, for example.
I've searched the site and found some references to this possibly being an excel problem. Is that true?
I've also checked the page setup setting to make sure that the print resolutions are all the same...that doesn't appear to be the problem either.
When I hide columns in a column chart the different fill colors I used on specific columns no longer show up with the colors I originally had. Is there a way to maintain the proper sequence of column fill colors even when some columns are hidden?
View 1 Replies View RelatedMy pallet lost color-coding - if I hover over each little scare it displays the names for the colors and if I click on them they color the cells with the right colors, but the palette itself lost the visual display of colors except for 8 colors: black, blue, red, magenta, yellow, cyan, and white.
I use color-coding of cells a lot and I find it difficult to work without visual clues. At least the hover-support allows me to get the work done, but with difficulty.
I am looking for a method to remove the shading on a sheet that helps the user to fill in the required date but when I print, I want the shading to be removed or not printed when I hit the print button.
I would like to just use the default print but on excel rather then created a new button.
Is it possible to have a cell colored with a fill color in the spreadsheet, but not have the fill color print when the sheet is printed?
View 9 Replies View RelatedI want to make a popup or some type of inquiry menu where it asks the user to specify which worksheets in the workbook to print. I have a data entry page, and four printable worksheets.
Sometimes I only want to print two of the worksheets, but not the data page or the other two. Any way to do this besides printing the entire workbook or one worksheet at a time? It would be ideal if a popup menu came up with checkboxes for all of the available worksheets and the user could check off which ones to print.
I have a template with 25 very hidden sheets in it, my userform, unhides and slightly modify's some of the sheets. When my userform is completed, there are between 2 and 11 sheets visible. I am trying to put code behind a button on a sheet that will save all sheets to one PDF file. The code below works but makes individual files.
select all active files as pdf
I know it's close but the code to select all active sheets is messed up.
Sub PDFit() ...
Is there any chance to cancel print for set of worksheets? For example in workbook with Sheet1 to Sheet4, i wish to allow printing only for sheet4 and all other sheets to disable print.
View 6 Replies View RelatedI have an Excel form that contains 7 tabbed worksheets, one for each day of the week Sun thru Sat, that is a nutrition tracker and an 8th tab which is a food library. I put two buttons on the food library to automatically sort it by different categories and they work great for me. Then I put a printer icon on each of the daily sheets to print a single worksheet (in B&W) with the following macro changing the "from" and "to" to correct worksheet number for each day. Screenprint below.
Using "Monday" worksheet as an example I first tried using sheet number 10 as shown in the VBA Project below for the "From" and "Two" and it printed the wrong pages, so I went to the worksheet number as they are tabbed in the file, Monday being sheet 2, and it works fine (on my computer).
It works great from my computer, but if I send it to someone else and they try to print they receive the following errors: When they open the spreadsheet and click the print button this error comes up:
If they click "OK" on the above error this comes up
I've tried to include information that is revelant.
I am looking for a way to have print icons on my spreadsheet that will print certain worksheets once clicked on.
For example: My spreadsheet has several countries, UK, France, Germany...
If clicking on the print icon next to Germany - i would like only the German worksheets to be printed - there would be several worksheets for each country.
how would I change the orientation on ALL my worksheets, I'm saying every single one, imagine I got like 100 for the purpose of this excercise (sorry I'm not trying to make this harder, it's just there's always that one guy that'll come on and say 'Go to Print Print Preview, then click on Setup' or something like that.
So yeah, that's pretty much the question that I have for you brainaics:
How do I change the printer orientation setting to landscape on all worksheets (maybe a loop?).
I'm looking at filling in a cell value from the cell above in column A but over a range of worksheets. It only needs to fill down until the last used row.
The last used row in the worksheet will vary for each worksheet .. but the longest column will be column T or U.
this code "works" but only for the active sheet... i'm sure its something easy to adjust.
Sub CopyDataDown()
' ---
Dim ws As Worksheet
Dim Lr As Long
Application.ScreenUpdating = False
For Each ws In ActiveWorkbook.Worksheets
If ws.Name "Notes" _
And ws.Name "FrontSheet" Then
Lr = WorksheetFunction.Max(Range("T" & Rows.Count).End(xlUp).Row, Range("U" & Rows.Count).End(xlUp).Row)
With Range("A2:A" & Lr)
.SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C"
.Value = .Value
End With
End If
Next ws
Application.ScreenUpdating = True
End Sub
I have locked print areas on 7 work sheets. I have successfully printed them at 1 time. However it appears as if the print areas have to be set again before I print them again? What's up.
View 2 Replies View RelatedIn the excel file is a VBA code that is combined with a button if someone click on the button a little menu shows with a multiple options of sheets that can be printed. Only the problem is when i hide the sheets the code doesn't see them anymore and the only I can print is the page where the button is placed.
View 4 Replies View RelatedI came across the following macro that generates a list of worksheets with check boxes to select the ones I want to print. I attached the macro to a button on my "Totals" worksheet. When I run the macro, it lets me pick the worksheets, but doesn't print anything unless "Totals" is one of the worksheets I selected in the dialog box. What is missing?
I also want to stop the screen flickering and have it go back to the "Totals" page when it's done since that's where the button is.
In my excel, i have 3 worksheets. On the first worksheet, i have 2 pages since i have 2 sections side by side. I can't stack the sections due to different column widths. I am trying to see if there is a macro to stack the 2 pages on the first worksheet as one pdf page, and then have worksheets 2 and 3 as pages 2 and 3 of the pdf.
View 1 Replies View RelatedI have a monthly template that has 31 tabs labeled 1 through 31 for the days of the month. I would like to add a macro that would print only the sheets that have a value greater than 0 in either of two specific cells.
Example:
Sheet / Cell B2 / Cell B36 / Action
1 / 0.00 / 0.00 / Don't print
2 / 100.00 / 0.00 / Print
3 / 0.00 / 100.00 / Print
4 / 100.00 / 100.00 / Print
I could add a summary sheet that would pull over these values and/or add if statements that return results like "don't print" or "print" if it would be easier in the macro or I could just use the code in macro to determine to print or not.
I am a record and tweak macro user and this isn't something you can record. I found some simple code in another post that would print one page based upon single criteria but it isn't exactly what I was looking for.
I have a form to allow users to select and print pages from a workbook.
Private Sub UserForm_Initialize()
Dim sht As Worksheet
For Each sht In ActiveWorkbook.Worksheets
ListBox1.AddItem sht.Name
Next sht
Me.Height = 128
End Sub
Only problem is that this lists all worksheets in the form. Need to modifying it so that it does not list worksheets that are xlSheetVeryHidden.
I'd like to create a macro that can access few existing worksheets from different workbooks and print them automatically when i press the button or select them.
Tried userform and listbox that were suggested from other thread, but that didnt work quite well since I'm not quite understand the code behind it.
I used a Macro from here that creates one worksheet from several then prints and deletes it. However the Macro doesn't carry over my column/row size formats. Is there a fix?
View 2 Replies View RelatedI am seeking the most efficient code to print all excel worksheets beginning with sheet "XYZ" and ending with the last sheet in the workbook.
- Sheet "XYZ" is always the starting point
- The number of sheets after "XYZ" is variable
- The names of the subsequent sheets are unique and not sequentially named/numbered
- The printing will be to one report (i.e. don't print pages individually)
I am trying to write code that will loop through one sheet, fill an array and then use that array to populate cells in another sheet. I have a sheet with group names in column A, then in column B through Column IV there are the members of that group. There may be no members in a group or every cell through Column IV could contain data. I need to loop through each row, one at a time, see if a cell contains data, if it does, put it in the array, if it's empty then the array is done for that row. I then need it to go to another sheet and dump that data, however, now it needs to drop it in five consecutive cells in a row, then drop to the next row for the next five cells, etc.
Once this is done it then goes back to the first sheet, drops to the next row nad starts over.
I know how to loop through the rows, I just am not sure how to fill an array using variables for rows and columns. i.e., I can't say fill array with b1 to b30 instead I have to say fill array with intRow,intFirstColumn through intRow, intLastcolumn.
I have a combobox that I populate this way:
' Sets Names in ComboBox1 Contents
With Worksheets("Sheet1")
Set rng = .Range(.Cells(1, "A"), .Cells(Rows.Count, "A").End(xlUp))
End With
With ComboBox1
.RowSource = rng.Address(external:=True)
End With
What I have are 4 sheets one of which has 3 columns that I need to combine into one "Master" drop down, is that possible?
Sheet1 - Column A
Sheet2 - Column A, B and C
Sheet3 - Column A
Sheet4 - Column A