как заменить слово автоматически в Excel

Question

На одном листе у меня есть эти данные

ЯБЛОКО

B BANANA

C CROW

D DEER

E EGG

F FISH

G GOAT

H HUT

На другом листе всякий раз, когда я пишу A в столбце, яблоко должно быть записано в следующем столбце.

A (я пишу A), тогда Apple следует написать в столбце рядом с ним.

Answer 1

Вы должны использовать VBA Script в Excel. Начиная с примера в Worksheet.Change Event (Excel) , вы можете использовать следующий код для достижения своей цели.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 Then
        ThisRow = Target.Row
        If Target.Value = "" Then
            Range("B" & ThisRow).Value = ""
            Range("B" & ThisRow).Show
        End If

        If Target.Value = "A" Then
            Range("B" & ThisRow).Value = "Apple"
            Range("B" & ThisRow).Show
        End If
        If Target.Value = "B" Then
            Range("B" & ThisRow).Value = "Banana"
            Range("B" & ThisRow).Show
        End If
        If Target.Value = "C" Then
            Range("B" & ThisRow).Value = "Crow"
            Range("B" & ThisRow).Show
        End If
        If Target.Value = "D" Then
            Range("B" & ThisRow).Value = "Deer"
            Range("B" & ThisRow).Show
        End If
        If Target.Value = "E" Then
            Range("B" & ThisRow).Value = "Egg"
            Range("B" & ThisRow).Show
        End If
        If Target.Value = "F" Then
            Range("B" & ThisRow).Value = "Fish"
            Range("B" & ThisRow).Show
        End If
        If Target.Value = "G" Then
            Range("B" & ThisRow).Value = "Goat"
            Range("B" & ThisRow).Show
        End If

    End If

End Sub

---

Запись «A» в столбце A и строке 1, вам нужно отойти от этой ячейки, чтобы вызвать событие Worksheet_Change, и вы должны увидеть, как Apple появляется в столбце B в той же строке.