insertar comillas al inicio y al final de cada linea

[erbuson]

Hola:
Por lo que parece tienes un TextBox multilinea, entonces, deberás primero convertir las lineas del TextBox a una matriz cuyo separador es vbCrLf y después añadir las comillas a cada elemento de la matriz.

Por ejemplo, este sería el código insertado en un Command1, suponiendo que el TextBox se llama Text1

Código:

Private Sub Command1_Click()
  ' Creamos Matriz que contiene las Lineas del TextBox
  Dim Matriz() As String
  Matriz = Split(Text1.Text, vbCrLf)

  ' Añadimos Comillas delante y detrás
  Dim Linea As Integer
  For Linea = 0 To UBound(Matriz)
    Matriz(Linea) = Chr$(34) & Matriz(Linea) & Chr$(34)
  Next
End Sub

Adáptalo a tus necesidades.

Saludos