The example that you provided does not appear to be a PIVOT table and you have only applied conditional formatting to Column A - starting in Row 4. ...
Could you be applying the conditional formatting ONLY to the pivot table? There is a way to overcome problems with pivot table conditional formatti...
Thank you very much for the feedback. I am very pleased that you have been able to get a good solution to the problem. Well done!
You could use a User Defined Function (UDF) to give you the information: Function Author() Author = ThisWorkbook.BuiltinDocumentProperties("Auth...
Are you likely to have more than one workbook open at the same time? If so, the following may be of interest: If the workbook has a lot of con...
It may not be relevant in this case but if the workbook is being opened on a network drive, that would increase the running time. In my last job I ...
Perhaps something like the following: Sub Test() Worksheets(1).Cells(1, 1).Interior.ColorIndex = 43 Worksheets(1).Cells(1, 1) = Int((90 - 1 +...
In the jkp-ads example, there is a "Application.ScreenUpdating" line. I would put after it (at the beginning of the procedure) and before it at the en...
Make the "On Error ...." line a comment line. I would then expect the "Workbooks.Open ...." line to generate an error. You need to "Reference" t...
My first suspicion would be Excel calculation taking place (probably main times as changes are made). Try: Application.Calculation = xlCalculati...
What error message to you get when the code runs? "ThisWorkbook" is only relevant when used in Excel VBA and would mean nothing to PowerPoint itsel...
Perhaps the following will help: If you want to start learning VBA, have a look at the links in Post #9 in the following:
You could hide the "zeros" with cell formatting. For example: #,##0.00;-#,##0.00;; or #,##0;[Red]-#,##0;;
See if the following gives you the solution: You may also find the following of interest:
Try the following formula: =LEFT(A2,MIN(FIND({1,2,3,4,5,6,7,8,9,0},A2&1234567890))-1)