VBA選択したセルに基づいて列を削除します

Question

アクティブなセルの前に4列を削除しますが、ユーザーが選択するセルがわかりません。私はActiveセルが "H3"であれば、列全体を削除する（D、E、F、G）ことを意味します。 助けていただければ幸いです。

Answer 1

range(activecell.Offset(ColumnOffset:=-1),activecell.Offset(ColumnOffset:=-4)).Columns.Delete 

このシートを使用する前に試してみてください。