वीबीए के साथ एक्सेल शीट्स से रिपोर्ट कैसे बनाएं

अनुप्रयोग के लिए Visual Basic (VBA) का उपयोग करके, आप Excel Visual Basic Editor (VBE) में VBA कार्यविधियाँ विकसित कर सकते हैं। यह एक उपयोग में आसान विकास वातावरण है। वीबीई में विकसित वीबीए प्रक्रियाएं कार्यपुस्तिका का एक हिस्सा होंगी। आप एक्सेल में स्वचालित रूप से रिपोर्ट जेनरेट करने के लिए वीबीए एप्लिकेशन विकसित कर सकते हैं। वीबीई के साथ प्रोग्राम करने से पहले आपको मैक्रो को सक्षम करना होगा।

चरण 1

एक्सेल इंटरफेस में प्रवेश करने के लिए "स्टार्ट," "ऑल प्रोग्राम्स" और "माइक्रोसॉफ्ट एक्सेल" पर क्लिक करें। "डेवलपर" रिबन और फिर "मैक्रो सुरक्षा" बटन पर क्लिक करें। "सभी मैक्रोज़ को अधिसूचना के साथ अक्षम करें" चेक करें और "सहेजें" पर क्लिक करें। अब आपने अपने एक्सेल में मैक्रोज़ सेट कर लिए हैं।

चरण दो

VBE लॉन्च करने के लिए एक साथ "Alt" और "F11" दबाएं। कोड विंडो खोलने के लिए अपने VBE में अपने दाएँ फलक पर "शीट 1" पर डबल-क्लिक करें। कोड विंडो में ड्रॉप-डाउन विकल्पों पर "वर्कशीट" चुनें।

कोड विंडो में निम्न कोड दर्ज करें:

उप प्रिंट रिपोर्ट ()

मंद पृष्ठ_संख्या

वर्कशीट के रूप में मंद ActiveSS

मंद ShNameView स्ट्रिंग के रूप में

एक्टिवश सेट करें = एक्टिवशीट

रेंज में प्रत्येक सेल के लिए (रेंज ("बी 3"), रेंज ("बी 3")। एंड (एक्सएलडाउन))

Sh_view=ActiveCell.Offset (0, 1).Value

पेज_नंबर = एक्टिवसेल। ऑफसेट (0, 1)। वैल्यू

केस सेल का चयन करें। मूल्य

मामला एक

पत्रक (ShNameView)। चयन करें

केस 2

आवेदन। गोटो संदर्भ:=ShNameView

अंत चयन

ActiveWindow.SeletedSheets.Printout प्रतियां:=1

अगला

कोड में लूप B2 से शुरू होने वाले कॉलम B में प्रत्येक सेल के लिए एक प्रिंट की ओर जाता है। कोड केवल वर्तमान कार्यपुस्तिका में पृष्ठों को प्रिंट करता है।