搜索列中突出显示的单元格，然后将它们链接到另一个工作表的列

Question

我正在使用按钮隐藏和显示列，此按钮仅在检测到链接到另一个工作表列的突出显示的单元格时才起作用。

Example:
Worksheets(A)

COLUMN A
ID
CUSTOMER
PRIORITY
TIME

Worksheets(B)

A      B            C          D
ID    CUSTOMER     PRIORITY   TIME

如果某个单元格从SheetA突出显示（单元格的背景），则将其与SheetB的列匹配，然后隐藏选定的整个列。

这是用户选择单元格时的代码，它将突出显示： ]

这就是我被困的地方。

Answer 1

Actually i have solved the problem, as simple as this 

如果范围（“A1”）。Interior.ColorIndex = xlNone则
工作表（2）.Range（“A：A”）。EntireColumn.Hidden = True End If