.orientation

Hi, I have the below code which is returning an error, I believe near the bottom. It says I need to "End With" but when I put "End With" before "End Sub" it says it wasn't expecting "End With" :banghead: I'd really like this to run without any problems. Can someone please show me where I am...

Hello I have the below code (I am only providing the bottom half of the code as it is long). What I would like to do is where I left the first gap in the code I want the macro to check if Cell B16 is blank on sheet: "weekly process", if yes I want it to skip to the next blank and run from there...

Hey guys, Ive basically recorded this macro and want to make it dynamic to sort through lots of data. Basically I want to filter the data on one tab and limit it to one voucher and that voucher should have only one signedamount. Then I want to copy and paste that data onto a new tab that has...

How do I modify this code to have Excel grab all used rows and format all row heights to 15.00? Sub Format_Make_Ready_Board() 'Formats columns and rows Cells.Select Selection.Font.Size = 8 Rows("2:2").Select With Selection .HorizontalAlignment = xlGeneral...

I have a pivot table based on a SQL query of transactions. the pivot table summarizes sales activity by unit producing a two year history by item and customer. There are three calculated columns that are repeated for each month and then a yearly set. Of interest here is the current year total...

Hi Everyone, My apologies in advance if this has already been answered; my searching has proven fruitless! I am attempting to export different ranges of the same sheet as separate pages of a single pdf document. What I am after is: Page 1 of the pdf: With ActiveSheet.PageSetup...

I recorded a Macro and now I'm trying to edit it to auto fill to the last row. this is what i have so far. Thanks Range("C2").Select Range(Selection, Selection.End(xlDown)).Select ActiveWindow.SmallScroll Down:=-234 Application.Run "'ILCHotSheet (v3).xlsx'!BAZINGA_007"...

Hey everyone! I recorded a macro to create a pivot table (amongst many many other functions) and everything works except for ONE item in the pivot table. The line of code to include the pivot table "Months" above "Status" is not being read. I've putzed with it, and I cannot seem to figure out...

Hello, I have a shared macro enable excel workbook where the code runs perfectlyfine in my computer, but when another coworker runs the same macro using the sameworkbook, they get an error message when it comes to creating the pivot table(in red below). Why would it work perfectly fine in my...

Hello, I have a vba code that inserts a pivot table and in a section it willfilter the data by a specific field. My issue now is what if in the data thatspecific field is not available. How can I write in vba code if “Watchlist” isnot an option then leave the pivot table blank? This is the...

Alright so I've written 90% of my program by hand, and I figured one part that would be ideal to simply record once all the manual sorting is out of the way would be the Pivot Table formatting. For some reason, I get the following error from the below code: Runtime Error 5: Invalid Procedure...

Hi guys, I am trying to understand why my PT doesn't sum all of the existing rows. I would need your expert oppinion on this problem. Somehow is taking only a part of the existing rows into consideration. My Database is in the PivotTable sheet and from there is taking the information for the...

So i made this sub that makes a new sheet called "Statistics" in which there are some pivot tables. I made it so i was able to overwrite the sheet if it already existed. Now i'm trying to figure out how to make a msgbox that asks the user if he is sure that he wants to overwrite the sheet, if it...

I'm working on a very long Macro for my job and I am just about finished, but this is the last part and no matter what I do, I can't seem to figure out the fix. In this PivotTable, I need to have "Managers" as the columns and everything else (i.e. all of the months) in the Values section, with...

Hello, I am seeking out the help of someone here. I am utilizing the code attached to create a pivot table. All was working great, but now a week later I cannot get it to work at all. I constantly get Run-time error '1004' I know its because a portion of my code is not being executed and...

A sheet contains sorts C19:C999 and K19:K9999 and they work fine On the same sheet I want to sort cells K2:K14 the code I use is: ------------------------------------------------- ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Clear...

Hi Gays i am beginner with VBA Code so please i ask your help to how to make below code of create pivot table with dynamic range: Sub Pivot_Data() ' ' Pivot_Data Macro ' ' Range("A1").Select Selection.CurrentRegion.Select...

Hi , i have written a below code however got stuck in below last lines where i am trying to save the workbook in specific Folder Save as and xlsb format with Name Updated BaseSheet and the Current Date . and no need to run another macro when my First Macro Runs and after that it Should save...

Trying to modify VBA in macro that we use to produce payroll data. The report process generates an Excel file, but it has 2 issues that I need to solve. 1. Stop deleting first 4 rows. 2. Stop deleting any columns. The original report (from Pentaho 3.8) creates extra columns and merged columns...

I have a data source that I need to create a pivot table for each day. The number of rows in the data source will change each day so using the following won't work. I need the macro to look at the last row of data and adjust accordingly. Any help would be greatly appreciated. Sub Pivot()...