Posts

Showing posts from 2018

How to delete all strikethrough text in excel

Open Ms-Excel Move the cursor to the sheet name "Sheet1" or whatever you have renamed your sheet and right click, then click on view code. A new Visual Basic window will open. In the left corner double click on "This workbook" and type  or copy/paste the following codes in the blank space. Sub DelStrikethroughText()     Dim xRg As Range, xCell As Range     Dim xStr As String     Dim I As Long     On Error Resume Next     Set xRg = Application.InputBox("Please select range:", "KuTools For Excel", Selection.Address, , , , , 8)     If xRg Is Nothing Then Exit Sub     Application.ScreenUpdating = Fase         For Each xCell In xRg             If IsNumeric(xCell.Value) And xCell.Font.Strikethrough Then                 xCell.Value = ""             ElseIf Not IsNumeric(xCell.Value) The...

Convert excel files to .vcf for transfer of contacts from Pc to Andriod device

Open Excel Create three columns with following titles: 1. First Name 2. Last Name 3. Phone Number Fill your data row wise in the respective columns and then press Alt+F11 to enter the Visual Basic mode. In the left corner you will see This workbook under VBA Project (Your file name). Right click on This workbook - Move the cursor to Insert - Click Module A new window will appear, paste the following codes there: Private Sub Create_VCF()     'Open a File in Specific Path in Output or Append mode     Dim FileNum As Integer     Dim iRow As Double     iRow = 2     FileNum = FreeFile     OutFilePath = "D:\OutputVCF.VCF"     Open OutFilePath For Output As FileNum     'Loop through Excel Sheet each row and write it to VCF File     While VBA.Trim(Sheets("Sheet1").Cells(iRow, 1)) <> ""         LName = VBA.Trim(Sheets("Sheet1").Cells(iRow, 1))    ...

Compare two columns and get values from third parallel column in excel

Image
Here's a simple explanation of what I'm having trouble with. Column A: List of 2300 order numbers Column B: Email Address associated with an order number Column C: List of 100 specific order numbers that I need the email address for So, I'm looking to search column A for a value that matches C, and return the email address from column B in a new column (D). The current formula almost works, but instead of returning the email address where A matched C, it returns the email address from the same row. =IF(ISNA(INDEX(B:B,MATCH(C3,A:A,0))),"",INDEX(B:B,MATCH(C3,A:A,0))) This probably will solve the problem and also remove the  #N/A  result that would appear if you couldn't find a result due to its absence in your lookup list. Thanks,  Neil