หากในวันวาเลนไทน์ที่แล้ว คุณมอบเสื้อขนสัตว์ชีตาห์ให้กับผู้หญิงที่คุณรักแล้ว และปีก่อนหน้านั้น – iPhone 7 และคุณกำลังสงสัยว่าจะนึกถึงอะไรอีก ฉันสามารถเสนอตัวเลือกได้:
ใช้เวลา 2 นาทีในการทำเช่นนี้
เปิด Excel ไปที่แท็บ แทรก – รูปร่าง (แทรก — รูปร่าง) และเลือกหัวใจ:
เราวาดมันบนแผ่นงาน ป้อนข้อความสัมผัสภายใน จัดรูปแบบให้เหมาะสม:
เพื่อความเป็นธรรมชาติยิ่งขึ้น ให้เพิ่มเอฟเฟกต์ 3D บนแท็บ รูปแบบ – เอฟเฟกต์รูปร่าง (รูปแบบ — เอฟเฟกต์รูปทรง):
และสัมผัสสุดท้าย – เพิ่มมาโครสำหรับแอนิเมชั่น คลิก Alt + F11ในหน้าต่างตัวแก้ไข Visual Basic ที่เปิดขึ้น ให้แทรกโมดูลว่างใหม่ผ่านเมนู แทรก – โมดูล และคัดลอกข้อความของมาโครนี้ที่นั่น:
Sub Heart() For i = 1 ถึง 3000 ด้วย ActiveSheet.Shapes.Range(Array("Сердце 1")).ThreeD .RotationX = i .RotationY = i / 20 .RotationZ = i / 2 End With Application.Wait (ตอนนี้) + TimeSerial(0, 0, 0.1)) ถัดไป ฉัน สิ้นสุด Sub ปิด Visual Basic Editor คลิก Alt + F8 และเรียกใช้มาโครของเรา โว้ว! ที่รัก - ในความปีติยินดี คุณ - ในการจูบ วันหยุดประสบความสำเร็จ ถ้าคนที่คุณรักไม่ถูกใจ อย่างน้อยก็เรียนรู้คำสั่ง VBA สำหรับการทำงานกับ 3D 🙂