Fijate que el vector este definido del mismo tipo de dato que los datos que queres agregar, por ej, no podes declarar un vector de tipo Byte y meterle un valor string, obviamente dara un "No coinciden los tipos"
Código:
Dim x() As Byte, msg As String
ReDim x(2)
msg = "hola"
x(1) = msg
saudos
-----------------