Excel에는 글꼴 옵션으로 깜박이거나 깜박이는 텍스트가 없습니다. 그러나 Excel의 기본 제공 Visual Basic for Applications를 사용하면 코드를 사용하여 텍스트가 모든 섹션의 색상을 변경하여 깜박이는 효과를 만들 수 있습니다.
1 단계
텍스트를 깜박이게 만들 Microsoft Excel 2010 파일을 엽니다. "Alt" 및 "F11"을 눌러 VBA 콘솔을 엽니다.
오늘의 비디오
2 단계
VBA 콘솔의 왼쪽에 있는 "ThisWorkbook" 항목을 마우스 오른쪽 버튼으로 클릭합니다. "삽입" 위로 마우스를 이동하고 "모듈"을 선택하십시오.
3단계
"ThisWorkbook" 옵션을 두 번 클릭합니다. 다음 코드를 복사하여 화면 오른쪽의 공백에 붙여넣습니다.
Private Sub Workbook_Open() Blink End Sub
Private Sub Workbook_BeforeClose (부울로 취소) NoBlink End Sub
이 코드는 이 통합 문서를 열 때 깜박이는 텍스트를 시작하고 깜박이는 텍스트를 중지합니다. 통합 문서를 닫을 때 Excel에 실제로 Blink와 NoBlink가 무엇인지 알려주는 코드를 삽입하면 평균.
4단계
화면 왼쪽의 목록에서 "모듈 1"을 두 번 클릭합니다. 커서를 화면 오른쪽에 놓고 다음 줄을 입력합니다.
공개 시간 계산을 두 배로
이것은 모든 서브루틴에서 사용할 수 있는 "Timecount"라는 변수를 생성합니다.
5단계
Enter 키를 눌러 커서를 다음 줄로 이동하고 다음 코드를 입력합니다.
ThisWorkbook을 사용하여 Sub 깜박임(). Worksheets("Sheet1").Range("A1:A10").Font If .ColorIndex = 3 Then .ColorIndex = 2 Else .ColorIndex = 3 End If End With Timecount = Now + TimeSerial(0, 0, 1) 응용 프로그램. OnTime Timecount, "Blink", True End Sub
이렇게 하면 정의된 범위 내의 모든 텍스트가 깜박이도록 하는 "Blink"라는 서브루틴이 생성됩니다. "A1:A10"에서 개별 셀을 포함하여 원하는 범위로 범위를 변경할 수 있습니다.
6단계
"Enter"를 눌러 다음 줄에 액세스하고 다음 코드를 입력합니다.
하위 noblink() ThisWorkbook. Worksheets("Sheet1").Range("A1:A10").Font. ColorIndex = _ xlColorIndex자동 응용 프로그램. OnTime Timecount, "Blink", False End Sub
이렇게 하면 통합 문서를 닫을 때 실행할 서브루틴이 생성됩니다. 매크로를 사용하지 않고 통합 문서를 여는 사람이 실수로 텍스트 상자에 아무 것도 표시되지 않도록 모든 텍스트를 다시 검은색으로 바꿉니다.
7단계
오른쪽 상단 모서리에 있는 "X"를 클릭하여 VBA 콘솔을 닫습니다. 화면 상단의 "파일" 탭을 클릭하고 "다른 이름으로 저장"을 선택합니다. 드롭다운 필드에서 "Excel 매크로 사용 통합 문서"를 선택하고 통합 문서의 이름을 입력합니다. "저장"을 클릭합니다.
8단계
Excel 파일을 닫았다가 다시 엽니다. 매크로에 정의된 범위 내에서 텍스트가 깜박이기 시작합니다. 보안 설정에 따라 깜박이는 텍스트를 보려면 화면 상단의 "매크로 사용" 버튼을 클릭해야 할 수도 있습니다.
