Just define the data type as an Integer instead. When you wire an input the the Arg1 terminal, Excel will pass it as a Variant and determine the type using the Macro definition.
Sub DeleteSheet(intSheetIndex As Integer)
If intSheetIndex <= Sheets.Count Then
Application.DisplayAlerts = False
Sheets(intSheetIndex).Delete
Application.DisplayAlerts = True
End If
End Sub
Michael Munroe
www.abcdefirm.com