¿Por qué Excel elimina los ceros a la izquierda cuando se muestran datos CSV?

Tengo un archivo de texto CSV con el siguiente contenido:

"Col1","Col2"
"01",A
"2",B
"10", C

Cuando lo abro con Excel, se muestra como se muestra aquí:

Tenga en cuenta que Cell A2intenta mostrar "01" como un número sin un "0" inicial.

Cuando formateo las filas 2 a 4 como "Texto", cambia la visualización a

... pero aún así el "0" principal ya no está

¿Hay alguna manera de abrir un archivo CSV en Excel y poder ver todos los ceros a la izquierda en el archivo cambiando alguna opción? No quiero tener que volver a escribir '01 en cada celda que debería tener un cero a la izquierda. Además, el uso de un apóstrofe principal requiere que los cambios se guarden en un formato XLS cuando se desea CSV. Mi objetivo es simplemente usar Excel para ver el contenido real del archivo como texto sin que Excel intente hacerme ningún favor de formateo.

Cuando abra el csv, tendrá la opción de especificar el delimitador y el tipo de datos para cada columna. El asistente de importación de texto tiene 3 pasos. Tenga en cuenta que mis capturas de pantalla son de Excel 2010, pero esto funcionará exactamente de la misma manera en Excel 2003.

Paso 1: seleccione delimitado (en lugar de ancho fijo)

Paso 2: seleccione coma como su delimitador

Paso 3: seleccione cada columna y cambie el formato de datos a "texto". (Verá la palabra Texto que se muestra arriba de cada columna como en la captura de pantalla a continuación).

Los ceros iniciales ya no se eliminarán:

ACTUALIZACIÓN : si no desea navegar por el proceso para que Excel coopere, puede usar CSVEd , un editor diseñado específicamente para editar archivos de texto delimitados. Un buen editor de texto como Notepad ++ también podría funcionar, pero no podrá ver sus datos organizados en columnas.

Acabo de encontrarme con este problema. Si controla la creación del archivo CSV, puede hacer que los datos tengan el siguiente aspecto:

"Col1","Col2"
="01",A
="2",B
="10", C

Cuando se abre como Excel, conservará el 01.

formatee la columna para que muestre cómo desea (p. ej. 00 para 2 dígitos)
Esto tiene la ventaja de que se guardará con esos dígitos (pero tendría que modificar el formato cada vez que edite el CSV)

Primero copie todos los datos / columnas y filas de la hoja de Excel real en otra hoja de Excel solo para estar seguro, de modo que tenga los datos reales para comparar. Pasos,

1. Copie todos los valores en la columna y péguelos en un bloc de notas.
2. Ahora cambie el tipo de columna a texto en la hoja de Excel (recortará los ceros anteriores / finales), no se preocupe por eso.
3. Vaya al Bloc de notas y copie todos los valores que acaba de pegar.
4. Vaya a su hoja de Excel y pegue los valores en la misma columna.

Si tiene más de una columna con valores 0, simplemente repita lo mismo.

Días felices.

1) Pegar mis números en una columna de Excel (eliminará los ceros a la izquierda)

2) Luego haga clic derecho para "formatear celdas" personalizado a 0000 para un # de 4 dígitos, 00000 para # de 5 dígitos. etc ... (trae esos ceros)

3) Copie la columna y péguela en un archivo .txt. (debe tener todos los ceros a la izquierda).

4) Copie su lista .txt.

5) Haga clic derecho en cualquier columna en Excel y formatee el texto.

6) Pegue los datos copiados del .txt en la columna de Excel. (Todos los ceros iniciales permanecen)

Delimita el deseo de tu corazón.

Si el daño ya está hecho y tiene los datos en Excel, puede cambiar el formato de archivo mediante la opción de Formato de número personalizado. Simplemente ponga ceros para la cantidad de lugares que desee (la imagen de abajo tendrá seis dígitos)

Aquí está Macro que también lo haría en toda su hoja. Simplemente especifique el número de dígitos.

Sub whyNot()
Dim WS As Worksheet, fMat As String, p As Long

    '''''Custom Options
    Const NumberOfPlaces As Long = 3 '' change this to number of places you want
    Set WS = ActiveSheet 'or specify the sheet name with Sheets("Sheet1")


        For p = 1 To NumberOfPlaces
        fMat = fMat & "0"
        Next p

        WS.UsedRange.Cells.NumberFormat = fMat

End Sub