Update in excel

Help Studio
, ,
1

Hi correct this code------
filter_Amount1.AsEnumerable().Select(Function(row) If Convert.ToDouble(row(“ins1”)) > 0 Then row(“ins2”) = 0 : row(“ins3”) = 0 ElseIf Convert.ToDouble(row(“ins2”)) > 0 Then row(“ins1”) = 0 : row(“ins3”) = 0 ElseIf Convert.ToDouble(row(“ins3”)) > 0 Then row(“ins1”) = 0 : row(“ins2”) = 0 Return row).CopyToDataTable()-----
my values in Ins1 Amt and Ins2 Amt and Ins3 Amt are like that $0.00, $10.00, $20.00

2

Hi @Arvind1

Use the below code in Invoke Code:

filter_Amount1 = filter_Amount1.AsEnumerable().Select(Function(row)
    Dim ins1 As Double = Convert.ToDouble(row("ins1").ToString().Replace("$", ""))
    Dim ins2 As Double = Convert.ToDouble(row("ins2").ToString().Replace("$", ""))
    Dim ins3 As Double = Convert.ToDouble(row("ins3").ToString().Replace("$", ""))

    If ins1 > 0 Then
        row("ins2") = "$0.00"
        row("ins3") = "$0.00"
    ElseIf ins2 > 0 Then
        row("ins1") = "$0.00"
        row("ins3") = "$0.00"
    ElseIf ins3 > 0 Then
        row("ins1") = "$0.00"
        row("ins2") = "$0.00"
    End If

    Return row
End Function).CopyToDataTable()

Click on Edit Arguments and map the value
filter_Amount1 (Type: DataTable, Direction: In/Out)

Hope it helps!!

3

Hi @Arvind1

filter_Amount1.AsEnumerable().Select(Function(row)
    Dim ins1 As Double = Convert.ToDouble(row("ins1").ToString().Replace("$", ""))
    Dim ins2 As Double = Convert.ToDouble(row("ins2").ToString().Replace("$", ""))
    Dim ins3 As Double = Convert.ToDouble(row("ins3").ToString().Replace("$", ""))

    If ins1 > 0 Then
        row("ins2") = "$0.00"
        row("ins3") = "$0.00"
    ElseIf ins2 > 0 Then
        row("ins1") = "$0.00"
        row("ins3") = "$0.00"
    ElseIf ins3 > 0 Then
        row("ins1") = "$0.00"
        row("ins2") = "$0.00"
    End If
    Return row
End Function).CopyToDataTable()
4

@Arvind1

filter_Amount1.AsEnumerable().Select(Function(row)
    If Convert.ToDouble(row("ins1").ToString().Replace("$", "")) > 0 Then
        row("ins2") = "$0.00"
        row("ins3") = "$0.00"
    ElseIf Convert.ToDouble(row("ins2").ToString().Replace("$", "")) > 0 Then
        row("ins1") = "$0.00"
        row("ins3") = "$0.00"
    ElseIf Convert.ToDouble(row("ins3").ToString().Replace("$", "")) > 0 Then
        row("ins1") = "$0.00"
        row("ins2") = "$0.00"
    End If
    Return row
End Function).CopyToDataTable()