Con macro en excel: concatenar celda y comentario

Estoy aprendiendo con tutoriales de internet ha hacer macros, pero he llegado a un punto que no se resolverlo. La cosa es que tengo hice esta macro (modificada de otra parecida realizada por Damm, creo recordar) que forma parte de otra mas larga:

Sheets("Nombre hoja de los datos").Select
ufila = Range("b" & Rows.Count).End(xlUp).Row
col = Range("b2").Column
k = 4
For i = 2 To ufila 
If Cells(i, col) = "condición para el copiado" Then
Sheets(selecciondia).Range("A" & k) = Sheets("Nombre hoja de los datos").Range("a" & i)
k = k + 1
End If
Next 
Sheets("Nombre hoja de los datos").Select

En si trabaja perfecto, pero me gustaría que si la celda que marca la condición tiene algún comentario lo concatenara con la celda que copia en la celda de destino

Ejemplo: celda A1 es el nombre, celda A2 es la que marca la condición y tiene el comentario, pues quiero que en la celda A3 quede así Nombre -(guion) comentario.

Si se puede hace, me gustaría que estuviese explicado, como ya dije estoy aprendiendo y quiero entenderlo