매크로 관련 질문입니다.

안녕하세요~

1. 축소할 때의 코드 small = 1.5는 원본크기의 1.5배를 나타내기 때문에
그래서 축소해도 셀 안으로 완전히 들어기 못합니다.
그러나 이 부분보다 더 중요한 문제는 단순 배율 문제가 아니라, 확대된 그림의 TopLeftCell이 바뀌면서 축소 기준 셀이 달라지는 문제가 있습니다.

2. 그래서 TopLeftCell을 매번 새로 잡지 않고, 처음 클릭할 때의 정보를 Shape의 AlternativeText에 저장하는 방식으로 바꿨습니다.

.AlternativeText = "IMG2|" & sAddr & "|" & _
CStr(oriL) & "|" & _
CStr(oriT) & "|" & _
CStr(oriW) & "|" & _
CStr(oriH) & "|0"

이 코드는

IMG2|원래셀주소|Left|Top|Width|Height|확대상태

이렇게 데이터를 가져오는데,
예를 들면

IMG2|B2|68.25|19.5|270|211.5|0

이렇게 가져옵니다.

한번 살펴보세요~