Cita: Dim mensaje As String
mensaje = MsgBox("¿desea agregarlo?", vbYesNo, "mensaje")
If mensaje = vbYes Then
Texto.BackColor = vbRed
Else
'aca se apreto el boton no
MsgBox "no se agrego"
End If
Es este todo el codigo que utilizas?, porque no hay ningun error en el. Si es que hay mas codigo postealo, talves en el resto del codigo es que esta el error.
Y como ya menciono David cambia la declaracion de la variable mensaje:
Código:
Dim mensaje As Integer
' o bien
Dim mensaje As VbMsgBoxResult
A pesar de que la declaras como String, no da ningun error, pero hay que declarar cada variable segun el tipo de datos o el resultado que almacenara.
Saludos