По работе частенько сталкиваюсь с пользовательским форматом ячейки, При копировании часть данных теряется... Как можно скопировать или сохранить все данные... Пример прикрепляю...
По работе частенько сталкиваюсь с пользовательским форматом ячейки, При копировании часть данных теряется... Как можно скопировать или сохранить все данные... Пример прикрепляю...annyshka28
Это то да... Копировать вставить, а когда начинаешь в формулы вставлять типа СЦЕПИТЬ... тогда их уже не видно или копировать и вставить значение... мне важен просто весь текст...
Это то да... Копировать вставить, а когда начинаешь в формулы вставлять типа СЦЕПИТЬ... тогда их уже не видно или копировать и вставить значение... мне важен просто весь текст...annyshka28
отображаемое значение с учетом формата (числового, а не шрифты и разукрашки), можно получить с помощью udf[vba]
Код
Function f(r) f = r.Text End Function
[/vba] использование - см. файл.
пс. файл должен быть сохранен в формате с поддержкой макросов (xlsm, xlsb, xls - в режиме совместимости), безопасность макросов выставлена на средний или низкий уровень.
отображаемое значение с учетом формата (числового, а не шрифты и разукрашки), можно получить с помощью udf[vba]
Код
Function f(r) f = r.Text End Function
[/vba] использование - см. файл.
пс. файл должен быть сохранен в формате с поддержкой макросов (xlsm, xlsb, xls - в режиме совместимости), безопасность макросов выставлена на средний или низкий уровень.ikki
есть небольшой минус - не работает с ячейками, находящимися в скрытых столбцах и строках, а также со слишком узкими столбцами - вместо текста можно нарваться на решётки.
в Вашем случае решается просто с помощью немного иной функции[vba]
Код
Function ff(r) ff = Format(r.Value, r.NumberFormat) End Function
[/vba]
в общем случае - для русской версии сплошной геморрой по приведению пользовательского формата Excel к адекватному формату VBA
есть небольшой минус - не работает с ячейками, находящимися в скрытых столбцах и строках, а также со слишком узкими столбцами - вместо текста можно нарваться на решётки.
в Вашем случае решается просто с помощью немного иной функции[vba]
Код
Function ff(r) ff = Format(r.Value, r.NumberFormat) End Function
[/vba]
в общем случае - для русской версии сплошной геморрой по приведению пользовательского формата Excel к адекватному формату VBAikki
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
