excel 多行批量删除求助！多行批量删除求助！多行批量删除求助！

各位大神好：
问题描述：如图，我需要批量删除1行到7行，13行到19行，25行到31行，以此类推......要重复操作删除110次。
设备版本：macbookair版excel 没有powerquery，只能运行VBA。
求助项：需求VBA语言，函数，或者其他操作能实现批量删除。（数据源格式会变化，最好是通用VBA语言或者函数）
以上，求助各位大佬解答，谢谢！！！