一貫してエクスポートされたシートの列をVBAで削除する

Question

スプレッドシートをループして特定のヘッダーを持つ列のみを保持できる簡単なコード行があるのだろうかと思います。私は毎日輸出されている輸出されたcsvで動作するマクロでコードを使用したいと思います。私はそれが可能であることを知っている、ちょうどループがどのように動作するのか分からない。

Answer 1

ここに行ってください！これを列に入力できる形式にすることもできます。私はあなたがそれを理解できるようにします。ここ

はコードです：

Dim currentColumn As Integer 
Dim columnHeading As String 

For currentColumn = ActiveSheet.UsedRange.Columns.count To 1 Step -1 
    columnHeading = ActiveSheet.UsedRange.Cells(1, currentColumn).Value 
    'CHECK WHETHER TO KEEP THE COLUMN 
    Select Case columnHeading 
     Case "header1name", "header2name", "header3name" 
      'The columns with these headers will be kept 
     Case Else 
       ActiveSheet.Columns(currentColumn).Delete 
    End Select 
Next 

ご希望の場合、私は、フォームを掲載します！