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

Вход

Регистрация

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

 

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

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

Excel 2013
Добрый день.
Нашёл наиболее похожие темы, но они в области Excel - моя же с макросами связана.

Имею фиксированную ячейку (A11) и в ней стандартное начало (запятая и пробел) ", " , а далее идёт нужный разный текст, который может содержать запятые (Ctrl+H - не подойдёт).
Не знаю как с помощью макроса залезть в (A11) и удалить первые два символа (повторюсь: они фиксированы и это постоянно запятая и пробел).
К сообщению приложен файл: Allowance1.xlsx (10.0 Kb)
 
Ответить
СообщениеДобрый день.
Нашёл наиболее похожие темы, но они в области Excel - моя же с макросами связана.

Имею фиксированную ячейку (A11) и в ней стандартное начало (запятая и пробел) ", " , а далее идёт нужный разный текст, который может содержать запятые (Ctrl+H - не подойдёт).
Не знаю как с помощью макроса залезть в (A11) и удалить первые два символа (повторюсь: они фиксированы и это постоянно запятая и пробел).
Автор - Yar4i4
Дата добавления - 13.02.2016 в 14:40
МВТ Дата: Суббота, 13.02.2016, 14:58 | Сообщение № 2
Группа: Проверенные
Ранг: Обитатель
Сообщений: 476
Репутация: 137 ±
Замечаний: 0% ±

Excel 2007
Так[vba]
Код
Sub tt()
    With Range("A11")
        .Value = Right(.Value, Len(.Value) - 2)
    End With
End Sub
[/vba]
 
Ответить
СообщениеТак[vba]
Код
Sub tt()
    With Range("A11")
        .Value = Right(.Value, Len(.Value) - 2)
    End With
End Sub
[/vba]
Автор - МВТ
Дата добавления - 13.02.2016 в 14:58
RAN Дата: Суббота, 13.02.2016, 15:25 | Сообщение № 3
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
.Value = Mid(.Value, 3)

Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение.Value = Mid(.Value, 3)
Автор - RAN
Дата добавления - 13.02.2016 в 15:25
Udik Дата: Суббота, 13.02.2016, 15:28 | Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 1588
Репутация: 192 ±
Замечаний: 0% ±

Excel 2016 х 64
в лист
[vba]
Код

Public Sub delSmbl()

If Left([a11], 2) = ", " Then [a11] = Mid([a11], 3)
End Sub
[/vba]
К сообщению приложен файл: 0t.xlsx (14.2 Kb)

вот вам барабан
яд 41001231307558 wm R419131876897
udik1968@gmail.com

Сообщение отредактировал Udik - Суббота, 13.02.2016, 15:31
 
Ответить
Сообщениев лист
[vba]
Код

Public Sub delSmbl()

If Left([a11], 2) = ", " Then [a11] = Mid([a11], 3)
End Sub
[/vba]
Автор - Udik
Дата добавления - 13.02.2016 в 15:28
Yar4i4 Дата: Понедельник, 15.02.2016, 06:21 | Сообщение № 5
Группа: Пользователи
Ранг: Участник
Сообщений: 71
Репутация: 0 ±
Замечаний: 20% ±

Excel 2013
Спасибо господа и товарищи.
Вы чудеса творите. Я пока не разобрался как Вы так ловко жонглируете данными из электронных таблиц.
 
Ответить
СообщениеСпасибо господа и товарищи.
Вы чудеса творите. Я пока не разобрался как Вы так ловко жонглируете данными из электронных таблиц.
Автор - Yar4i4
Дата добавления - 15.02.2016 в 06:21
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Удалить из ячейки первые два символа через макрос (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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