Выполните макрокоманды в CSV-файлах или создайте макрос, который преобразует файл в CSV-файл.

Question

У меня есть файл с таблицей информации и информацией о записи.В таблице у меня есть столбцы, один столбец в таблице - номер социального страхования, идентификационный номер в моей стране - 9 цифр.Часто идентификационный номер начинается с 0-значного номера.В Excel всегда пропускается число 0, я написал макрос-код, который добавляет 0. Но я заканчиваю тем, что преобразовал файл в CSV, после преобразования снова пропускает число 0. Я хочу знать, как я выполняю свой код макроса в CSV (которыйисчезли 0 - я буду рад установить макрос для CSV-файлов или, по крайней мере, выполнить макрос, который преобразует файл в CSV-файл и сохраняет исчезающий 0. Вот моя команда, которая работает на xslm:

Sub Add_Zeros()
    Selection.NumberFormat = "@"
    For Each CL In Selection.Cells
        If CL <> "" Then CL.Value = Application.Rept("0", (9 - Len(CL))) & CL
    Next
End Sub

Answer 1

CSV будет иметь 0.Вы можете проверить это, открыв его в блокноте.Если дважды щелкнуть CSV и открыть его в Excel, то 0s исчезнет.

Чтобы сохранить 0s, вам придется импортировать данные непосредственно в Excel.Выполните шаги, указанные ниже.

1. Нажмите на вкладку данных |Из текста
2. Выберите Csv из диалогового окна размещения файлов
3. В мастере импорта текста (ШАГ 1) выберите «С разделителями» и нажмите «Далее».
4. В мастере импорта текста (ШАГ 2) выберите «Запятая» и нажмите «Далее».
5. В мастере импорта текста (ШАГ 3) выберите все столбцы и нажмите «текст» вформат данных столбца '
6. Нажмите «Готово»
7. Выберите ячейку, в которую вы хотите импортировать данные, и нажмите «ОК»