I am trying to put together a standalone VBA macro that can easily be inserted into my financial models that allows me to quickly switch between two different printing setups - e.g. 8.5x 11 and 11x17 tabloid.
I also am using excel 2007.
I've prepared an excel file (excel 2007) with some tabs that contains several charts (4 to 6 charts). When I want to print this file, the sheets with the charts on it doesn't print properly. I have set the print area to cover the charts only and then set it to fit on 1 page but the charts will not scale to fit.
I read somewhere that this is an excel bug - is there a workaround for this?
I could resize all my charts smaller but only as a last resort.
I hold some data in the Excel 2007 file. It's about 400 rows and about 10 columns. On occasion I have to print some values from this file. But it has to be in defined position on the paper. It is like I already have the prepared paper with fields, and I just have to fill some fields on the paper with data from the columns. Is it possible to make a program that will take each row that I label for printing, and print just some columns but in a defined position on the paper ?
View 5 Replies View RelatedThis 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
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)
Column Widths
•A - Last Call Date (w=10),
•B - Priority (w=7),.............
My macro "prints" (saves) my sheet as Pdf-file.
I wish to improve this such as print/save is based on the active area I choose at the time.
Now I must hide a lot of columns (show only the ones I will print) before "printing":
Columns("A:Z").Select
ActiveSheet.PageSetup.PrintArea = "$A:$Z"
I just want to select some columns and set this range as a print.setup area.
The code to merge sheets to a master sheet runs great, however when I copy the code to the Personal.XLSB to have the macro available to use on every workbook I’m getting an error. The line of code is Application.Goto DestSh.Cells(1) and the error is Method ‘Goto of object’_Application’failed. This happen even if I create a new workbook with 3 sheets and only a few cells with information. The macro to mail the sheet works fine using the Personal XLSB.
View 11 Replies View RelatedI want to do simple calculation using Macro in MS Excel 2007..
All the data is in Sheet1 ( Which is 13a ), the calculation is in Sheet2 ( Which is work ) and the result of the calculation will come out in Sheet3 ( Which is result )..
Here is my coding..
A certain macro (or is it a VB script?) in an Excel 2007 spreadsheet has to be manually recalculated every time I open the file. The only way I've found to do this is to click in the formula bar and hit Enter, or else click the green check mark to accept the formula. The spreadsheet is set to recalculate automatically, so I do not understand why this is happening.
Another wrinkle is that I can't locate the specification/definition of the macro. I checked the Developer menu on the ribbon and looked in the Visual Basic and Macros lists, but could not see the definition of the macro in question. Another user created the spreadsheet but I am unable to contact him...
I am trying to rename a excel table from its file name after importing the data into the current sheet i am working in. Is there a method for going this? I can do it manually easily, but when I try to record myself within a macro, it still uses the file's previous name in the code before renaming it. Using Excel 2007.
View 5 Replies View RelatedI have a sheet with 500 rows and 20 columns. I want to put an input box and a button on a different sheet. What I would like to happen is that when you put the criteria in the input box and click the button it opens the form for the row corresponding to the criteria and allows you to edit the 20 columns. Excel 2007.
View 6 Replies View RelatedI have a CSV that I have a excel macro created to do some formatting and then export the data into Access. that part works. I also have it checking for duplicate entries and skipping them. The problem that i run into is that not all my duplicates are truly duplicate, there have been updates and now i need to update Access. I have 2 fields, my primary key which is what I'm primarily matching on and then I'm checking if its been updated by checking another field "Last Changed" If this field doesn't match then I need to update the record.
At this point I'm trying to use a SQL UPDATE and I now believe that i have it formatted correct but when it gets to a record that needs to be updated I get an error: Run-time error '-2147217887 (80040e21)': The changes you requested to the table were not successful because they would create duplicate values in the index, primary key or relationship. I'm not sure what I'm doing wrong. the only other thing i could think to do would be to check each field to see if it has changed and just run the query against that but I feel like i would run into the same issue.
This is how I'm connecting to Access:
Code:
strTableName = "TableName"
strDBLocation = "xxxxuserhomexxxxxxxxxxxxDatabaseDatabase Backend.accdb"
strConnect = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" & strDBLocation & ";"
Set cn = New ADODB.Connection
cn.Open strConnect
Set rs = New ADODB.Recordset
rs.Open strTableName, cn, adOpenKeyset, adLockOptimistic, adCmdTable
And this is the Query I'm using:
Code:
strSQL = "UPDATE " & strTableName & " "
strSQL = strSQL & "SET [Work Order ID] = '" & Range("B" & r).Value & "', "
strSQL = strSQL & "[JOBSTATUS] = '" & Range("C" & r).Value & "', "
strSQL = strSQL & "[SUBSTATUS] = '" & Range("D" & r).Value & "', "
strSQL = strSQL & "[Job Status] = '" & Range("E" & r).Value & "', "
strSQL = strSQL & "[STATUSDATETIME] = #" & Range("F" & r).Value & "#, "
[Code] ..........
The SQL code sits in a loop with an IF so it shouldn't execute every time and I plan on once i get this working to revisit this code and try to optimize it but that is not a priority currently.
I'm using both Excel 2007 and Access 2007 on XP.
I have a file with 2 columns (A=headers, B=values x 38K rows) and need to transpose them to rows.
I found code to transpose a specified number of rows in a column (i.e. every 5th row in the column)...
BUT my columns have variable numbers of data points, because in the exported file any head with a null value was excluded.
So I need to start new rows with a specific text value of "Username" occurs in column A.
I have an excel workbook created in 2007, but now running in 2010. In the workbook I have a form Combo box with a macro assigned to it. When I click any value in the combo dropdown list the macro executes. In 2007 I could click the combo dropdown box and then press ESC to exit from the form control without executing the assigned macro. Similarly I could also click on any other cell to exit from the control without executing the macro.
But, in 2010 if I press ESC or click on any other cell the macro will execute. Sometimes I want to be able to exit from the combo box without executing the macro.
Run an xlm Excel file VBA / macro code on Adriod tablet, during a job interview situation, in order to showcase my work. Is this technically feasbile ? I don't want to bring a lap-top, for fear of the hassle the interviewer wants me to modify the code on the spot during interviews.
View 1 Replies View RelatedI tried sending this message once before but the system crapped out. At least on my end. If it was sent and this is a partial duplicate. At any rate, as most of you know when an Excel workbook has a large number of merged fields Excel sometimes changes all the cell (not just the merged cells) formats to a Date type, with the exception of those cells that are the Text data type. I found the following code on the net someplace and I can't properly cite the author, that when run resets the cell formats to the default format which is General for all those that had been changed.
Sub CleanStyles()
Dim sty As Style, wbTemp As Workbook
' First, remove all styles other than Excel's own.
' they may have arrived from pasting from other workbooks
[Code]....
This code worked for months. However, it no longer works. I opened the code in the VBA editor and stepped through it using F8. The first time I pressed F8 the first line in the code is highlighted, just like always. The next time I pressed F8 the third line of code (not counting the remarks or blank lines) is highlighted. It did not highlight the Dim statement.
I'm using Excel 2007 in XP.
In Excel 2003 I created a macro that copied data from a table, pasted into a new sheet, created a pivot table, copied and pasted that data next to pivot table, sorted, copied and pasted into chart data. I've used this macro in Excel 2007 with no problems.
Now I'm trying to create a similar macro but it won't complete the pivot table. My Pivot Table Field List should have the Row Label and Values populated but when I run it all that is populated is the Values field.
Is there something in 2007 that will not allow me to create a macro using a Pivot Table or am I doing something wrong? The code is below if that helps ...
I'm trying to convert the values entered by users into specific cells into a specific percentage. When I use this macro in Excel 2010, I can enter the value to be calculated directly into the cell and the macro runs automatically. When I open the file in Excel 2007, the macro does not calculate properly unless the value to be calculated is entered into the formula bar.
For example, in Excel 2007, if I enter '30' in cell E11, it should come out as '20%'. Instead it comes out as '0.2%' unless I enter '30' into the formula bar, which then calculates properly. It is far more efficient to be able to enter the value directly into the cell.
[Code] .....
I have created a macro that a couple of us can run at the end of the day that looks in a preset folder and has whatever .xlsx files in that append to each other creating one .txt file. It then saves that .txt file and runs a batch file that strips off the .txt file extension. This is the format we need the ending file to be in so we can FTP it to another agency.
Myself and another coworker can run it without any problem and it asks us if we want to save the .txt file before it closes it and runs the batch file stripping off the .txt extension. We say yes and it executes as designed. Another coworker runs it and it looks like the files are appending then the window closes. Never prompts him if he wants to save and the file is nowhere to be found. From what I have researched all his excel settings match ours. We are all running the same OS (XP) and version of MS Office (2007). The part of the macro that seems to just be ignored is below:
[Code] .......
Then the following batch file runs stripping the .txt file extension:
FOR /R "T:Cash ManagementUnsecured\_Team - DisbursAUTOMATIONInput" %%f IN (*.txt) DO REN "%%f" *.
I have tired removing the ActiveWorkbook.Save command thinking it would default to prompt him to save it but it doesn't.
I have a macro with "ActiveWorkbook.Protect Password:="password"" . It was working fine in excel 2003. In excel 2007, because of this I am not able to run any macro's in the workbook. I am getting a message "The macro may not be available in this workbook or all macros may be disabled. I can see a security warning in message bar saying macros have been disabled, but I dont have have a option to enable the macros.
View 9 Replies View RelatedI have a series of macros I have built to automate some report manipulation at my office. One of the macros I built inserts formulas into specific columns. When I run this macro, all the formulas, save one, are populated perfectly into the column they need to be in. This particular formula is swiched over to R1C1 Reference Notation.
In the workbook I built the macro in, it inserts the formula in the correct notation. When I run the macro in a different workbook, this one formula is converted to RC Notation and then is displayed as text (since the workbook is not set to the R1C1 Reference style option).
Is there a bug in my VBA code? If so, how can I correct this?
I use Excel 2007. Macros are saved in my Personal.xlsb workbook. All other forumlas populated by the macro work correctly.
What i have is a workbook that can have multiple sheets. Sheet 2,3,4 (if there are) are a continuation of sheet 1. First 2 rows of sheet 1 are headers and the last row of the last sheet (can be 2,3, 4....) is a footer. There are 14 columns (A-N) in each sheet. Col "N" has set status and col I has set names.
What i am looking for is a macro that can perform the following actions in the the set order:
1) deletes all rows where status in col N is "closed"
2) delete all rows where name in Col I is "Many"
3) if there are multiple sheets copy all data in 1 sheet once above 2 are deleted
4) I want to update cell A2, C2, I2, M2 & N2 with Hostel, Direction,Name,Flight & Status respectively
5) Create a pivot table with all data (Col A-N & Row 2 to last) in a new sheet and call it Summary - Pivot
I can then manually select how the pivot will look
Currently i am going through all sheets manually and filtering data. Using excel 2007
I have a workbook created in Excel2003 as an xls with a nuumber of buttons to call macros. I converted it to an xlsm in Excel2007 and now get the message "((#Ref.xls could not be found..." whenever I click any of the macro buttons. Event code in the individual worksheets works fine.
View 6 Replies View RelatedI have a workbook with 4 sheets and with sheet 5 as a "consolidated" sheet. I have to create the macro, which will on a daily basis copy the populated data from those 4 sheets and paste into the sheet 5 (same workbook). The data in the Sheet 5 should be pasted from row 2 below each other.. Row 1 will be the headings and shouldn't be replaced. The data in all 4 sheets should be copied from row starting 37, columns C to BA but it will end with different row numbers. note that columns A & B are populated but shouldn't be copied.
View 7 Replies View RelatedI just need a macro to open any excel file may be 2003, or 2007 from a folder.
I did tried Dir but not working. I want the macro in 2007.
(Excel 2007), I have a template that I need duplicated for every reference. My Worksheet lists all the references and the macro use to duplicate a worksheet for every reference in the worksheet. The problem is when duplicating now, it duplicates the name of the template. For example, when the macro is ran sheet1= Template(1), sheet2= Template(2) ect.
Here's the code- I think it has something to do with the named ranges
Code:
Sub Macro1()
For i = 1 To Application.WorksheetFunction.CountA(Worksheets("Worksheet").Range("A:A"))
Sheets("Template").Select
Sheets("Template").Copy After:=Sheets(Sheets.Count)
Sheets(Sheets.Count).Name = Worksheets("Worksheet").Cells(i, 1).Text
Next i
End Sub
Running Windows 7, Office/Excel 2007
I have a macro which performs some conditional formatting on a worksheet. Based on the value in cells in one column, if the value meets the criteria some simple formatting is performed (row is colored, font changes for that row etc).
The macro then calls a second macro which performs the same evaluation on the same cells from the same column. If the value meets the criteria (same as previously) it is supposed to change the value of the cell by 1/2.
Both macros work, however the 2nd macro also seems to remove all of the formatting, font changes, coloring etc that occurred from the first macro. I have had the first macro save the active workbook and close and have the 2nd macro re-open the file but it sill overwrites the formatting. If I do not have the 2nd macro run the format changes are saved. I have tried saving the file after the first macro runs with .xls and .xlsx extension and no luck.
I have a macro that imports text file and puts a comma after each number (alphanumeric also). I have tried to change it to put single quote around the number and comm afterwards.
Text file listing
123
456
789
When I run my marco I get the following
123, 456, 789
which is what I want...
Now I want the same text to have single quotes around the data example:
'123', '456', '789'
All that I have tried to adjust keeps missing single quote at the front end and also missing the single quote at the rear end example: 123', '456', '789
Here is the vba I'm running
Sub GetserialNumbers()
Dim FileNum As Long, PathAndFileName As String, TextFromFile As String
Const Delimiter As String = ", "
[Code].....
Whe I run this I have to select the text file to get. I keep it in my documents as a quick access. I'm using MS VBA 6.5 Excel 2007 Windows 7 Enterprise.
is it possible through vba code to determine the macro security level of Excel 2007 and inform the user. I tried the code below , it is executed when the workbook is opened, but it doesn't work.The code below is executed only when the macro security level is "Low". My goal is at least to inform , with a msgbox function, to change manually the security level.
Code:
Dim secAutomation As MsoAutomationSecurity
Dim zLevel
As String
secAutomation = Application.AutomationSecurity
Select Case secAutomation
[Code]....
In Excel 2007.
I have a macro that is set to clear a range of cells. If I make a change to the worksheet (such as adding a column) that moves those cells in the worksheet, the worksheet formulas update, but the macro cell references do not. How can I make my macro update in accordance with changes in the worksheet?