Question

在一张纸上我有此数据

苹果

B香蕉

C CROW

D鹿

EGG

鱼类

G山羊

H HUT

每当我在某列中写A时，在另一张纸上，苹果应该写在下一列中。

A（我写A），则应在其旁边的栏中写上Apple。

Answer 1

您必须在Excel中使用VBA脚本。从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列和第1行中写“ A”，您需要移出该单元格以触发Worksheet_Change事件，并且应该看到Apple出现在同一行的B列中。

如何在Excel中自动替换单词

1 个答案: