Insertar un carácter en una celda de excel

Antes que nada el apostrofe (') antes de cualquier texto o numero en excel significa que lo ingresado es un texto por lo que deberás utiliar la tilde (´), la puedes sacar con tilde y barra espaciadora.
El código de la macro seria el siguiente:
Public Sub InsertarCaracter()
   Dim i As Integer
   Dim PrimeraFila As Integer
   Dim UltimaFila As Integer
   Dim Columa As Integer
   PrimeraFila = 1
   UltimaFila = 4
   Columna = 1 'Columna A
   For i = PrimeraFila To UltimaFila
      ' No pongas el apostrofe, pon tilde y un espacio
      '    ya que en excel el apostrofe significa que ingresaste un texto
      Cells(PrimeraFila + i, Columna) = "´" & Cells(PrimeraFila + i, Columna)
   Next i
End Sub
El tener esto en una hoja de excel: 
A1 = 19/02/09 1:00 p.m.
A2 = 16/03/09 12:00 a.m.
A3 = 29/06/09  2:00 p.m.
A4 = 13/07/09 12:40 a.m.
la salida seria:
A1 = ´19/02/09 1:00 p.m.
A2 = ´16/03/09 12:00 a.m.
A3 = ´29/06/09  2:00 p.m.
A4 = ´13/07/09 12:40 a.m.

Buenos días:
Ya realice lo que me dices en el proceso pero, te comento que cuando corro el proceso paso a paso en la celda que esta el dato no me respata lo que esta en la celda me pone numero osea no respeta esto ( 19/02/09  01:00 p.m. ) si no mepone numero, sera por que la celda tiene formato de hora, como podría corregir esto en tu rutina

Pues si te pones a hacerlo manualmente ya, puede que si alcances antes del 25 :P... no te creas, en el Editor de VBA (ALT + F11), menu insertar, Modulo, ahí pon esto:
Sub AgregaCaracter()
Dim iColumna as String, Ini, U as Long
iColumna = "A"
Ini = 4
U = Range("A" & Rows.Count).Row
Range(iColumna & Ini, Cells(U, iColumna)).Select
For each c in Selection.Cells
     c.Value = "'" & c.Value
Next
Msgbox "Proceso Terminado"
End Sub
Puse la variable iColumna para que solo modifiques donde dice iColumna = "A" por la Columna donde están tus datos que quieres cambiar, y la variable Ini es el Numero de la Fila donde comienzan tus datos, los modificas a tu caso.
Y para ejecutarlo solo Presiona F5