Повторение текста в Excel

Question

Я должен регулярно создавать новые файлы Excel с "адресом" в одном из столбцов. Есть ли способ, с помощью которого я могу легко ввести адрес, просто написав 2 или 3 инициала.

Есть 2 столбца дата и адрес. Я должен создать этот файл, содержащий продукт, отправляемый ежедневно по следующему адресу. Содержимое в столбце адреса обычно остается постоянным, но соответствующая дата изменяется. Я должен создать новый файл для каждого месяца. Есть ли какая-нибудь хитрость, чтобы облегчить работу по вводу адреса каждый раз?

   date               address
01-01-2016     green wood, new york
02-01-2016     heaven world, texas
03-01-2016     time square, california

Answer 1

Это только пример, который вы можете адаптировать к вашему конкретному макету. Скажем, наши данные похожи на:

Первым шагом является создание таблицы сокращений (здесь столбцы E и F)

Вы можете использовать любые сокращения, которые вам нравятся, только не дублируйте их.

Затем введите следующий макрос событий в области кода листа:

Private Sub Worksheet_Change(ByVal Target As Range)
   Dim rB As Range, rTab As Range
   Dim v As String, rGrab As Range
   Set rB = Range("B2:B" & Rows.Count)
   Set rTab = Range("E:E")

   If Intersect(rB, Target) Is Nothing Then Exit Sub
   v = Target.Text
   Set rGrab = rTab.Find(What:=v, After:=rTab(1), LookAt:=xlWhole)
   If rGrab Is Nothing Then
      Exit Sub
   Else
      Application.EnableEvents = False
         Target.Value = rGrab.Offset(0, 1).Value
      Application.EnableEvents = True
   End If
End Sub

Теперь, если мы введем аббревиатуру в столбце B и коснемся клавиши ВВОД , будет заменен полный адрес. Код и таблица сокращений должны быть вставлены в каждый рабочий лист, который вы хотите обработать.

Поскольку это код рабочего листа, его очень легко установить и использовать автоматически:

1. щелкните правой кнопкой мыши имя вкладки в нижней части окна Excel
2. выберите View Code - откроется окно VBE
3. вставьте материал и закройте окно VBE

Если у вас есть какие-либо проблемы, сначала попробуйте на пробную версию.

Если вы сохраните книгу, макрос будет сохранен вместе с ней. Если вы используете версию Excel более поздней, чем в 2003 году, вы должны сохранить файл как .xlsm, а не .xlsx

Чтобы удалить макрос:

1. вызвать окна VBE, как указано выше
2. очистить код
3. закройте окно VBE

Чтобы узнать больше о макросах в целом, смотрите:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

а также

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

Чтобы узнать больше о макросах событий (код листа), см .:

http://www.mvps.org/dmcritchie/excel/event.htm

Макросы должны быть включены, чтобы это работало!