Possible To Have VB Code To Print A File?
Feb 13, 2013
I have this invoice spreasheet and I would like to when I excecute a macro to print, I would also like to use a PDFwritter to automaticly save/print the pdf file to a location and to ad the invoice number to the name like.
INV"current invoice here".
Bellow is the code I currently have. I am pretty sure this was done as I have some invoices saved but now it doesn't work.
Code:
Sub Check_Info()
If Range("AR1") = Empty Then
MsgBox "No Customer selected!", vbInformation, "Customer..."
Range("AR1").Select
[Code] ........
View 1 Replies
ADVERTISEMENT
Apr 14, 2013
I need code to print a file located in my C drive.
View 6 Replies
View Related
Oct 15, 2005
I am trying to have a file print in legal size if I have 56 lines filled in
otherwise print in regular letter size. Does anyone know how to write this
in VBA.
View 10 Replies
View Related
Aug 24, 2007
with creating vb code that will select certain rows in a spreadsheet, set the print area to those rows and print them out, and then reset the print area back to default.
The data is all on one sheet, but is split into 5 different areas, each below the next, with the column headers at the top of each.
e.g.
header_____header_____header
data_______data_______data
data_______data_______data
data_______data_______data
header_____header_____header
data_______data_______data
data_______data_______data
data_______data_______data
and so on. At the press of a button it'll set the print area to the first section and print (the section includes the headers as well as the data). Then at the press of another button it'll set the print area to the next section. There could be any amount of rows of data in each section so it needs to cope with that.
View 9 Replies
View Related
Feb 28, 2007
Is it possible to print a PDF file from a macro? I want to have the pdf file specified by the user in a form to print when the macro is activated.
View 9 Replies
View Related
Oct 24, 2007
I inherited the following code from my predecessor:
ps_filename = "C:Example" & which_area_name & Cells(j, 6)
Sheets(sheets_name).Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, PrintToFile:=True, Collate:=True, prtofilename:=ps_filename
Which created postscript files from Excel. I used to run this code while logged on as my predecessor, becuase only she had write permissions on the relevant file (C:Example). However, her account has now been deleted from the system - I have reset the permissions on the folder so that I can write to it, but the PostScript files created do not work - I get the error message that the file is corrupted and cannot be opened, or that there is a syntax error. The files used to work fine when logged in as my predecessor - could it be that? I have also tried to run the code on a different machine/on a different excel file and the problem still occurs.
View 3 Replies
View Related
Feb 6, 2014
Making a macro that selects active cells (so anything with text in) and sets that as the print area.
Using the default builder I have:
Range("A1:AA44").Select
Range(Selection, Selection.End(xlDown)).Select
ActiveWindow.SmallScroll Down:=30
Range(Selection, Selection.End(xlUp)).Select
Range("A1:AA692").Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$AH$692"
[Code]...
Can trim this code with something
Range("any containing data").Select
ActiveSheet.PageSetup.PrintArea = "selection"
View 1 Replies
View Related
Jul 6, 2014
I have 2 codes that set up different "print areas". Every time i run one of the codes the print area doesn't get set unless i run the same code again. So if i run code A which will set the print area with no issues and then right afterwards i run code B then code B's print area won't get set unless i run code B a 2nd time. And if i now i run code A, the same issue happens and the print area to Code A won't get set properly unless i run the code again.
Here is part of the code that discusses the print area:
[Code] .....
View 6 Replies
View Related
Jan 13, 2012
Is there a way to Print VBA code in color, like how it appears on the screen?
View 1 Replies
View Related
Nov 27, 2007
I have 7 digit values in Col B12: down. I have sheets with names that match any one of these values. Is it possible for a macro to print all sheets in my workbook whose name matches one of the values in Col B cells 12:down??
View 9 Replies
View Related
May 7, 2008
I have some code to select a print area depending on wether or not there is data in a cell. The code I have so far partially works but not quite like I need it to. Here's what I have,
Sub selectprintarea()
Select Case True
Case Range("C5").Value > 0
Range("A1:M47").Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$M$47"
Case Range("Q5").Value > 0
Range("A1:AA47").Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$AA$47"
End Select
End Sub
It will select the print range if there is data in C5 but if there is data in C5 and Q5 it only selects the first print area. I know I need an "If - Else" or something of that nature but I cant figure that out. Also I need it to look at other worksheets not just the active one. I've tried a replacing the ActiveSheet with Worksheets (Sheet1). but that gives me an error.
View 9 Replies
View Related
May 7, 2008
I have a print code that I want to run on a loop. In column A Sheet UPSLabels, I have record numbers 1 through 94.
I have a vlookup in "C1" of another sheet that looks at the record number in "B1" and pulls in the correct information from UPSLabels based off the matchin record number in column A. I would like my code to print, update the number in "B1" by 1, and keep printing the records until it reaches 94.
I've probably supplied too much information, but the point is, I need the loop to run until "B1" reaches 94.
Sub print_loop()
Dim cnt As Range
Set cnt = Range("L1")
ActiveWindow.SelectedSheets.PrintOut Copies:=cnt, Collate:=True
Range("b1") = Range("b1") + 1
End Sub
View 9 Replies
View Related
May 17, 2008
I have some code that Im trying to get to look at the sheets in my workbook and then based on if there is data in a cell and/or cells then select that sheet. Heres what I got so far thats not working. I get an error of Next without for.
Code: ...
View 9 Replies
View Related
Oct 24, 2008
I am having trouble setting print area on rows that can vary from 100 to 6000 rows. This code works good except that the print area cuts off the last row of data every time. "AreaBegin"=row 6 and "AreaEnd" = to last row after a set number of rows have been inserted based on a counter.
Basically how do I get this code to capture the last row for print area?
Sub SetArea()
ActiveSheet.PageSetup.PrintArea = Range("AreaBegin", Range("AreaEnd").End(xlUp)).Address
View 9 Replies
View Related
Jan 19, 2009
I wish the print area to be set based on the number entered into cell "D58". My code so far is:
Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim NumPages As Range
Set NumPages = Range("D48")
Worksheets("Sheet6").PageSetup.PrintArea = Worksheets("Sheet6").Range(0, 0).Resize(NumPages * 21, 47)
End Sub
View 9 Replies
View Related
Jun 11, 2009
I have a print button on several sheets in a workbook. I have a code set for it so that when it is clicked, it will bring up a print dialog box. It looks like this...
Sub Button14_Click()
Application.Dialogs(xlDialogPrint).Show
End Sub
However, on one or two of the sheets, I would like a message box to also display when this button is clicked. The button is called Button14_Click()
Private Sub Button14_Click()
MsgBox "Please print new signature cards for customer(s) to sign"
End Sub
View 9 Replies
View Related
Aug 23, 2007
I have a really simple question - am tryingto print my VBA code, but want to print it as it appears in the VBA window, in colour (i.e. green comments, blue operations, etc). Is there a way to set it so the code prints in colour?
View 3 Replies
View Related
Aug 12, 2013
I am unable to print an office file to a certain printer because I am not the author of the file.. when I copy and paste to a new doc I can print no problem.
View 1 Replies
View Related
Apr 4, 2012
I have this data below in an excel worksheet. I'm using the ws.Cells(x,x).Value command to read values from the cells an print them out to a .prn fixed width file. However when it writes it to the .prn file my numeric fields don't have are not 0.00 but 0. And also the numeric fields are left justified I would like them right justified in the .prn file.
Excel Spreadsheet values
1.135.102/29/120.000.001.135.202/29/120.000.00
My output to .prn file looks like below:
1.135.1 02/29/12 0 0
1.135.1 02/29/12 0 0
I would like my output to .prn file to look like the following:
1.135.1 02/29/12 0.00 0.00
1.135.1 02/29/12 0.00 0.00
View 7 Replies
View Related
Sep 11, 2012
Am I able to call a macro when someone clicks "file" and then "print"? I have a macro ready to go, but I am unable to right click and assign a macro to the print button.
View 3 Replies
View Related
Oct 12, 2007
Instead of me saving a blank text file in the folder where the workbook resides, I would like it incorporated in the macro if possible. The name of the text file would be the value (string?) in cell B5.
Sub MakeTextFile()
Sheets("Sheet1").Select
Dim txt As String, r As Range
Dim Answer As String, MyNote As String
MyNote = "Do you have an empty text file ready in the" & vbCrLf & _
"folder where this workbook resides?" & vbCrLf & _
"This text file needs to be named" & vbCrLf & _
"ABCD.TXT"..........................................................................
View 9 Replies
View Related
Sep 23, 2004
I want to put an Excel workbook to pdf format and print it out at the click of a button located in the book. However, when I try to record the macro to get a feel for how to control pdf with Excel, I get a pdf file but no printout and no code to veiw!
View 9 Replies
View Related
Apr 13, 2006
I am trying to create a macro that opens a .pdf with the name of the pdf equal to a cell value. For a simple example: Cell "A1" contains the text "distinct" and I want the file prexisting file "C:distinct.pdf" to open when the macro is ran.
View 3 Replies
View Related
Jan 16, 2007
Column C (starting at row 5) contains hyperlinks. I want to print the linked file, move down to the next cell, print that file, move on to the next, etc. FYI - The worksheets are from a seperate file.
View 2 Replies
View Related
Jun 11, 2008
I am working on a userform in which user can select diffrent sheets for print.
I want all selected sheets to be printed in a single pdf and it could be great if it not ask for a path to save file.
View 21 Replies
View Related
Jun 4, 2012
Is it possible to write vba code that will generate a text file with ALL changes that were made to an excel file. Ex. If Cell A17 = "Monday, June 4, 2012" and a user updates Cell A17 to "N/A", I would like to know what the value was before and after the udpate was made.
View 8 Replies
View Related
Apr 9, 2014
I have a spreadsheet where I want to require certain fields to be completed then I want to have that file auto emailed. I have learned that I do need to have the file saved before sending otherwise the data will not appear in the email, so with this I want to have the file temporarily saved emailed then the temp file deleted.
Here is the code I have so far but it errors on the blue text, I did change the TempFileName from = "Copy of " & wb1.Name & " " & Format(Now, "dd-mmm-yy h-mm-ss") to = [C16] & "_" & [B6] & "_" & [D6]
Private Sub CommandButton1_Click()
If Range("B6").Value = "" Or _
Range("d6").Value = "" Or _
Range("f6").Value = "" Or _
Range("E9").Value = "" Or _
[Code] ......
View 1 Replies
View Related
Jan 29, 2014
I have a file that I save with a new version number each time I make major changes. The file name currently is: "Telephony Equipment Inventory v26 (Summary).xlsm". The "26" is the variable number. give me the vba code to ensure I open the file with the highest version number?
View 6 Replies
View Related
Nov 8, 2008
I have a macro that cycles through several student ID numbers and prints a progress report for each one. It works great, but I would like to add an option to pick which printer to use at the beginning of the code. In other words, when I run the macro, the printer box opens and I can pick the printer. When I click okay to print, the macro continues.
View 4 Replies
View Related
Feb 27, 2012
I have a workbook with many worksheets. All I want to do is print to PDF those that are visible (I can use just the code name number can't I?) and ignore those that are hidden. It seems simple enough but it will run and do nothing.
Dim sMsg As String, FName As Variant
Dim myArray() As Integer
Dim i As Integer
Dim j As Integer
[Code]....
View 6 Replies
View Related
