Question

Excel 如何实现： 选定一个单元格后如何自动选定单元格所在列的第10到第20单元格之间的区域 谢谢！

Answer 1

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Dim C As Double
C = Selection.Column
Range(Cells(10, C), Cells(20, C)).Select
End Sub

将代码放在thisworkbook里面就可以运行了

Answer 2

这个只能通过VBA编程来实现。

追问

能把代码发一下吗

追答

Sub Workbook_Open()
Dim gc As Integer
Application.OnTime Now + TimeValue("0.00.01"), "Start"
gc = Selection.Column()
Range(Cells(10, gc), Cells(20, gc)).Select
End Sub
我也不熟，你试试看