엑셀의 3D

지난 발렌타인 데이에 이미 사랑하는 여성에게 치타 모피 코트를 줬고 작년에는 iPhone 7을 줬고 또 무엇을 생각할지 궁금하다면 다음 옵션을 제공할 수 있습니다.

이 작업을 수행하는 데 2분이 걸립니다.

Excel을 열고 탭으로 이동 삽입 – 모양 (삽입 — 모양) 그리고 하트를 선택하세요:

엑셀의 3D

우리는 그것을 시트에 그리고 내부에 감동적인 텍스트를 입력하고 적절하게 포맷합니다:

엑셀의 3D

자연스러움을 더하려면 탭에 3D 효과를 추가하세요. 형식 – 모양 효과 (형식 — 모양 효과):

엑셀의 3D

그리고 마지막 터치 - 애니메이션을 위한 매크로를 추가합니다. 딸깍 하는 소리 Alt + F11, 열리는 Visual Basic 편집기 창에서 메뉴를 통해 새 빈 모듈을 삽입하십시오. 삽입 – 모듈 이 매크로의 텍스트를 복사하십시오.

Sub Heart() For i = 1 ~ 3000 With ActiveSheet.Shapes.Range(Array("Сердце 1")).ThreeD .RotationX = i .RotationY = i / 20 .RotationZ = i / 2 End With Application.Wait (지금 + TimeSerial(0, 0, 0.1)) 다음 i End Sub  

Visual Basic Editor를 닫고 Alt + F8 매크로를 실행합니다. 짜잔! 사랑하는 사람 - 황홀경에서 당신은 - 키스에서 휴가는 성공적이었습니다. 사랑하는 사람이 고마워하지 않는다면 최소한 3D 작업을 위한 VBA 명령을 배우십시오 🙂

 

댓글을 남겨주세요.