用VBA如何快速地求两个区域的差集

比如区域R1为A1:F100，区域R2为C30:E58，如何快速地求出R1中去掉R2后的区域R3？