2016-08-30 3 views
0

특정 셀에 숫자 값이 있습니다. 셀의 행과 열을 알고 있습니다. 이 셀에있는 숫자 값을 내 코드의 정수 변수에 할당하여 수정할 수 있고 동일한 셀을 업데이트하는 데 사용할 수 있습니다.셀의 숫자 값을 정수 변수에 할당

다음 코드를 사용하여 시도했지만 작동하지 않습니다. 변수를 추가 할 때 셀에 0이 아닌 숫자가 있어도 변수가 0으로 유지되기 때문입니다.

Dim GetTableCount as Integer 

    GetTableCount = Cells(17, 13).value   
    GetTableCount = CInt(Cells(17, 13).value) 
    GetTableCount = Range(M17) 
    GetTableCount = Range(M17).value 
    GetTableCount = CInt(Range(M17).value) 
    GetTableCount = CInt(Range(M17)) 

는 또한 인덱스 기능을 사용하여 시도했지만 내가 올바른 구문을 찾고에 실패했습니다. 문제를 해결하기위한 마지막 시도는 셀을 "일반"대신 "숫자"형식으로 지정하는 것이지만 아무것도 지정하지 않는 것입니다.

+1

범위 주소를 보유하고있는 변수가 'M17'이 아니라면 'Range ("M17")입니다. 'GetTableCount = CInt (셀 (17, 13). 값)'작동해야합니다. 디버깅 중이라면'GetTableCount'가 값을 표시하기 전에 할당을 * 지난 *해야합니다. –

+0

'GetTableCount = Val ([M17]) ' – Slai

+0

내 코드에 M17 변수가 없습니다. 이 줄을 통해 오버 스테핑을 시도했습니다. GetTableCount = CInt (Cells (17, 13) .Value) 그러나 디버그 모드의 값은 여전히 ​​0이고 지정한 셀의 값이 아닙니다. 내일 다시 확인하겠습니다. – kdd

답변

0

그것은 그

anyintvar = Cells(row, column)

작품을 켜졌지만 값이 코드를 읽고 시트 보이는 곳에서 셀과 0에 남아 있도록 코드가 다른 워크 시트를 읽고 비어있다.

내가 시트 선택에 대한이 라인

Sheets("ADMIN").Select

코드가 여전히 선택된 시트에서 읽지 않습니다

Sheets("ADMIN").Visible = True을했다하더라도.

이 그러나 사용 :

GetTableCount = ActiveWorkbook.Worksheets("ADMIN").Cells(rownumber, columnnumber)

문제를 해결했습니다. 나는 더 이상 투명한 두 줄을 쓸 필요조차 없었습니다. @ jpinto3912에 대한 명성 Page where I found the solution

관련 문제