विषय - सूची
संपूर्ण कार्यपुस्तिका पर लागू मैक्रोज़, एकाधिक शीट से डेटा को नई कार्यपुस्तिका में निकालने, सभी शीटों पर उन्नत स्वरूपण लागू करने, या कई अन्य कारणों से आसान हो सकता है। यहाँ मूल सिंटैक्स और vba के लिए एक वर्किंग कोड उदाहरण दिया गया है जो वर्कबुक में प्रत्येक शीट पर काम करता है।
वर्कबुक में प्रत्येक शीट के माध्यम से लूप
किसी कार्यपुस्तिका में प्रत्येक शीट के माध्यम से लूपिंग और उस पर VBA कोड लागू करने के लिए मूल सिंटैक्स है
| 12345 | वर्कशीट में प्रत्येक ws के लिए'अपडेट करें या यहां कुछ करें'अगला |
VBA का उपयोग करके कार्यपुस्तिका में प्रत्येक कार्यपत्रक को अद्यतन करें
एक कार्यशील उदाहरण के लिए, निम्न कोड को एक मॉड्यूल में कॉपी और पेस्ट करें और इसे चलाएं। परिणाम आपकी कार्यपुस्तिका के प्रत्येक पत्रक के कक्ष A1 में रखा गया पाठ है।
| 1234567891011121314151617181920212223242526272829 | सार्वजनिक उप DoToAll ()'हमारे चर घोषित करें'वर्कशीट के रूप में डिम WSवर्कशीट में प्रत्येक ws के लिए'फॉर और नेक्स्ट के बीच कोड रखें''आप क्या करना चाहते हैं' के लिए'प्रत्येक शीट'ws.Range("A1") = "easyexcel.net"अगलाअंत उप |
