Resize 方法只能用于连续单元格区域!
如果要选中到第一列必须对每个非连续单元格区域先 Offset 后 Resize:
Union(Range("E2").Offset(, -4).Resize(1, 5), Range("E5").Offset(, -4).Resize(1, 5), Range("E9").Offset(, -4).Resize(1, 5)).Select就在窗体变得可见的一刹那之前,将会发出Resize事件。通常可以利用这一事件提的便利,重新安排窗体上的控件,使得它们在屏幕上有一个很好的布局。当用户手动调窗体大小或者在程序代码中调整窗体尺寸的时候,Resize事件也会发生。举例来说,下面的代码能够将txtCustomer文字框右边界扩展到窗体右边界,而txtNotes多行文字框扩展到窗体的右边界和下边界:Private Sub Form Resize(ith MetxtCustomer.width-.Scalewidth-txtCustomer.LefttxtNotes.width-.Scalewidth-txtNotes.LefttxtNotes.Height-.ScaleHeight-txtNotes.TopEnd WithEnd Sub楼主这是vba里的代码吧建议按f1d出帮助窗口
查看具体用法
就是调整区域的
手机答复,无法截图说明的
[a1].resize(3,2)
就变成a1:b3这个区域了
3的位置对应行,2对应列
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)