[vba] 셀에 변수가있는 시트의 이름을 어떻게 반환합니까?

다음은 전달 될 때 범위의 시트 이름을 반환합니다.

Public Function whichsheet(r1 As Range, r2 As Range) As String


If Application.Sum(r1) > 0 Then
    whichsheet = whichsheet & r1.Parent.Name
    
    End If
    
    If Application.Sum(r2) > 0 Then
        whichsheet = whichsheet & r2.Parent.Name
        
        End If
        
        End Function
        

출처
https://stackoverflow.com/questions/39920263