You really only should be triggering the macro if Cell A1 changes. This should get you over the line.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [a1]) Is Nothing Then
If [A1] = "Remove ALL" Then Range("A7", Range("A" &...
Hi Alamzeb
Change the button to a command button. This makes the coding a bit more straight forward. Named the commandbutton cbB1.
Private Sub cmdB1_Click()
If cmdB1.Caption = "Unhide" Then
Rows("7:16").EntireRow.Hidden = False
cmdB1.Caption = "Hide"
Else...
This is my weapon of choice when faced with this problem. No looping.
Option Explicit
Sub FilteritBetter()
Sheet2.[a1].CurrentRegion.Offset(1).ClearContents
Sheet1.Range("C1", Sheet1.Range("C" & Rows.Count).End(xlUp)).AutoFilter 1, "CR", xlOr, ""...
Hi @pakilprogramador
Because you have used your Y and Z axis you are a little cornered. One option would be to add some text boxes which change as you click on each option button. I have attached an example though with the table in play I am not sure of the value of adding this information...
Hi Hamish
Your problem is on the Sales Estimates sheet. Take that sheet out and the links go away.
So copy the values of that sheet make a new sheet and paste the values. Now delete old Sales Estimates tab.
Take care
Smallman
Hi Hamish
Do you have charts in the workbook. After trying all the above it is usually the charts that are the issue.
Can you post a file if this is not the case?
Take care
Smallman
Hi bluetaurean
Could you be a bit more specific about what countries you are after. I have a few countries on my site which I put together quite a while back.
India
England
Australia
May be for some assistance. However making them from scratch is not so difficult if a little time...
I am not the only person to hold the views I expressed above. It is interesting to read this:
In the Investment Bankers Handbook (Published)
Which is entirely the point I was trying to make. There will be views which are completely opposite but when given a model with few named ranges and...
I don't say that all named ranged are bad. I say that fewer are better. People who build spreadsheets with lots of named ranges are building burden for other people. I keep my spreadsheets to 6 or less as a general rule. Other people can have a different opinion but less is much better in my...
Hi ysherriff
I audit XL spreadsheets and if I look at a spreadsheet and the cell says
=A1 * CPI
I have no idea what CPI is at this stage. I now have to go Ctrl F3 now I see that CPI is in Sheet2 Cell A4. I get out of the name manager and I go to Sheet2!A4 to see what CPI is.
Easier if...
YSherrif
Your year in the post construction sheet is a number and your years in the other sheet are text. Not the same. Won't work as a result.
I put your data in a fresh file. See the cell in Yellow.
Take care
Smallman
@SirKT
I almost always test my code before I post it in an open forum. So that error message you got I don't get in a pure test environment. When you say the above code actually copies worksheets that is what your original code was doing. So I just replicated this. If you wanted something...
Hi Sirkt
Yours is not a straight forward solution because of the OLAP formula in your file. I ran a test on some new coding put some dummy files in a temp directory and the code worked a treat. Here is the generic code:
Option Explicit
Sub OpenImp1()
Const sPath = "D:\Temp\" 'Change...
Sirkt
That code works wonderfully on my machine. You did not provide a source file which means no one can know what the structure of the data you are importing is. The source file is just as important as the file you provided. I have uploaded dozens of files in this way and be assured the...
Hi
Replace this line of code
For Each sh In mybook.Worksheets
sh.Copy after:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
Next sh
With something like this.
Dim ws as worksheet
For Each sh In mybook.Worksheets
Set...
Hi Seriously_tho
Just add a pivot table to your data and attach a chart to the pivot table. It is simple and it works.
See example attached.
Take care
Smallman
Margil
Please post a sample of your workbook with more detail around what you are looking to change or save. This will supply some context to assist you.
Take care
Smallman