Excel/VBA : 단일 셀을 인수로 전달

Question

사용자 지정 VBA 함수에 단일 셀 인수 만 허용하려고합니다. 그 일의 rightway 무엇인가

• 패스 myCell as Cell

나 : 기본적으로

• 패스 myRange as Range 얻을 왼쪽 상단 셀 (어떻게?)? 그건 당신이 질문에 무엇을 의미하는 경우 여러 열과 행 범위를 입력합니다 사용자를 가정
는

Answer 1

당신은 하나의 셀 이상을 선택하면 기능이 종료됩니다 :

Function AcceptOneCell(rng As Range) 

If (rng.Cells.Count > 1) Then 
    AcceptOneCell = "Only allow 1 cell" 
    Exit Function 
End If 

    ' your code here 

End Function 

Answer 2

, 당신은 ... 기능을 종료하려면 다음 검사를 수행 할 수

Function myFunction(ByRef myCell as Range) as SomeDataType_of_your_choice 
Dim numRow as Long, numCol as Long 

numRow = myCell.Columns.Count 
numCol = myCell.Rows.Count 

If numRow > 1 or numCol > 1 Then 
    MsgBox "Only one cell is accepted" 
    Exit Function  
Else 
    '-- do other stuff you want to do here 
End If 
End Function 

Answer 3

topLeftValue = myRange.Cells(1, 1).Value 

Answer 4

numRow = myCell.Columns.Count 

numCol = myCell.Rows.Count 

될해야 `topLeftValue =

numColum = myCell.Columns.Count 

numRow = myCell.Rows.Count