Forum Discussion
Extract Text based on conditions
Can someone please help me write this Visual Basic function in DAX, I need to create a new column to extract this text from an exisitng column in the Dataset.
Function GetDescription(TEXT3 As String, CLASSNAME As String)
Dim Description As String
Description = ""
If FindWord(TEXT3, 1) = "*GMP*" Then
If InStr(1, FindWord(TEXT3, 2), "AGR") > 0 Then
If IsNumeric(FindWord(TEXT3, 3)) Then
Description = Mid(TEXT3, InStr(1, TEXT3, FindWord(TEXT3, 3)) + Len(FindWord(TEXT3, 3)), Len(TEXT3) - InStr(1, TEXT3, FindWord(TEXT3, 3)) + Len(FindWord(TEXT3, 3)))
Else
Description = Mid(TEXT3, InStr(1, TEXT3, FindWord(TEXT3, 2)) + Len(FindWord(TEXT3, 2)), Len(TEXT3) - InStr(1, TEXT3, FindWord(TEXT3, 2)) + Len(FindWord(TEXT3, 2)))
End If
ElseIf InStr(1, FindWord(TEXT3, 2), "ESA") > 0 Then
Description = Mid(TEXT3, InStr(1, TEXT3, FindWord(TEXT3, 2)) + Len(FindWord(TEXT3, 2)), Len(TEXT3) - InStr(1, TEXT3, FindWord(TEXT3, 2)) + Len(FindWord(TEXT3, 2)))
Else
Description = Mid(TEXT3, InStr(1, TEXT3, FindWord(TEXT3, 1)) + Len(FindWord(TEXT3, 1)), Len(TEXT3) - InStr(1, TEXT3, FindWord(TEXT3, 1)) + Len(FindWord(TEXT3, 1)))
End If
Else
Description = TEXT3
End If
If InStr(1, Description, " - " & CLASSNAME) > 0 Then
GetDescription = Mid(Description, 1, InStr(1, Description, " - " & CLASSNAME) - 1)
Else
GetDescription = Description
End If
End Function
Hi asadnaeem ,
Based on the Visual Basic function you provided, it appears that the function looks for specific keywords in the TEXT3 string, it handles different string operations depending on the presence of certain content, and outputs either a TEXT3 substring or the entire string.
But without sample data it may be more difficult to correctly modify the Visual Basic function to a DAX, I tried to make the modification, if that DAX is not correct, could you please provide me with your sample data and expected results.GetDescription = VAR TEXT3 = YourTable[YourColumn] VAR CLASSNAME = YourClassNameColumn VAR Word1Position = IFERROR(SEARCH("*GMP*", TEXT3), -1) VAR Word2Segment = MID(TEXT3, Word1Position + 5, LEN(TEXT3)) VAR AgrPosition = IFERROR(SEARCH("AGR", Word2Segment), -1) VAR Description = SWITCH( TRUE(), Word1Position > -1 && AgrPosition > -1, MID(TEXT3, AgrPosition, LEN(TEXT3) - AgrPosition), // Add more cases as necessary TEXT3 ) VAR ClassNamePos = SEARCH(" - " & CLASSNAME, Description, 1, LEN(Description)) // Handle error if necessary RETURN IF(ClassNamePos > 0, MID(Description, 1, ClassNamePos - 1), Description)
Best Regards,
Dino Tao
If this post helps, then please consider Accept it as the solution to help the other members find it more quickly.
1 Reply
Hi asadnaeem ,
Based on the Visual Basic function you provided, it appears that the function looks for specific keywords in the TEXT3 string, it handles different string operations depending on the presence of certain content, and outputs either a TEXT3 substring or the entire string.
But without sample data it may be more difficult to correctly modify the Visual Basic function to a DAX, I tried to make the modification, if that DAX is not correct, could you please provide me with your sample data and expected results.GetDescription = VAR TEXT3 = YourTable[YourColumn] VAR CLASSNAME = YourClassNameColumn VAR Word1Position = IFERROR(SEARCH("*GMP*", TEXT3), -1) VAR Word2Segment = MID(TEXT3, Word1Position + 5, LEN(TEXT3)) VAR AgrPosition = IFERROR(SEARCH("AGR", Word2Segment), -1) VAR Description = SWITCH( TRUE(), Word1Position > -1 && AgrPosition > -1, MID(TEXT3, AgrPosition, LEN(TEXT3) - AgrPosition), // Add more cases as necessary TEXT3 ) VAR ClassNamePos = SEARCH(" - " & CLASSNAME, Description, 1, LEN(Description)) // Handle error if necessary RETURN IF(ClassNamePos > 0, MID(Description, 1, ClassNamePos - 1), Description)
Best Regards,
Dino Tao
If this post helps, then please consider Accept it as the solution to help the other members find it more quickly.