Convert Hours, day and week values in minutes

Hi Jon,

Can you attach a sample file with your list of possible numbers and words that might appear. This looks like a modified VLookup() table answer. They aren't that hard.

To attach a sample file, click on "Go Advanced" and then the Paper Clip Icon above the advanced message box.

OK - see the formula of:

=LEFT(A2,FIND(" ",A2))*VLOOKUP(TRIM(MID(A2,FIND(" ",A2),LEN(A2))),$D$1:$E$6,2,FALSE)

in the attached. I created a table also to convert those words to numbers..

You may also try this to see if this works as per the requirement.

Option Explicit

Sub ConvertIntoMinutes()
Dim lr As Long
Dim rng As Range, cell As Range
lr = Cells(Rows.Count, 1).End(xlUp).Row
Set rng = Range("A2:A" & lr)
For Each cell In rng
          Select Case Right(cell, Len(cell) - InStr(cell, " "))
                    Case "minute", "minutes"
                              cell.Offset(0, 1) = Left(cell, InStr(cell, " ") - 1) + 0
                    Case "hour", "hours"
                              cell.Offset(0, 1) = Left(cell, InStr(cell, " ") - 1) * 60
                    Case "week", "weeks"
                              cell.Offset(0, 1) = Left(cell, InStr(cell, " ") - 1) * 7 * 24 * 60
                    Case "day", "days"
                              cell.Offset(0, 1) = Left(cell, InStr(cell, " ") - 1) * 24 * 60
          End Select
Next cell
End Sub