时间戳

首页 > 解决方案 > 如果名称是 X，则从 Excel 的 Z 工作表中插入 Y 电话号码

excel - 如果名称是 X，则从 Excel 的 Z 工作表中插入 Y 电话号码

问题描述

我正在尝试创建一个简单的宏或 VBA，它将在 Y 列中插入一个电话号码，作为目录工作表中 X 列中某人姓名的值。

例如，工作表 1（目录）包含个人姓名和电话号码：

John Smith 123 456 789
Joe Garden 555 555 555
Jill Spill 999 999 999

在创建新工作表 2 时，当我将 John Smith 放入 A 列时，我希望它自动填充 B 列中的 123 456 789。

谢谢您的帮助！

标签： excelvba

解决方案

试试这个代码，让我知道我是否错过了任何东西。请务必将Sheet4更改为具有电话号码列表的工作表的名称。

Sub Macro12()
   Range("B1").Select
    ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-1],Sheet4!C[-1]:C,2,FALSE)"
    ActiveCell.Offset(0, 1).Range("A1").Select
End Sub

推荐阅读