MsgBox to display specified ranges values on active row

[MannStewart]

hi

i'm just trying to get Excel to display a yes/no MsgBox that includes the values of 5 ranges on the active row, but I don't know what is wrong with my line 4 which Excel is highlighting to debug:

Sub msgbox()

    Dim Ans As Integer
    Dim Arow As Integer
    Arow = ActiveCell.Row
    Ans = MsgBox("pls check if your input is correct:" & vbNewLine & "" & vbNewLine & "  Today awarded " & Range("B" & thisRow & " of " & ",A" & thisRow & " from " & ",BD" & thisRow & " according to " & ",BE" & thisRow & " by completing " & ",BF" & thisRow).Value, vbYesNo)
    
    If Ans = vbYes Then
     MsgBox " Great! will calculate"
     Activesheet.Calculate
    Else
     MsgBox Prompt:="    revise your input", Title:="  Input Not Processed"
     Exit Sub
    End If
    
End Sub

Can anyone please help ?


cheers

Stewart

[Logit]

What is "this row" referring to ?

[MannStewart]

@Logit

sorry typo should have been Arow

[Fluff13]

How about

    Ans = MsgBox("pls check if your input is correct:" & vbNewLine & vbNewLine & "  Today awarded " & Range("B" & Arow).Value & " of " & Range("A" & Arow) & " from " & Range("BD" & Arow) & " according to " & Range("BE" & Arow) & " by completing " & Range("BF" & Arow).Value, vbYesNo)

[MannStewart]

@Fluff13

you the guru, many thanks for your help again

Stewart

[Logit]

Good code Fluff !

[Fluff13]

Glad to help & thanks for the feedback.