Excel VBA - 열 너비를 인치 단위로 계산하십시오.

Columns("D:D").ColumnWidth = Application.InchesToPoints(5) * (Columns("D:D").ColumnWidth/Columns("D:D").Width)

어떤 도움이 이해된다 .. 이 화학식 5 인치의 폭을 설정하지만 열 C가 얼마나 넓은 인치 볼 수 없다.

2017-10-10 Mush

Application.InchesToPoints (1) (기본적으로 72)로 열 너비를 나눕니다.

MsgBox Columns("C").Width/Application.InchesToPoints(1)

"너비"는 포인트가 아닙니다. "너비"는 포인트입니다.

2017-10-10 21:22:57

5 인치로 설정 한 후 D 열의 너비를 계산하는 경우 값 4.854를 반환합니다 ... 어떤 아이디어입니까? – Mush

'72'를 하드 코딩하는 대신'Application.InchesToPoints (1)'을 사용하는 것이 더 나을 것입니다. – YowE3K

@Mush 지난 몇 분 동안 연주 해 왔습니다. 'Columns ("D : D") .ColumnWidth = ...'문을 두 번 실행하면 성공한 것 같습니다. ** 두 번 이상 **. 이유를 모르겠다. – YowE3K

답변