Saving Multiple Sheets As Separate PDFs?
Jan 9, 2014
I have an Excel file with multiple sheets (over 100). I want to save them each as an individual PDF, with different (but similar format) names.
As an example, I want each PDF to be be called "Date Name" (i.e. "1-8-2014 Sarah", and next one will be "1-8-2014 Beth", etc.)
Is there a way to do this all at once, instead of my having to manually save each one? Is there a way for me to set it so that the title lists the date and then, for example, whatever is listed in A1 (which will be the name)?
One other question is that because I get this report from someone else who generates it, the way the file is formatted on my computer is that the print area is set at too small, so if I convert immediately to PDF, everything gets messed up. I have to manually make the print area bigger so that the PDF version encompasses everything on one page. Right now I've been manually adjusting the print area page by page - any way to do this all at once?
View 1 Replies
ADVERTISEMENT
Jun 24, 2014
I'm working on a mac and have a macro that will go through all the sheets in my workbook and save them as PDFs to a specific location.
Sub CreatePDF()
For sh = 19 To Sheets.Count
Sheets(sh).ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"/Users/mikemahoney/Desktop/Publisher Payables/Statements/June 2014" & Sheets(sh).Name & "June 2014 Revenue Share Statement" & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=False
Next
End Sub
The part in bold is obviously where I am saving the PDFs but it is also being included in the naming of the file. Need replacing the red text in the naming of the file with the contents of cell B9? I would still like to save the PDF to "/Users/mikemahoney/Desktop/Publisher Payables/Statements/June 2014" I just don't want the file-path to be included in the name of the file.
Also, this code seems to run into errors if a sheet is hidden, hence starting at sheet 19. Any way to tweak this code to skip over hidden sheets?
View 1 Replies
View Related
Feb 25, 2014
I have a workbook with 100 sheets and I want to quickly save each sheet as its own PDF file. I was able to find some instructions, but the code keeps giving me an error at the highlighted spot.
[Code] ......
View 3 Replies
View Related
Oct 12, 2010
merging the multiple *.xls files into one single *.xls file but each *.xls file com in separate worksheet.
Say i have 30 xls files in datewise i.e., 01.10.10, 02.10.10, 03.10.10 so on....
I want to merge all the above 30 xls files in single file master workbook - in that master workbook file the above 30 xls should come in separate work sheets.
View 9 Replies
View Related
Mar 26, 2014
As part of report consolidation I need a Macro that can read through all the files in a particular location(Say a folder path) Pull the data for each unique products into separate sheet
In the example below : All the rows with "Chocolates to sheet 1" , Drink to Sheet 2 and so on Since the products in column 3 can vary the unique sheets need to be created at run time based on the source data
Workbook1
WEST
100
Chocolates
[Code]....
View 2 Replies
View Related
Dec 31, 2009
The aim of the macro is to save all the sheets in .txt files named as the original sheets.
View 3 Replies
View Related
Sep 4, 2008
I don't do a lot of VBA, so this should be really simple, but I'm going to defer to the experts! Thank you! I often need to group tabs in Excel 2007, but oh the horror if it saves while those tabs are grouped and someone opens it up and starts typing! Is there a piece of code I can enter that will ungroup all the tabs before the file saves?
View 9 Replies
View Related
Sep 27, 2008
how to save my macros to a spread sheet? It seems every time I close my sheet(s) (after saving???) and come back to them later, my macros are gone??
View 9 Replies
View Related
Oct 24, 2007
I would like to have all my worksheets except one hidden when a user saves the workbook. I can do it with a macro but not all users use the macro to save the document and sheets are left visible.
View 3 Replies
View Related
Dec 20, 2007
I need to be able to protect the sheets in this workbook but then I need them to be unprotected when I click the Save File As button and then have them saved again whenever the file is opened back up.
View 9 Replies
View Related
Apr 16, 2012
I have a problem with value's from a userform saving in the sheets as date's. In the userform i fill out e.g. 14-4-12
With the code beneath i save them in mij sheet.
Code:
Sheets("Containerlabels Afdrukken").Range("D6") = TextBox2.Value
When i save this in my sheet, it is saved as text. While i want to calculate with this value as a date, i would like to know how i can save this value as a date.
View 3 Replies
View Related
Feb 21, 2014
i have a workbook blank template for my colleagues to fill in, they fill in this blank template and save it under the serial number of the item they are creating. However a lot of errors exist when they input the serial number inside the workbook where the serial number is a duplicate of a former serial number.
Anyhow i was wondering is there any way when they input the serial number into the worksheet that i could get it to save in a separate workbook and then have conditional formatting to check those serial numbers in the workbook to see if they match?
View 4 Replies
View Related
Nov 20, 2013
I have a large number (couple of hundred) pdf's in a folder for electrical test certificates. The pdf's are in the format 54 Pike Drive.pdf etc. and have the date modified.
Ideally, as well as the address I would like the date modified as this is pretty close to the date of the certificate so will suffice.
Failing the date, just the addresses will do which need to go on separate rows in Excel.
I've tried copying and pasting the files but to no avail.
View 13 Replies
View Related
Dec 3, 2009
I've just created a spreadsheet that we will be using as a project review form. In this spreadsheet I have multiple rows of merged cells, column D to N, for comments. I need these comment areas, merged rows, to autofit whatever is cut and pasted or typed into them.
The first problem is cutting and pasting from a pdf. All of the documents we received for the projects we bid are in pdf format. We often cut and paste from those documents into an older version of our review sheet that was built in Word. Trying to cut and paste the same information into Excel ends up in failure. Is there a way that this can be done without jumping through hoops?
The second problem I’m running into is when I cut and paste into a comment area I get the typical Excel error message that the information being pasted does not fit the area it is being pasted into. It there a workaround for this?
My third problem is autofitting the pasted information into the merged cells. I’ve seen some VBA and tried a couple but they don’t work automatically when the comments area is filled. How can I do this? I don’t know VBA. I'm using MS Office 2003
View 2 Replies
View Related
Jan 27, 2010
I did find something related
http://www.tek-tips.com/viewthread.cfm?qid=1167426
, but as my knowledge in VB very limited I'm unable to make the neccessary modifications to fit my case.
the case:
the warehouse I'm working on is tracked by a big and messy excel file that includes details about various components.
the warehouse is virtually represented by folders that represent a drawer, each drawer includes 0-10 components's dateasheets in pdf file format.
I'm looking for a script that would hyperlink the specific pdf to each component to a certain column that includes the component's name.
there's another column in the excel that supplies in which drawer the component resides as you can see:
http://img251.imageshack.us/img251/7830/blablaf.jpg
You can also see how the drawers are represented virtually by folders with datesheets inside
components 20-29 all reside in drawer 20.
its worth noting that sometimes the whole drawer is empty and so both the column in excel and the folder will be aswell.
the script should(I assume) check the pdf's filename in the drawer( mostly the files's name look like in the screenshot), but sometimes the name is only the component's name,so if there is no drawer number before the component's name it would still know how to identify and hyperlink the pdf.
View 9 Replies
View Related
Nov 13, 2012
I'm actually using a macro that saves all the sheets from a workbook in new separate files, and save them in a specified folder.
Code:
Sub Estrazione_Schede()
Dim n As Long
Dim myNome As String
Dim myPath As String
myPath = "D:path"
[Code] ......
What I'm trying to do is that, instead of saving all the sheets in one folder, the macro would save them in different folders, depending on specific values in a specific cell of each sheet. I tried to modify the macro like this, but it doesn't seem to work properly:
Code:
Dim n As Long
Dim myNome As String
Dim myPathOne As String
Dim myPathTwo As String
myPathOne = "D:pathOne"
[Code] .....
With this code the macro ends up to check the condition only in the first sheet and then it copies all the sheet in the same folder.
View 2 Replies
View Related
May 11, 2008
I load an text file into an excel sheet and after some eventually changes I save (overwrite) it back into the text file again. Now the text file has become a file with 50 pages (49 empty pages). How can I avoid this or how can I set an EOF when no more written lines follows. The code for saving the excel sheet is this:
Application. ScreenUpdating = False
Application.DisplayAlerts = False
Sheets(wsImport).Select
Sheets(wsImport).copy
ActiveWorkbook.SaveAs FileName:=WorkFolder & WorkFile, _
FileFormat:=xlText, CreateBackup:=False
ActiveWorkbook.Close
'ThisWorkbook.Activate
Sheets(wsKwartaal).Activate
View 6 Replies
View Related
Nov 1, 2013
Set up a quick piece of code to convert batches of .doc files to .pdfs
Question 1 : What is the proper syntax to add a filter to the FileDialog to only allow for .doc and .docx files
Code:
Sub DocTOpdf()
Dim s As Variant
Dim Res As Integer
Dim oWord As Object
[Code] .....
Question 2: It would seem that randomly when running the code a Run-time error -21467259 (80004005) occurs at
Code:
oWord.ActiveDocument.ExportAsFixedFormat OutputFileName:= _
s & ".pdf", ExportFormat:=wdExportFormatPDF, _
OpenAfterExport:=False, OptimizeFor:=wdExportOptimizeForOnScreen, Range:= _
wdExportAllDocument, From:=1, To:=1, Item:=wdExportDocumentContent, _
IncludeDocProps:=True, KeepIRM:=True, CreateBookmarks:= _
wdExportCreateNoBookmarks, DocStructureTags:=True, BitmapMissingFonts:= _
True, UseISO19005_1:=False
View 2 Replies
View Related
Jun 3, 2014
I am in the process of creating a Phone Roster for my unit. On Sheet1 is their administrative data (Name, Position, Phone Number, etc.). What I am attempting to do is use a formula to find the persons name for that position and place it in the appropriate position and then their phone number below.
Admin!H:H contains the positions
Admin!B:B contains their name
Admin!N:N contains their phone number
I believe the following is what I need =LOOKUP("Operations NCO",Admin!$H:$H,Admin!$B:$B) and it works, but only for the first person on Sheet 2. After that it is random. If there a different formula I need to use to make this work?
When I get the phone number I used =LOOKUP("Operations CO",Admin!$H:$H,Admin!$N:$N) and the same thing happens. It works for the first person and everything else is incorrect.
A problem is the Admin sheet is listed alphabetically, not by position, so I cant use a specific cell to copy the data. I need the formula to find the position, then find the name and phone number of the person in said position.
View 5 Replies
View Related
Jun 12, 2014
I created 14 spreadsheets for each of my call center agents to monitor their metrics. I password protected all then placed the originals on the network. The 14 sheets have 1 cell within them that are linked up to their relevant agent cell in a separate spreadsheet. This spreadsheet is located on the network and automatically updates every hour.
I have monitored the the spreadsheets and updates etc for a while now and everything seemed to be working perfect. So I decided to slowly roll it out by placing a shortcut on 3 agents desktops. I quickly discovered that they were not seeing any updates as I had seen prior to the roll out. I go to the folder within the network and check all spreadsheets and I see all spreadsheets working and updating successfully.
So I thought maybe it was because they were password protected. I removed the protection and the 3 agents saw their spreadsheets update successfully on their computers, the next hour as I had hoped BUT the hour following however they did not see a further update again.
View 8 Replies
View Related
Nov 7, 2013
Is there a way of getting excel to highlight duplicates within 2 separate sheets, one beside the other on screen?
View 14 Replies
View Related
Feb 10, 2012
I have a raw data worksheet with 54000 lines, in the format of six columns
In Column A is the USER Name
What I would like with if possible is code that will move the six columns of data from each individual USER into separate sheets, using Column A as the basis of the new sheets, ie the last row for each user is when the user name changes to the next one.
View 2 Replies
View Related
Mar 6, 2014
I'm currently using the following code (that I found online) to take a list of data and copy it to specific sheets based on the values in Column C (there are only 4 columns in my data set). The issue I have with it is that it's meant to create the sheets from scratch every time. What I could like, however, is for it to copy the data to preexisting tabs that are already named with the sames values that are found in Column C. This macro will actually perform that but the down side is it wipes out everything that's on those sheets but I cant have it do that. Is there a way to either modify this sheet so it only copies the four columns and only pastes the four columns onto the sheets?
Sub SplitData()
Const NameCol = "C"
Const HeaderRow = 2
[Code]....
View 5 Replies
View Related
Jun 26, 2008
below is a VB code to email separate sheets based on sheet anme and email address on a sheet called " mail".
Code seems to fail at the last line " Next a" any ideas why this is not working
Sub Mail_sheets()
Dim MyArr As Variant
Dim last As Long
Dim shname As Long
Dim a As Integer
Dim Arr() As String
Dim N As Integer
Dim strdate As String
For a = 1 To 253 Step 3
If ThisWorkbook.Sheets("mail").Cells(1, a).Value = "" Then
Exit Sub
View 9 Replies
View Related
Aug 8, 2008
I have information in range(p10:Q10) on sheet DEMO! that I want to paste the Values only into a Separate sheet "LIST!" in columns(W:X). The row will vary and will be based on the cell: "DEMO!A3" and will match a cell in column A of "List!"
View 9 Replies
View Related
Jul 4, 2007
What I want is one sheet that has all of the fomulas, then 4 other sheets that take those formulas and calculate the output based on the formulas and one column of input.
So essentially, I want to be able to change the formula once, and have it applied to all of the other sheets, resulting in a new output for each one.
View 4 Replies
View Related
Jan 31, 2014
I have the following macro that exports pdf's for every value in a validation list. Currently it's setup where I have included each value in the macro. This is fine with just a few values but I am about to add 900.
My question is, is there a way to write the macro so it exports a pdf for every value within a dropdown list until it hits a null value instead of what I have below so i don't have to repeat everything for every value in the list?
Here is what i currently have.
Sub Export_MarketSpecific()
'
' Export_MarketSpecific Macro
'
'
Sheets("Home Page").Select
Sheets("MOA-Page 1").Visible = True
Sheets("MOA-Page 1").Select
Sheets("MOA-Page 2").Visible = True
Sheets("MOA-Page 1").Select
Range("D2").Value = Range(Range("D2").Validation.Formula1)(2).Value
[Code] ..........
View 7 Replies
View Related
Jun 9, 2014
In the attached sheet, i have data in 2 sheets in the same fromat. Both the sheets are seperate reports.
Coloumn A is the list of Team Ids, Coloumn B is the Ids of people who are assigned in the team. Sheet 2 also have the same details with changes in the people ID.
i am trying to find if the people IDs in report 1 is the same in report 2. i need a formula that will check if the people ID is matching to the same team ID as in report 1.. If its not the same, the formula should be able to show that.
eg :
In report 1, "197595" in coloumn B is against "4011-11341" in Coloumn A.
I need to check if "197595" is against "4011-11341" or some other number in report 2. If "197595" is not against "4011-11341" in report 2, it should show me " Miss match". if "197595" is is against "4011-11341" in report 2 as well, it should show me "match"Project match.xlsx
View 3 Replies
View Related
Feb 1, 2013
I need to take the data out of one column from sheet A and compare it to the data on another column sheet B.
Real life example:
I have a very large list of contacts with multiple columns of data. On a separate spreadsheet, I have a list email addresses that I need to remove from the larger list of contacts. How can I compare them against one another to detect any matched email addresses for deletion?
List of contacts is appx 130mb
List of email addresses is appx 4mb
View 2 Replies
View Related
Jan 9, 2014
I have two spreadsheets, one is a Log Sheet for invoices that we have been printing out and filling in my hand throughout the day as our field technicians complete their work. The second spreadsheet has a sheet for each technician where we manually input the technician's invoice numbers and payroll for each job completed on that day.
What I'd like is a way to combine these spreadsheets so that instead of printing and filling in the first sheet by hand, I could input the invoice data and have it automatically populate the cells for the appropriate technician.
This is the running log we keep throughout the day:
2rp76ky.png
Then at the end of the day, we painstakingly transcribe the data for invoice number and payroll onto this sheet for each technician:
4vg6dk.png
What I want is for Excel to automatically fill in each technician's payroll log with invoice number and payroll time as we fill in the running log throughout the day, is this a doable thing?
View 1 Replies
View Related