application.calculation

Are there any risks or drawbacks with using Application.Calculation in my scripts? Application.Calculation = xlCalculationManual [My code] Application.Calculation = xlCalculationAutomatic I mean, when it's turned on again, all cell calculation are updated. Right? Or/and are there any...

Hello Everyone, I wrote some code to protect/unprotect all of the worksheets in my workbook, and when I run the code in the vba editor it works perfectly fine. However, I added some shapes to my excel file and then assign the macros to those shapes, so the macro could be run at the click of a...

Hi everyone. In a bit of a pickle again! I have some vba code that compiles a fixed range of cells across multiple worksheets into a single consolidated sheet. So far so good. What I would like to do now, is to add some additional columns to all the consolidated data with some of the...

The code i have is to copy a template, ask the user for the sheet name and some data. All this works fine however the next part of the code is to hide some rows and this always happens on the template rather than the new sheet. Does anyone see what the issue is with the code as to why this...

The macro below is causing a memory warning after it is executed a few times. Is there anything I can do to code it better? Application.Calculation = xlCalculationManual Application.ScreenUpdating = False Application.DisplayStatusBar = False Application.EnableEvents = False With...

im trying to speed up my vba macro. i optimized my code as best i can. removed 99% .select .copy .paste etc turned what i can into with ws1 .bla .bla .bla end with code is 1000 times neater but if anything runs slower... i then found this code below...

I have a trim macro below but it does the entire sheet. Could it be amended please so that it only does the column I highlight or a range of cells? Thanks Sub TrimALL() Application.DisplayAlerts = True Application.EnableEvents = True 'should be part of Change Event macro If...

Previously i gt the below MACRO from a helper user here. But i need some help to other sorting. Can i sort as show below? But do take note on the one in red. "S/N" is in cell A1: Before: Sheet4 (2) <tbody> A B C D E F G H 1 S/N 2 1111 8846 62 7688e 7688 2376 6100 6100a 3 1112...

Hi gang, I need some help. I want to unhide the below range without having the "Yes" criteria. So, when I press my Toggle Button, the action unhides all rows without criteria for all of the sheets in the workbook. I have been playing with the code and I can't figure it out. Your help is...

Hi There's something in my below code that causes the workbook to hang either during or immediately after the named procedures run and I strongly suspect the cause is either in the first or last 4 rows. Private Sub Worksheet_Change(ByVal Target As Range) CALC = Application.Calculation...

In My Range G20:G32 I Have: <tbody> Excel 2010 <colgroup><col style="width: 25pxpx"><col></colgroup><thead>#DAE7F5[/URL] "] G </thead><tbody> 20 Able 21 Bob 22 23 Cathy 24 25 Daryl 26 Edward 27 Fred 28 29 Marvin 30 31 32 Pete </tbody> Sheet1...

Hello, I'm struggling with applying a formula down a column, with VBA. The formula in cell AT13 is: =IF(AL12=1,COUNTIF(R2:R11,"=1"),"0") which I can extend down to the last row of data, but I would like to use VBA, to automate it. The code below does not work, and it looks like I may need to...

Hi Guru, I'm currently working on a pretty big workbook that is set on Manual Workbook Calculation (Application.Calculation = xlManual). Q: How can I add a new workbook and set that workbook to Automatic Workbook calculation (Application.Calculation = xlAutomatic) and still keep my big...

Hi all, getting this expected expression error, it's highlighting the IF part, though I don't know why: Sub FinalEnqCopydown() ' ' Copydown Macro ' ' If ActiveCell.Row < 3 Then MsgBox "Select Last Row in Data" Else Application.ScreenUpdating = False Application.DisplayAlerts = False...

Hi all, I've got a macro that runs through cells in a column and if the cell value is "HIDE" then it hides that entire row and if the cell is "Show" it ignores that row and continues until it finds another "HIDE" or to the first blank cell. For someone reason it works in another file of mine...

Hello everybody. I have a problem with one of my macro: with a bigger amount of data then usual, Excel crashes without reporting the type of error. https://imgur.com/a/gGkwECB I have isolated the part of the code which causes the matter, and it should be the following. In this case the...

Hi All, I am using the below code for removing all the rows contains #N/A. but its giving me error if there is no #N/A in any row. Could you please suggest in which line I need to modify the code and how ? Sub Delete_NA() Dim N As Long, rFilter As Range Sheets("BDR_Table...

Excel 2016 / Win 10 Hello Excellers, I appreciate that i am opening myself up for mockery here, however... is there a way to disable application.calculation when running solver? The reason i ask is that i have a sheet in a workbook that is calculating optimum vials to use based on cost. All...

Hello, Im using below macro till kill all formula in my workbook. Sub KillFormula() Dim sh As Worksheet Application.Calculation = xlManual For Each sh In ActiveWorkbook.Worksheets With sh.Cells .Copy .PasteSpecial xlValues End With Next sh Application.Calculation = xlAutomatic End Sub...

Hi, I'm running the following code but when it comes to line 7 (Windows("Kristian Evans James.xlsx").Activate) it shows the error. Any ideas?? Private Sub Workbook_Open() Application.Calculation = xlManual Workbooks.Open Filename:="m:\ccu ls\fr keying\fr1\Kristian Evans James.xlsx"...