作用視窗:ActiveWindow
ActiveWindow.WindowNumber ‘視窗編號
ActiveWindow.Caption ‘視窗標題
=================================================
資料來源:Emily 分享學習 VBA
如何取得凍窗格的位置
例如選擇D3後凍結窗格 , 如何用VBA得到D3這個地址?
如果沒有隱藏 (A, B, C column), 可用
ActiveWindow.SplitRow + 1
ActiveWindow.SplitColumn + 1
如果有 隱藏
With ActiveWindow.Panes
With .Item(1).VisibleRange
x = .Rows(.Rows.Count).Row + 1
y = .Columns(.Columns.Count).Column + 1
MsgBox Cells(x, y).Address
End With
End With
========================================================
'清除即時運算視窗內容
Sub DelInImmedate()
Debug.Print Now
Application.SendKeys "^g ^a {DEL}"
End Sub
Selection.Copy '複製
ActiveSheet.Paste '貼上
參照其他Excel檔案的儲存格的內容
先開啟'D:\DATA\abc.xls
Range("A1") = Workbooks("abc").Sheets("Sheet1").Range("A1")
沒有留言:
張貼留言