求助老师：如何一键全部清除相关数据

求助老师：如何一键全部清除相关数据

从别的老师那儿搬来一个清空控件，能一键清除相关单元格的数据。
代码如下：

Private Sub CommandButton1_Click()
    ClearData
End Sub

Sub ClearData()
    Range("c38:v39,z38:ba39,be38:cf39").ClearContents
End Sub

求助：用这个控件如何同时清除另外工作表中的数据？
（注：是在同一个工作簿内）

先谢谢了:ls61 :ls61 :ls61