How to delete these specified columns?
问题 I want to delete specific columns to all sheets in a workbook. When I run my codes, it will only remove the columns specified in the first line. The rest are not included. How do I do it with many columns to specify? How do I go about this? Sub Dosomething() Dim xSh As Worksheet Application.ScreenUpdating = False For Each xSh In Worksheets xSh.Select Call DeleteColumns Next Application.ScreenUpdating = True End Sub Sub DeleteColumns() Dim ColumnsToDelete As String, V As Variant