Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Удалить апостроф и заполнить ячейки - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Удалить апостроф и заполнить ячейки (Макросы/Sub)
Удалить апостроф и заполнить ячейки
GGR Дата: Пятница, 24.10.2025, 17:47 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 130
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007
Добрый вечер. Очередной раз прошу помочь решить задачу.Есть выгрузки из системы. В файле в столбцах А:С перед текстом стоит апостроф, который необходимо убрать для дальнейшего заполнения ячеек данными сверху ( для применения фильтра и показа полноценных данных) В интернете я нашла макрос для удаления апострофов автор Павлов Николай и макрос для заполнения ячеек данными сверху автор _Boroda_ Намеренно не стала в файле показывать результат ( он рабочий) Уважаемые знатоки макросов , вопрос : возможно ли объединить эти 2 макроса в 1(хотелось бы упрощенный вариант работы 1 кнопкой)?
К сообщению приложен файл: dlja_foruma_ubrat_apostrofy_2.xlsm (17.7 Kb)
 
Ответить
СообщениеДобрый вечер. Очередной раз прошу помочь решить задачу.Есть выгрузки из системы. В файле в столбцах А:С перед текстом стоит апостроф, который необходимо убрать для дальнейшего заполнения ячеек данными сверху ( для применения фильтра и показа полноценных данных) В интернете я нашла макрос для удаления апострофов автор Павлов Николай и макрос для заполнения ячеек данными сверху автор _Boroda_ Намеренно не стала в файле показывать результат ( он рабочий) Уважаемые знатоки макросов , вопрос : возможно ли объединить эти 2 макроса в 1(хотелось бы упрощенный вариант работы 1 кнопкой)?
Автор - GGR
Дата добавления - 24.10.2025 в 17:47
i691198 Дата: Пятница, 24.10.2025, 21:17 | Сообщение № 2
Группа: Проверенные
Ранг: Обитатель
Сообщений: 452
Репутация: 140 ±
Замечаний: 0% ±

2016
Здравствуйте. В макросе нужно поменять местами строки [vba]
Код
.Resize(.Rows.Count - 1).Offset(1).SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C"
[/vba] и [vba]
Код
.Value = .Value
[/vba]
 
Ответить
СообщениеЗдравствуйте. В макросе нужно поменять местами строки [vba]
Код
.Resize(.Rows.Count - 1).Offset(1).SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C"
[/vba] и [vba]
Код
.Value = .Value
[/vba]
Автор - i691198
Дата добавления - 24.10.2025 в 21:17
GGR Дата: Суббота, 25.10.2025, 05:56 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 130
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007
i691198 , огромное спасибо. Все получилось
 
Ответить
Сообщениеi691198 , огромное спасибо. Все получилось
Автор - GGR
Дата добавления - 25.10.2025 в 05:56
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Удалить апостроф и заполнить ячейки (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!