Under the guidance of the great god please, a custom function operation shows "type mismatch"?
Follow the online video, video operation no problem, the code is as follows:

 
The Function test (SHT As worksheet) 
Application. Displayalerts=false 
SHT. Delete 
Application. Displayalerts=true 
End the Function 

Sub call () 
The test Sheet2 
End Sub 

Thanks for a great god