下記のコードを使います。指定をしないと、デフォルトの値は「No」になりますのでご注意ください。説明書きを加えると上記のようになります。◆Range(Cells(1,1),Cells(1,1)).EntireColumn◆Column(“A:A”)これも可能です。するとサンプルコードは以下になります。Header:=xlYes上記のコードを実行すると下記のような結果が得られます。例題2(全列の内容まとめて重複データ検索・削除適応)例題2名前の両サイドに「No.」と「出身」を付け加えました↑の例題では、「No.」と「出身」を付けたしました。・・・A:C◆重複データを探す列・・・1,2,3列目(つまりA:C)1~3列目の内容が全て同じモノ、その行のA:C(適応範囲)をまるまる削除する事になります。【Array】を使用します。具体的なサンプルコードは以下になります。Header:=xlYes2行目と3行目が全て同じ内容で重複している事が分かります。得られる結果は2行目が残り、3行目の(A:C)が削除されるとなりました。【2列目(名前)】と【3列目(出身)】これが一緒の行はA:C(適応範囲)が削除されます。2列目と1列目の内容が一緒であれば1列目に何が記載されていても削除されます。サンプルコードと結果は以下になります。Header:=xlYes以上になります。お役に立てれば幸いです。ショートカットExcelを使用している際に、画面を拡大・縮小する事は多々あるかと思います。き■Tシャツ好き■スポーツジム通い訪問有難う御座います。旅行が好きな社会人、私は運営者の「ぎーちゃん」です。旅先ではご当地のTシャツを買ってしまう変な癖がついております。以前は台湾に住んでいたことがあります。