Search results

Mudassar, try the below and change are per your needs Sub srch() myword = "dog" 'assuming your statement is in cell a1 With Range("a1") .Characters(Start:=InStr(.Value, myword), Length:=Len(myword)) _ .Font.Bold = True End With With ActiveCell...

Supat, Thanks, and yes as Luke says, for Countifs to work properly you need to have the right size array. ~VijaySharma

Mudassar, Though a valid query, however in the context of Excel this is not valid and also I do not see a valid reason for asking this feature. When searching for some text in Excel, it takes you to the cell that contains the search string as the cell is the placeholder for the same. You...

Supat, here you go.... =SUM(IF(FREQUENCY(IF($A$2:$A$14<>"", IF($A$2:$A$14=D2,MATCH("~"&$B$2:$B$14&"",$B$2:$B$14&"",))), ROW($A$2:$A$14)-ROW($A$2)+1),1)) Cell D2 is where you define your search criteria (AB, LK, etc) Increase the range as desired... NOTE: This is a array formula, please...

Supat, Are you only going to have 2 values in Col A, AB and LK? or this can be more. If more, then i do not see the purpose of using the IF condition to be serving the cause. ~VijaySharma

Supat, Put this formula in Col C =A2&B2 Then put this formula in Col D =A2&COUNTIF($C$2:C2,C2) Now assuming cell G2 contains your search string AB or LK put this formula in H2, increase your range as required. =COUNTIF(D2:D21,G2&"1") Change AB or LK in G2 to get the...

Pam, Assuming the daily training duration is for 8 hours. Cell A1 Contains : 8/24/2011 9:00 Cell B1 Contains : 8/26/2011 16:00 Use this formula in - Cell C1 =NETWORKDAYS(A1,B1)*"08:00" I have used the Networkdays to calculate the number of working days, this formula also accepts a...

Guity, The standard Row and Column Grand Totals for the Pivot updates when you apply the filters, is this not helping? ~VijaySharma

@Amar, Welcome to Chandoo.Org forums. Try using the Error bars to accomplish this. http://chandoo.org/wp/2009/07/09/project-milestones-in-timeline/ HTH ~VijaySharma

John, Look at this link... this will help. http://support.microsoft.com/kb/213923 ~VijaySharma

Tags, I created a very simple sheet Month----Qty-----Forecast Jan------151-----165 and so on till Dec. Create a Pivot... and insert 2 calculated fields below is the formula I used... Unit_Diff = FC-Qty Pert_Diff =(Qty-FC )/FC Try this out and let us know. ~VijaySharma

Dave, Welcome to Chandoo.Org Forums. By default all cells have the Locked Property enabled. Please select the cells where you want the end user to be able to enter data. Right click and select Format Cells (or CTRL+1 keyboard) Click on the Protection Tab Remove the check mark from...

@John, For this example I have selected Column C only. 1. Select Cells C2:C20 and then setup Data Validation---&#62;List---&#62; Y,N Now bring up the VB Editor (ALT+F11) Double click on the sheet where you have setup the data validation and paste the below code... Private Sub...

@kilele, Try to read the below post... http://chandoo.org/wp/2010/08/25/excel-everest-review/ ~VijaySharma

Try pasting the Chart as a Picture (Windows Metafile) or JPEG by using the Paste Special method. You will not be able to edit the chart post this. ~VijaySharma

If you need to delete the entire row for the cells having the value of 5 below is the code for the same. Sub DeleteRows() Range(&#34;A1&#34;).Select Do While ActiveCell.Value &#60;&#62; &#34;&#34; If ActiveCell.Value = 5 Then ActiveCell.EntireRow.Delete ActiveCell.Offset(-1, 0).Select End If...

Ans 1: for Cell D1 =A2&if(isna(b2),&#34;&#34;,b2)&c2 Ans 2: for cell D2 =Trim(A2) & Trim(B2) & Trim(C2) If your objective for Question 2 was only to get rid of that extra space. ~VijaySharma

Saneesh, Welcome to Chandoo.Org Forums. Try =INT(Firstdate - SecondDate) I hope this is what you were looking for... ~VijaySharma

Hi, Here is the updated code to take care of the issue... Just one point to keep in mind.... the Start and End Time columns should be formatted as h:mm:ss AM/PM Sub createTextFile() Dim strFileName As String Dim myFreeFile As Long myFreeFile = FreeFile strFileName =...

Hi, Try the below code and let us know... Sub createTextFile() Dim strFileName As String Dim myFreeFile As Long myFreeFile = FreeFile strFileName = "c:test.csv" Open strFileName For Output As myFreeFile Range("A2").Select Do While ActiveCell.Value &#60;&#62; ""...

And then you can convert the format to DD-MMM-YYYY for the whole column... Here is the formula...

Jagadeesh.... I was in the middle of writing a very complex formula to get this....and was about to finish... when I changed my Regional Settings to "English (United Kingdom)". Try this out and hopefully your issue will be resolved... I will continue to write that formula and share as...

Anar, Try the code below... Function LastRowInOneColumn(col) 'Find the last used row in a Column: column A in this example 'http://www.rondebruin.nl/last.htm Dim lastRow As Long With ActiveSheet lastRow = .Cells(.Rows.Count, col).End(xlUp).Row End With LastRowInOneColumn = lastRow...

OleMiss, 1. Select the merged cell (2 rows x 9 cols) 2. Define a range name "dataCell" as I have used in the example above. Now if you run the above code it shoud resize the cell. ~VijaySharma

Kanu, Please define the color codes to be used against the values and maybe we will be able to help you out. Color Code ------- Status Name Red ------- Long Pending etc.. ~VijaySharma