✅ वीबीए प्रिंट स्टेटमेंट

विषय - सूची

प्रिंट विवरण
प्रिंट सिंटैक्स
एक्सेल वीबीए प्रिंट फंक्शन के उदाहरण

प्रिंट विवरण

अनुक्रमिक फ़ाइल में प्रदर्शन-स्वरूपित डेटा लिखता है।

प्रिंट सिंटैक्स

1	छाप #फाइलनंबर, [आउटपुट लिस्ट]

प्रिंट स्टेटमेंट में 2 तर्क होते हैं:

फाइल संख्या: कोई भी मान्य फ़ाइल संख्या।

आउटपुट सूची: वैकल्पिक। किसी फ़ाइल में लिखने के लिए एक या अधिक अल्पविराम-सीमांकित संख्यात्मक अभिव्यक्ति या स्ट्रिंग अभिव्यक्ति।

एक्सेल वीबीए प्रिंट फंक्शन के उदाहरण

पहला नाम	उपनाम	उम्र	लिंग
रॉबर्ट	स्टेप	20	पुरुष
जेनिफर	मारिस्कैल	33	महिला
डेविड	रोमिगो	35	पुरुष
कार्मेल	इनग्राम	26	महिला

एक फ़ाइल में उपरोक्त चित्र की तरह एक शीट में रेंज ("ए 1: डी 5") आउटपुट करने के लिए, आप निम्न कोड का उपयोग कर सकते हैं।

1234567891011121314151617181920212223242526272829303132333435363738

उप प्रिंट_उदाहरण ()स्ट्रिंग के रूप में मंद strFolderस्ट्रिंग के रूप में मंद strFileFileDialog के रूप में मंद dlgFolderरेंज के रूप में मंद rngdlgFolder = Application.FileDialog (msoFileDialogFolderPicker) सेट करेंअगर dlgFolder.Show = True तबstrFolder = dlgFolder.SelectedItems(1)अन्यथाउप से बाहर निकलेंअगर अंतसेट आरएनजी = रेंज ("ए 1: डी 5")'प्रिंटstrFile = "Print_Output.txt"PrintRangeToFile strFolder और "\" और strFile, rngअंत उपउप PrintRangeToFile (स्ट्रिंग के रूप में strFile, रेंज के रूप में rng)रेंज के रूप में मंद पंक्ति, रेंज के रूप में सेलमंद फ़ाइल संख्या पूर्णांक के रूप मेंफाइलनंबर = फ्रीफाइलआउटपुट के लिए स्ट्रफाइल खोलें #FileNumber . के रूप मेंप्रत्येक पंक्ति के लिए rng.rows . मेंपंक्ति में प्रत्येक सेल के लिए। सेलअगर सेल। कॉलम = पंक्ति। सेल। फिर गिनेंप्रिंट #फाइलनंबर, सेलअन्यथाप्रिंट करें #FileNumber, सेल,अगर अंतअगली सेलअगली पंक्तिबंद करें #फाइलनंबरअंत उप

"Print_Output.txt" फ़ाइल का आउटपुट: