在电子表格的左上angular显示select

嗨，有可能做这种事情在Excel 2007年VB …

例如，用户select单元格或范围….让我们说单元格G13，现在这个单元格将显示在工作表的左上angular（即在默认情况下通常是A1所在的地方），在范围select的情况下左上angular范围的angular落将显示在工作表的左上angular…

非常感谢！

Answer 1

这里是你如何让电子表格滚动到你想要的单元格：

Private Sub Worksheet_SelectionChange(ByVal Target As Range) Application.EnableEvents = False ActiveWindow.ScrollColumn = Target.Column ActiveWindow.ScrollRow = Target.Row Application.EnableEvents = True End Sub 

我认为你会发现这会使用户疯狂，但你可以修改它以获得更友好的效果。

Answer 2

ALT + F11
在左侧的树视图（在VBA中）双击ThisWorkbook。
将此代码粘贴到WorkBook类中

 Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) Cells(1, 1).Value = Selection.Cells(1).Address End Sub 

将Selection.Cells(1).Address更改为Selection.Cells(1).Value

注意：这将出现在工作簿中的所有工作表上。 您可以通过在代码中添加使用Sh实例的检查来更改它，使其适用于特定工作表。