Search results

Is this what you want !!! Private Sub Workbook_SheetActivate(ByVal Sh As Object) ActiveWindow.WindowState = xlMaximized Application.WindowState = xlMaximized Application.DisplayFullScreen = True End Sub

Thanks for the feedback.. Welcome back.. :)

Hi Dinesh, Welcome to the forum... Reagrding your query.. In F2.. Use formula as.. =COUNTIF($D$2:D2,D2) Drag downward to get the expected result.

Hi PipBoy808! Below will also work.. as Now can also works as Date. Dim MyDate As Date MyDate = Now MsgBox Format(MyDate, "dd.mm.yy")

+ If you can also provide expected output.. it will be much easier for us.. :)

Check the actual data in R23:R35

http://social.technet.microsoft.com/Forums/office/en-US/717e73f4-a3f4-4f6b-b27c-12162f17b89d/excel-2010-graph-bring-series-to-front-of-graph?forum=excel http://www.pcreview.co.uk/forums/changing-display-order-primary-and-secondary-axes-excel-charts-t1788502.html

Hi pipboy.. Your code is perfectly working fine in here..:oops: Can you please confirm.. what error you are facing..

Hi Partha.. In Case of VBA.. Private Sub CheckBox1_Click() If CheckBox1 Then Worksheets("sheet1").ChartObjects(1).Chart.SeriesCollection(1).Trendlines _ .Add Type:=xlLinear, Name:="Linear Trend", Forward:=[c5] With...

Hi DK, In case of multiple SCH in the list.. Which one you want to paste in List 2 sheet..

What excel version you are using..!!! In case of 2010 + you can use Slicer.. Check this one..

Hi Cruiser.. Printing Hidden ROWS / COLUMNS is prohibited in office package.. as they all are WYSIWYG process.. You can look for some macro.. to unhide the rows, before printing, and re-hide after completion..

Hi Jitendra! Welcome to the forum.. :) Please spend some time http://chandoo.org/forum/forums/new-users-please-start-here.14/ and regarding your query..:confused: * Do you want to create.. Sheet1 Sheet2.. from Sector data file.. or * You want to create Sector Data sheet from all other sheets..

Hi Karthik, Try this.. Sub AddAtEnd() [E8] = Join(Application.Transpose(Range("N11:N" & Range("N11").End(xlDown).Row)), ";") End Sub

Hi Gn0001! As per my guessing power.. =SUMPRODUCT(($C$6:$C$12=$C12)*($D$6:$D$6=$D12)*($B$6:$B$12=$B12)*($D$6:$D$12=$D12)*$E$6:$E$12) You have to re-check highlighted red area..

If Numbe of Question (5) is fixed.. you can exclude the Indirect function.. :) =SUM(IF(MID(B1,ROW(1:5),1)=MID(A1,ROW(1:5),1),MID(C1,ROW(1:5),1)+0,0))

writting from smartphone.. May be not able to show you properly.. still.. 1. Assuming account are In column A. And months are in B:Z. 2. Select the table and press Ctrl D M. (pivot table wizard). 3. Select Multiple Column. (2nd option button) 4. Click next and select table.. 5. Click finish...

Hi Ramesh, thanks for the feedback.. :)

Hi Ramesh.. In E2.. use formula as.. =MID(TRIM(MID(SUBSTITUTE($F$2,CHAR(10),REPT(" ",LEN($F$2))),((ROWS(A$2:A2)-1)*LEN($F$2))+1,LEN($F$2))),3,255)

Hi Karthik.. Try this.. Sub endxldownData() With Sheets("Home") .Range("B11:B" & .Range("p11").End(xlDown).Row) = _ Range("p11:p" & .Range("p11").End(xlDown).Row).Value End With End Sub

If its .. due to some code.. then.. just after the paste operation .. use.. Application.CutCopyMode = False

Sub UniqueMultipleRow() Dim sourceRange As Range, CriteriaRange As Range, Output As String Set sourceRange = Range("A1:D13") ' Set Source Area Set CriteriaRange = Range("G7").CurrentRegion ' Set Criteria Area With sourceRange For I = 2 To CriteriaRange.Rows.Count...

Hi Afarag.. Really confusing.. You have cretaed a lots of puzzle for me.. :( * Where is the "pivot table 1"!!! * Why all those name are created dynamically..!! * Why Pivot Table 1 is in cache but not in any sheet.. but who cares.. With your provided data, I created Pivot as well as Pivot...

Hi Karthik, Please check with the below code... * Now you can exclude any criteria, if you left that criteria empty.. Sub UniqueMultipleRow() Dim sourceRange As Range, CriteriaRange As Range, Output As String Set sourceRange = Range("A1:D13") ' Set Source Area Set CriteriaRange =...

Hi Shahul Provided code by Smallman is fully capable to fill data in Right.. Just need a Small Modification.. If macrcus allows me ... :) Range("B" & lr & ":" & "F" & lr).Value = "=SUM(R[-" & (lr - 1) & "]C:R[-1]C)"