एक मनमाना संख्या द्वारा कोशिकाओं में मूल्यों के स्वचालित विभाजन के लिए मैक्रो। यह आवश्यक हो सकता है यदि हमारे पास एक डेटा फ़ाइल है जहां सभी मान पेनीज़ में निर्दिष्ट हैं, और हमें गणना और डेटा को रिव्निया (या अन्य मुद्रा) में अनुवाद करने की आवश्यकता है।
बेशक, आप मूल्यों को परिवर्तित करने के लिए सूत्रों का उपयोग कर सकते हैं, लेकिन यदि बहुत सारी संख्याएँ हैं, तो इस तरह से परिवर्तित करना बहुत लंबा और उबाऊ होगा।
आइए विचार करें कि सभी चयनित कोशिकाओं को एक संख्या से कैसे विभाजित किया जाए, उदाहरण के लिए,
ऐसा करने के लिए, अपनी पुस्तक खोलें, पर जाएँ विजुअल बेसिक एडिटोर्ट (Alt+F11), मॉड्यूल जोड़ें VBA ( Insert - Modle ) और इस मैक्रो टेक्स्ट को वहां कॉपी करें:
Sub Division()
For Each cell In Selection
cell.Formula = cell.Value
Next cell
For Each cell In Selection
cell.Value = cell.Value / 100
Next cell
End Sub
उसके बाद आप Excel पर वापस लौट सकते हैं। आवश्यक कक्षों का चयन करें और मेनू के माध्यम से अपना मैक्रो चलाएँ Tools - Macro - Macros (Alt+F8) .
इसके अलावा, यदि आप मैक्रो कोड में प्रतिस्थापित करते हैं
इसी तरह, आप कोई भी ऑपरेशन कर सकते हैं, जैसे किसी भी संख्या से गुणा करना।