Автоматическая замена идентификатора на имя (Excel / Google Docs)

Question

Я ищу способ как это сделать. Итак, допустим, что у меня есть таблица, где у меня есть идентификаторы и элементы рядом друг с другом. А рядом с этой таблицей у меня есть еще один, куда я снова помещу эти данные, но в другом порядке.

Итак, позвольте мне показать вам пример:

01  bacon

02  tomato

03  capsicum

04  ham

05  cheese

И вот мой вопрос: я хочу написать только «бекон», и Excel автоматически заменит его с идентификатором «01». Или, если я напишу ветчину, Excel заменит ее на '04'. Есть ли способ сделать это возможным?

Answer 1

Это предполагает, что:

1. Ваша таблица перевода находится в столбцах A и B
2. ваш столбец ввода данных является столбцом C
3. столбец ввода данных в формате "00" (чтобы можно было вводить начальные нули)

Поместите следующий макрос событий в область кода рабочего листа:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim C As Range, A As Range, B As Range
    Dim t As String

    Set A = Range("A:A")
    Set B = Range("B:B")
    Set C = Range("C:C")

    If Intersect(C, Target) Is Nothing Then Exit Sub

    Application.EnableEvents = False
        t = Target.Text
        With Application.WorksheetFunction
            Target.Value = B(.Match(t, A, 0))
        End With
    Application.EnableEvents = True
End Sub

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

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

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

НОТА:

Вы должны также включить обработчики ошибок, чтобы покрыть ошибки оператора!