Find centralized, trusted content and collaborate around the technologies you use most.
Teams
Q&A for work
Connect and share knowledge within a single location that is structured and easy to search.
これをオンラインで行う方法を探すのに非常に苦労し、一連の試行錯誤を経てようやくそれを手に入れたので、共有したかっただけです.
Sheet1.Range(Cells(1, 11), Cells(1, 100)).EntireColumn.Delete
これにより、列 11 から 100 が削除されます。
With Sheet1 .Range(.Cells(1, 11), .Cells(1, 100)).EntireColumn.Delete End With