ماکروی حذف یا مخفی کردن اشیاء در اکسل

ماکروی حذف یا مخفی کردن اشیاء در اکسل
اولین ماکروی این مقاله تمام شکل های موجود در صفحه فعال را حذف می کند.
 
Sub DeleteShapes()
               On Error Resume Next
               ActiveSheet.DrawingObjects.Visible = True
               ActiveSheet.DrawingObjects.Delete
               On Error GoTo 0
               End Sub
 
ماکروی زیر تمام Comment های نوشته شده در صفحه جاری را حذف می کند.
Sub DeleteComments()
                ActiveSheet.Cells.ClearComments
                End Sub
   
 
نویسنده : وحید فرزام
تاریخ انتشار : 1393-01-19 04:30:00
2235

0 نظر

user


تازه ترین ها