Mr.. 5150..
Can you please provide the logic behind selecting A & D for chart 2.. how you decide that these 2 rows are dynamic..
or can you elaborate lil bit more..
@Luke M .. Just a side note
Lookup has one more hidden feature.. :)
If Result vector was missing then.. Lookup vector return the results from the last Column in Lookup Vector..
=LOOKUP(C14,$C$5:$E$11)
Hi Vikas_Gautam
may be Somendra doesn't tried your formula..
why dont you upload a sample file with your provided formula.. and correct answer.. so that we also learn some new trick..
Another way.. using Ctrl+Shift+Enter
=SUM((B2:B10=C2)*(A2:A10={"PS","LA"}))
I dont know.. why you are making 1st chart's serier HARD CODED, and 2nd want DYNAMIC...
still lets try ...
Sub ChartTest()
Dim LastCol As Long
Dim ChtData As Range
LastCol = Sheets("DATA").Cells(6, Columns.Count).End(xlToLeft).Column
'Chart1
Worksheets("DATA").ChartObjects("Chart...
Hello..
check this one..
Sub ChartTest()
Dim LastCol As Long
Dim ChtData As Range
LastCol = Sheets("DATA").Cells(6, Columns.Count).End(xlToLeft).Column
'Chart1
Worksheets("DATA").ChartObjects("Chart 1").Chart.SetSourceData _
Source:=Sheets("DATA").Range(Sheets("DATA").Cells(10, 4)...
Hi Blazy!
Pivot Chart will work best in this case..
for more detail.. please check..
http://chandoo.org/wp/2010/12/08/dynamic-dashboard-video-tutorial/
Hi Suresh..
Do you want "Technique" or "code" to achieve the requirement..
* Technique..
Click each sheetName.. using Ctrl Key..
let us know.. if you need code.. and you familiar with VBA environment..
Just a lil bit addition with HUI.
Sub trycopytexbox()
With Sheet1
'Just copy.
.Shapes("textbox 13").TextFrame.Characters.Text = _
.Shapes("textbox 18").TextFrame.Characters.Text
'Just Color and underline
.Shapes("textbox 13").TextFrame.Characters(5, 7).Font.Color = RGB(0, 0...
Simply include your actual formula in IfError function.. like..
=IFERROR(YourActualFormula," ")
Where your actual formula may be "A1+B1".. (excluding = sign).. and then the required display character.. like 0 or space..
In above case it was.. Space..
as per your above screenshot.. this...
Hello..
First .. in your way.. so that you can get it easily..
Sub ChartTest()
Dim LastCol As Long
Dim ChtData As Range
LastCol = Sheets("DATA").Cells(6, Columns.Count).End(xlToLeft).Column
'Chart1
Worksheets("DATA").ChartObjects("Chart 1").Chart.SetSourceData _...
Hi .. DL ..
Welcome to the forum..
Try this...
=NETWORKDAYS(A1,IF(ISNUMBER(B1),B1,C1))
PS: Dont forget to ask your Goverbnment for the HOLIDAYS range.. :)
Hi chirayu..
Its always a courtesy.. to mention the originator of the source..
sharing their article, is somehow showing respect.. and increase their pagecount + social activity..
:)
PS: don't try to mess with "r"
Hi Artik,
Thanks for showing interest on this..
I just fall in love with the code.. :)
The way you use the class module.. has a lots of things to learn..
Welcome to the forum.. and keep guiding.. :)
PS: this site doesn't support GIF avatar.. it stopped flying here.. ;)
By the way..
Excel has one more great feature..
Pressing OK.. will place the cursor on the 1st error occurance or "missing mandatory parameter" location..
You can go-ahead.. by pressing OK.. and excel also has a magical way to detect.. "Missing Closing Parenthesis".. and with a WARNING...
Hi Kuldeep..
thought its looks interesting.. but I am unable to applied it on my scenario.. :(
can you please share the file.. with applied DV & named range..
If someone came here to look for solution.. then it will helps a lots.. :)
Hi JCHAI!
Can you please re-upload the file.. with the pivot table.. and higllight the cell .. where you are applying your double click..
By the way.. I think.. those "TOTAL" fields are avoiding Database rules.. you dont need those "Total" cells.. you dont have to put those cells in raw file..
Theme..
the word is self-descripting itself..
when you want.. a same similarity within your slide, get-to-gether-party, Window's Color scheme or in worksheets.. we use the word THEME..
avoid using themes in this sccenario