Reputation: 295
I have a column A, that contains either one of the following values:
DATEnone
nonenone
noneTIME
DATETIME
I want to write a function that basically does this:
if A1 is "DATEnone" or A1 is DATETIME:
A1 = "D"
elif A1 is "noneTIME":
A1 = "T"
else:
A1 = "S"
how can I do that in an excel cell function?
Upvotes: 1
Views: 161
Reputation:
Copy-Paste this code in a new module and hit F5 to run the macro.
Sub Main()
Application.ScreenUpdating = False
Dim c As Range
For Each c In Range("A1:A" & Range("A" & Rows.Count).End(xlUp).Row)
If StrComp("DATEnone", c, 1) = 0 Or StrComp("DATETIME", c, 1) = 0 Then
c = "D"
ElseIf StrComp("noneTime", c, 1) = 0 Then
c = "T"
Else
c = "S"
End If
Next c
Application.ScreenUpdating = True
End Sub
This code iterates over column A and replaces the contents based on the conditions you specified.
=IF(OR(A1="DATEnone", A1="DATETIME"),"D", IF(A1="noneTime","T","S"))
in cell B1 and drag it down the B column
Upvotes: 3