one way:

Dim nameSheet As String
nameSheet = ActiveSheet.Name

In article ,
Zurn wrote:

Dim nameSheet as string

variable nameSheet has to be the name of the current sheet, what do I
have to use?