Excel에서 셀 주위에 원을 그리는 방법은 무엇입니까?

워크시트를 편집할 때 아래 스크린샷과 같이 특정 셀을 명확하게 보여주기 위해 셀 주위에 원을 그리고 싶을 수 있습니다. 이제 Excel에서 셀 주위에 원을 그리는 몇 가지 방법을 소개하겠습니다.

타원 도형으로 셀 주위에 원 그리기

VBA로 셀 주위에 원 그리기

타원 도형으로 셀 주위에 원 그리기

셀 주위에 원을 그리려면 타원 도형을 삽입해야 합니다.

1. 삽입 > 도형 을 클릭하고 목록의 기본 도형 섹션에서 타원 도형을 선택합니다. 스크린샷 보기:

2. 필요한 셀 주위에 타원을 그립니다. 스크린샷 보기:

3. 도형을 마우스 오른쪽 버튼으로 클릭하고 상황에 맞는 메뉴에서 서식 설정 을 선택합니다.

4. 서식 설정 대화상자(또는 서식 설정 창)에서 채우기 탭을 클릭하고 투명도 화살표를 오른쪽으로 드래그하여 텍스트 상자에 100% 표시되도록 합니다. 스크린샷 보기:

5. 대화상자를 닫습니다. 이제 셀 주위에 원이 있는 것을 볼 수 있습니다.

팁: 기본적으로 도형은 셀과 함께 이동하고 크기가 조정됩니다.

VBA로 셀 주위에 원 그리기

셀 주위에 빠르게 원을 그리고 싶다면 VBA 코드를 사용할 수 있습니다.

1. 원을 그리고 싶은 셀을 선택하고 Alt + F11 키를 동시에 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

2. 삽입 > 모듈 을 클릭하고 나타난 창에 다음 VBA 코드를 복사합니다.

VBA: 셀 주위에 원 그리기.

Sub DrawCircle()
	'Updateby20141105
	Dim Arng As Range
	Dim WorkRng As Range
	Set WorkRng = Application.Selection
	For Each Arng In WorkRng.Areas
		With Arng
			x = Arng.Height * 0.1
			y = Arng.Width * 0.1
			Application.ActiveSheet.Ovals.Add Top: = .Top - x, Left: = .Left - y, _
			Height: = .Height + 2 * x, Width: = .Width + 1.5 * y
			With Application.ActiveSheet.Ovals(ActiveSheet.Ovals.Count)
				.Interior.ColorIndex = xlNone
				.ShapeRange.Line.Weight = 1.25
			End With
		End With
	Next
	WorkRng.Select
End Sub

3. F5 키를 누르거나 실행 버튼을 클릭하여 VBA 코드를 실행하면 선택한 셀이 원으로 둘러싸입니다.

팁:

(1) 첫 단계에서 여러 개의 인접한 셀을 선택한 경우, 이 VBA 매크로는 이러한 셀들을 함께 원으로 둘러쌉니다.

(2) 첫 단계에서 여러 개의 비인접한 셀을 선택한 경우, 이 VBA 매크로는 각 셀을 개별적으로 원으로 둘러쌉니다.