我有一個包含 100 張表格的 excel 檔案,所有表格都具有相同的布局,我需要對所有這些表格應用一些格式。
我需要的是一個回圈遍歷作業簿的所有作業表相同代碼的宏。
我試過這個但不起作用
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
Range("A1").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "Balance Sheet"
Range("Q1").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "Cash Flow"
Next ws
End Sub
你能幫我解決這個問題嗎?謝謝!!
uj5u.com熱心網友回復:
將其替換為:
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
ws.Range("A1").Value = "Balance Sheet"
ws.Range("Q1").Value = "Cash Flow"
Application.CutCopyMode = False
Next ws
轉載請註明出處,本文鏈接:https://www.uj5u.com/qianduan/492541.html
