현재 위치 - 주공해몽공식사이트 - 관음보살의 랜덤 번호 뽑기 - Excel 에서 VBA 를 사용하여 URL 을 배치로 변환하는 방법

Excel 에서 VBA 를 사용하여 URL 을 배치로 변환하는 방법

그림의 하위 링크 ()

For Each Rng In Selection 활성 워크시트의 하이퍼링크를 반복합니다.

Ifucase (RNG. 값) 은 "*" 와 같습니다. Jpg *" Orucase (RNG. 값) 은 "*" 와 같습니다. JPEG *" Orucase (RNG. 값) 은 "*" 와 같습니다. Png *" Orucase (RNG. 값) 은 "*" 와 같습니다. Gif *" then' 링크 위치가 다음과 같은 경우

Rng = HLK 를 설정합니다. Parent.Offset (,0)' 대상 그림을 삽입할 위치를 설정합니다.

활동표를 띠다. 사진. 삽입 (RNG). 값)' 링크 주소에 그림을 삽입합니다.

만약. 키/. 폭> 그런 다음 Rng.Height/Rng.Width 는 셀 가로 세로 비율에 대한 그림 가로 세로 비율의 비율을 결정하여 셀에 대한 포인터의 배율을 결정합니다.

。 Top = Rng 입니다. 맨 위

。 왼쪽 = Rng. 왼쪽+(Rng. 폭. 폭 * Rng. 키/. 높이)/2

。 폭 =. 폭 * Rng. 키/. 높이

。 키 = Rng. 높이

기타

。 왼쪽 = Rng. 왼쪽

。 Top = Rng 입니다. Top+(Rng. 키. 키 * Rng. 폭/. 폭)/2

。 높이 =. 키 * Rng. 폭/. 폭

。 폭 = Rng 입니다. 폭

만약 ... 끝날거야

로 끝맺다

Rng. Value = ""'셀의 그림 링크를 제거합니다.

만약 ... 끝날거야

그리고 나서

끝단 접합