Hi there,

We've created a VBA to help you solve the problem. In your Excel, please press Alt + F11 to open the VBA window, and then on the Insert tab, click Module. And copy and paste the VBA below into the window:

Function ExtractAndMultiply(xCell As Range) As Long
    'Update by ExtendOffice
    Application.Volatile
    Dim xNum As Long
    Dim xBool As Boolean
    
    xNum = 1
    xBool = False
    
    xArr = Split(xCell.Value, "x")

    For i = LBound(xArr) To UBound(xArr)
        If IsNumeric(xArr(i)) Then
            xNum = xNum * xArr(i)
            xBool = True
        End If
    Next
    
    If xBool Then
        ExtractAndMultiply = xNum
    Else
        ExtractAndMultiply = 0
    End If
    
End Function

Now, you can go back to the worksheet, and let's say the cell A1 contains 5x50x1000, you can enter the formula =ExtractAndMultiply(A1) in another cell to get the product.

Amanda

Hi Turker,
To replace all of a certain character from a cell, you need to apply this formula =SUBSTITUTE(A1,"o","_")