SOLUCIONADO!!!!!!!!!!!!!!!
Mil Gracias!!!!!
Aprendi algo nuevo gracias!!!!!!!!!!!!!
Efectivamente uno de los usuarios tiene un Windows y Excel en Ingles.......... aunque la configuracion regional estaba bien (configurado de acuerdo con el pais y sus formatos) no se porque hacia esto; pero pasaba.
como veran en el codigo mas abajo implemente la solucion que me indico NEBIRE, y el problema seguia ocurriendo, pero NEBIRE tambien me indico como convertir en texto un numero con: .NumberFormat = "@" . Entonces me recorde que existe DatePart y se me ocurrio hacer el codigo que les muestro; solucionando asi el problema:
For ii = 1 To MSHFlexGrid_CUP_DISPONB.Rows - 1
For J = 1 To 6
'If J = 4 Or J = 5 Or J = 6 Then .Cells(ii + fila, J + 1) = CDate(Format(MSHFlexGrid_CUP_DISPONB.TextMatrix(ii, J), "DD/MM/YYYY"))
'If J = 4 Or J = 5 Or J = 6 Then
' .Cells(ii + fila, J + 1) = CDate(Format(MSHFlexGrid_CUP_DISPONB.TextMatrix(ii, J), "DD/MM/YYYY"))
' .Cells(ii + fila, J + 1).Select
' .Cells(ii + fila, J + 1).NumberFormat = "[$-C0A]" & Chr(34) & "día " & Chr(34) & "d" & Chr$(34) & " del mes " & Chr$(34) & "mmmm" & Chr(34) & " del año " & Chr(34) & "yyyy;@" ' "mm/dd/yyyy"
'End If
If J = 4 Or J = 5 Or J = 6 Then
.Cells(ii + fila, J + 1) = DatePart("d", CDate(Format(MSHFlexGrid_CUP_DISPONB.TextMatrix(ii, J), "DD/MM/YYYY")))
.Cells(ii + fila, J + 1).NumberFormat = "@"
.Cells(ii + fila, J + 1) = .Cells(ii + fila, J + 1) & DatePart("m", CDate(Format(MSHFlexGrid_CUP_DISPONB.TextMatrix(ii, J), "DD/MM/YYYY")))
.Cells(ii + fila, J + 1) = .Cells(ii + fila, J + 1) & DatePart("yyyy", CDate(Format(MSHFlexGrid_CUP_DISPONB.TextMatrix(ii, J), "DD/MM/YYYY")))
End If
If J <> 4 Or J <> 5 Or J <> 6 Then .Cells(ii + fila, J + 1) = MSHFlexGrid_CUP_DISPONB.TextMatrix(ii, J)
Next J
.Cells(1, 5) = CStr(ii)
Next ii
Muchas gracias a NEBIRE, a Waldo, y a Ale_xi, (y a este ultimo el link de codigo de descarga, nunca pude descargarme el codigo de ejemplo que me sugirio, si por favor me puede ayudar(trate de descargarlo por navegador y fallo, luego lo volvi a intentar y me solicitaba registrarme obligado si queria bajarme el codigo)).