Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Внесение в значения диапазона дополнительной информации
 
Добрый день! Кто-нибудь знает ,как разрешить проблему ,Проблема, чтобы программа макрос ничего не убирала, а просто в первой колонке внесла дополнительную запись на 466 строчек одной задачей (сидеть и на 466 строчек делать задачу-макрос- не вариант, тк данные на внесение могут быть изменены в будущем и количество строк. В колонке "Наименование" отразили "08/17" формой:   Range("A2") = Range("A2") & " 08/17" . А вот как теперь сделать так, чтобы A3,A4....A466 ячейка не изменила названия и добавила 08/17 . Помогите, пожалуйста, кто знает. Спасибо за ответы!  Во вложении , образец -файл (меньше строк)
 
У Вас вопрос именно по Мас?
 
да
 
Ошибаетесь, не только для МАС.
В коде в константу записать добавляемый текст, выделить нужный диапазон, запустить обработку:
Код
Sub Книга_1()
Const sStr As String = " 08/17"
Dim r As Range, s
    Set r = Selection
    
    For Each s In r
        s.Value = s.Value & sStr
    Next s
End Sub
 
Спасибо ОГРОМНОЕ!!! Вы мне ОЧЕНЬ ПОМОГЛИ!!! Я, не понимаю в мас , скажем, что учусь по возникшей необходимости.  
Страницы: 1
Читают тему (гостей: 1)
Наверх