ಎಕ್ಸೆಲ್ ನಲ್ಲಿ 3D

ಕಳೆದ ಪ್ರೇಮಿಗಳ ದಿನದಂದು ನೀವು ಈಗಾಗಲೇ ನಿಮ್ಮ ಪ್ರೀತಿಯ ಮಹಿಳೆಗೆ ಚಿರತೆಯ ತುಪ್ಪಳ ಕೋಟ್ ಅನ್ನು ನೀಡಿದ್ದರೆ ಮತ್ತು ಹಿಂದಿನ ವರ್ಷ - iPhone 7, ಮತ್ತು ನೀವು ಇನ್ನೇನು ಯೋಚಿಸಬೇಕೆಂದು ಯೋಚಿಸುತ್ತಿದ್ದರೆ, ನಾನು ಒಂದು ಆಯ್ಕೆಯನ್ನು ನೀಡಬಲ್ಲೆ:

ಇದನ್ನು ಮಾಡಲು 2 ನಿಮಿಷಗಳನ್ನು ತೆಗೆದುಕೊಳ್ಳುತ್ತದೆ.

ಎಕ್ಸೆಲ್ ತೆರೆಯಿರಿ, ಟ್ಯಾಬ್ಗೆ ಹೋಗಿ ಸೇರಿಸಿ - ಆಕಾರಗಳು (ಸೇರಿಸು - ಆಕಾರಗಳು) ಮತ್ತು ಹೃದಯವನ್ನು ಆರಿಸಿ:

ಎಕ್ಸೆಲ್ ನಲ್ಲಿ 3D

ನಾವು ಅದನ್ನು ಹಾಳೆಯಲ್ಲಿ ಸೆಳೆಯುತ್ತೇವೆ, ಒಳಗೆ ಸ್ಪರ್ಶಿಸುವ ಪಠ್ಯವನ್ನು ನಮೂದಿಸಿ, ಅದನ್ನು ಸೂಕ್ತವಾಗಿ ಫಾರ್ಮ್ಯಾಟ್ ಮಾಡಿ:

ಎಕ್ಸೆಲ್ ನಲ್ಲಿ 3D

ಹೆಚ್ಚಿನ ನೈಸರ್ಗಿಕತೆಗಾಗಿ, ಟ್ಯಾಬ್‌ನಲ್ಲಿ 3D ಪರಿಣಾಮವನ್ನು ಸೇರಿಸಿ ಸ್ವರೂಪ - ಆಕಾರ ಪರಿಣಾಮಗಳು (ಫಾರ್ಮ್ಯಾಟ್ - ಆಕಾರಗಳ ಪರಿಣಾಮಗಳು):

ಎಕ್ಸೆಲ್ ನಲ್ಲಿ 3D

ಮತ್ತು ಅಂತಿಮ ಸ್ಪರ್ಶ - ಅನಿಮೇಷನ್ಗಾಗಿ ಮ್ಯಾಕ್ರೋ ಸೇರಿಸಿ. ಕ್ಲಿಕ್ Alt + F11, ತೆರೆಯುವ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ವಿಂಡೋದಲ್ಲಿ, ಮೆನು ಮೂಲಕ ಹೊಸ ಖಾಲಿ ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಸೇರಿಸಿ ಸೇರಿಸಿ - ಮಾಡ್ಯೂಲ್ ಮತ್ತು ಈ ಮ್ಯಾಕ್ರೋದ ಪಠ್ಯವನ್ನು ಅಲ್ಲಿ ನಕಲಿಸಿ:

ಸಬ್ ಹಾರ್ಟ್() ಗಾಗಿ i = 1 ರಿಂದ 3000 ವರೆಗೆ ActiveSheet. ಆಕಾರಗಳು. ಶ್ರೇಣಿ(ಅರೇ("Сердце 1")).ThreeD .RotationX = i .RotationY = i / 20 .RotationZ = i / 2 ಅಪ್ಲಿಕೇಶನ್‌ನೊಂದಿಗೆ ಕೊನೆಗೊಳ್ಳಿ. (ಈಗ ನಿರೀಕ್ಷಿಸಿ + TimeSerial(0, 0, 0.1)) ಮುಂದೆ i End Sub  

ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್ ಅನ್ನು ಮುಚ್ಚಿ, ಕ್ಲಿಕ್ ಮಾಡಿ Alt + F8 ಮತ್ತು ನಮ್ಮ ಮ್ಯಾಕ್ರೋ ರನ್ ಮಾಡಿ. Voila! ಪ್ರೀತಿಯ - ಭಾವಪರವಶತೆಯಲ್ಲಿ, ನೀವು - ಚುಂಬನಗಳಲ್ಲಿ, ರಜಾದಿನವು ಯಶಸ್ವಿಯಾಗಿದೆ. ನಿಮ್ಮ ಪ್ರೀತಿಪಾತ್ರರು ಅದನ್ನು ಪ್ರಶಂಸಿಸದಿದ್ದರೆ, ಕನಿಷ್ಠ 3D ಯೊಂದಿಗೆ ಕೆಲಸ ಮಾಡಲು VBA ಆಜ್ಞೆಗಳನ್ನು ಕಲಿಯಿರಿ 🙂

 

ಪ್ರತ್ಯುತ್ತರ ನೀಡಿ