ஒற்றை தானியங்கியை (Automation) பயன்படுத்தி உருவாக்குதல்
ஒரு சான்றளிக்கப்பட்ட(instance) வேர்டினுடைய பொருள்(object) ஒன்றை தானியங்கியை (Automation) பயன்படுத்தி உருவாக்குவதுதான் முதல் படிமுறையாகும்(step). அதற்கான குறிமுறைகள் பின்வருமாறு.
On Error Resume Next
…
Set word Obj = Get Object(“Word.Application”)
If Err.Number < > 0 Then
Set Word Obj = CreateObject (“Word.Application”)
End If
மிகத்தெளிவாக கூற வேண்டுமெனில் ஒவ்வொரு முறையும் நன்றி கடிதம் உருவாக்குவதற்காக ஒரு புதிய சான்றளிக்கப்பட்ட வேர்டினுடைய ஆவனத்தை உருவாக்க வேண்டாம். இதற்காக சிறிதளவு சிறப்பு குறிமுறைகள் மட்டும் இருந்தால் போதும். இந்த சிறிதளவான சிறப்பு குறிமுறைகள்ஆனது முதலில் ஒரு செயற்படும் சான்றளிக்கப்பட்ட வேர்டை பயன்படுத்துவதற்கான சான்றினை உருவாக்குதவற்கு முயல்கிறது. பின்னர் வேர்டு ஆனது ஒரு பயன்பாட்டில் இயங்காதபோதும் இந்த செயலியானது பிழை ஏதும் கிடைத்தால் அதனை பிடித்து அடுத்த நடவடிக்கையாக அதற்கடுத்த கூற்றை செயல்படுத்தி பிழைச்செய்தியை உருவாக்கி பிரதிபலிக்க செய்கிறது.
இவ்வாறு முதலில் சான்றளிக்கப்பட்ட வேர்டு ஆவணத்தை நம் கண்ணுக்கு புலப்படாமல் இயக்குகின்றது. அதனால் வேர்டு இயங்குகிறது என தெரியாமல் உங்கள் பயன்பாட்டில் வேர்டை நீக்கிவிட வாய்ப்புள்ளது. இதனை தவிர்ப்பதற்காகவும் சான்றளிக்கப்பட்ட வேர்டு இயங்கும்போது நம் கணணிற்கு புலப்படுவதற்காகவும் Wordobj¢ ,visible = True என்ற வரியை இந்த குறிமுறையில் அவசியம் சேர்க்க வேண்டும்.
இவ்வாறு செய்த பிறகு காலியான ஆவணம் ஒன்றை உருவாக்குவேண்டும்,அதற்காக வேரடு இயங்கும்போது தயார் நிலையில் உள்ள Thanks.dot எனும் ஒரு மாதிரி படிமத்தை உருவாக்குவதற்கு கீழ்காணும் குறிமுறை உதவுகிறது.
Word Obj.Documents.Add Template ; = “G:\Access|| Book\Thanks.dot”
_New Templates; = Flase
இந்த Thanks.dot என்ற மாதிரி படிமத்தில் ஒருசில அடையாளக் குறிகள்(Bookmark) ஆங்காங்கு இடப்பட்டுள்ளன. இந்த அடையாள குறிகளிடப்பட்டுள்ள இடங்கள் வெளியிலிருந்து தரவுகளை உள்ளிணைக்க வேண்டும் எனக் குறிக்கின்றன. இவ்வாறு ஒரு வேர்டின் கடிதத்தில் அடையாளக் குறியிடுவதற்கு கட்டளை சட்டத்தில் உள்ள Insert => என்ற கட்டளையைத் தெரிவு செய்க,உடன் விரியும் Insert எனும் பட்டியில் உள்ள Bookmark என்பதை தெரிவு செய்க. பின்னர் இந்த அடையாளக் குறிக்கு ஒரு பெயரிட்டு add என்ற பொத்தானை இடம்சுட்டியால் தெரிவுசெய்து சொடுக்குக (படம்-1).
படம்-1
ஒரு வேர்டின்ஆவணத்தில் எங்கெங்கெல்லலாம் இவ்வாறு அடையாளகுறியிட்டோம் என கண்டறிந்து அவ்விடத்தில் நாம் சேர்க்க விரும்பும் உரையை எளிதாக சேர்ப்பதற்கு உதவுவதுதான் இந்த தானியங்கி செயலாகும். Goto என்ற வழிமுறையின் உதவியால் அடையாள குறியிட்ட குறிப்பிட்ட இடத்திற்கு செல்லலாம். பின்னர் உரையை உள்ளிணைக்க அல்லது அடையாளத்தை பதிலீடு செய்ய TypeText என்ற வழிமுறை பயன்படுகின்றது. இதற்கான குறிமுறை பின்வருமாறு
Word Obj.Selection.Goto What : = WdGotoBookmark, Name:=”Full Name”
Word Obj.Selection.Type Text Cust![Contact Name]
புதிய ஆவணங்களில் தரவுகளை உள்ளீடு செய்ய விரும்புவோம். இந்த சமயத்தில் வேர்டை செயல்படும் பயன்பாடாக குறிப்பிட வேண்டும் இல்லையெனில் தரவுகளை உள்ளீடு செய்யும்போது தானாக அக்சஸிலிருந்து வேர்டுக்கு நிலைமாறிவிடும் இதனை தவிர்ப்பதற்கு Wordobj.Activate என்ற வரியை உள்ளிணைத்து கொள்க.
தானியங்கி வேர்டு ஆவணத்தில(document) இடம்சுட்டியை(cursor) நகர்த்துவதற்கு moveup என்ற வழிமுறையை பயன்படுத்தி கொள்ளுங்கள். ஒரு வேர்டில் இப்போது இருக்கும் இடத்திலிருந்து ஐந்து வரிகள் மேற்பக்கம் நகருவதற்கான குறிமுறை பின்வருமாறு
Word obj.Selector.Moveup Wdline.5
இவ்வாறு பயன்படுத்திவரும் சான்றளிக்கப்பட்ட தானியங்கி பொருளை மூடுவதற்கு
Set word obj = nothing அல்லது
wordobj.quit ஆகியவற்றில் ஏதேனும் ஒரு கூற்றை பயன்படுத்துக.
வேர்டின்அடையாளமிட்ட இடத்தில் ஏதேனுமொரு படத்தை உள்ளிணைக்க விரும்புவோம். இந்நிலையில் .BMP கோப்பாக உருவாக்கப்பட்ட படத்தை உள்ளிணைக்க கீழ்காணும் குறிமுறை உதவுகிறது.
Word Obj.Selection.Goto What = wsGoToBookmark.Name :=”Picture”
Word Obj.ChangeFileOpenDirectory “D:\Graphics\”
Word.Obj.Active Documents.Shapes.AddPicture
Anchor: = Selection.Range, File Name : =_
“D:\Graphics\Picture.BMP”, LinkToFile : = False
Save with Document_= True
வேர்டின் தானியங்கி செயல் என்று கூறி வருகிறோமே இதனை உருவாக்க கடினமாக இருக்குமோ? என்ற கேள்வி எழும். இந்த தானியங்கியை உருவாக்குவதற்கான குறிமுறைகளை எழுதுவதில் சிறப்பு பயிற்சி ஏதும் தேவையில்லை. போதுமான பொருள்கள் (Proper Object), பண்பியல்புகள் (Properties), பயன்படுத்துவதற்கான வழிமுறைகள் (method to use) ஆகியவற்றை பற்றி மட்டும் தெரிந்திருந்தால் போதும் இதனை மிக சுலபமாக உருவாக்கி விடமுடியும். இவற்றை நாம் எவ்வாறு தெரிந்து அறிந்து பயன்படுத்தி தானியங்கியை உருவாக்குவது என்று தயங்கி மயங்கி தடுமாறுபவர்கள்கூட கவலைப்பட அதற்காக வேண்டாம் Macro recorder என்பதை இதற்காக செயல்படுத்துவதே மிகச்சுலபமான எளிதான வழிமுறையாகும்.
இதற்காக வேர்டு சாளரத்தின் மேலே கட்டளை பட்டையில் (menu bar) உள்ள tools என்பதை தெரிவு செய்க. உடன் விரியும் tools எனும் பட்டியில் macro என்பதை தெரிவு செய்க. உடன் விரியும் சிறு பட்டியில் record new macro என்பதை தெரிவு செய்க(படம்-2).
படம்-2
உடன் record macro என்ற உரையாடல் பெட்டி திரையில் தோன்றும் அதில் உள்ள macro name என்பதில் நாம் உருவாக்க போகும் குறும நிரலுக்கு (macro) ஒரு பெயரை உள்ளீடு செய்க அல்லது இயல்பு நிலையில் macro1 என்றிருக்கும் அப்படியே விட்டுவிடுக. பின்னர் இது எந்த பொத்தானை பிடித்து சொடுக்கி செயற்படுத்தினால் இயங்கும் என்பதற்காக ஒதுக்கீடு பகுதியில் assign macro to என்பதில் toolbars அல்லது keyboard ஆகியவற்றில் ஏதேனும் ஒன்றை தெரிவு செய்க. இது எங்கு பாதுகாக்கப்பட வேண்டும் என்பதற்காக store macro in என்பதில் all documents அல்லது நடப்பில் உள்ள ஆவணம் போன்று ஏதேனும் ஒன்றை உள்ளீடு செய்க. அதன்பிறகு இந்த குறும நிரலின் விவரம் description எதற்காக உருவாக்கினோம்? யார் உருவாக்கியது? எப்போது? என்பது போன்ற விவரங்கள் உள்ளீடு செய்து ok என்ற பொத்தானை தெரிவுசெய்து சொடுக்குக.
அதன்பின் இப்போது word ஆவணத்தில் நாம் செய்யும் செயல் ஒவ்வொன்றும் பதிவாகி விடும் தானியங்கி செயல் பதிவு ஆவதற்கு அடையாளமாக சிறு செவ்வக பட்டி ஒன்று இரண்டு பொத்தான் களுடன் திரையில் மிதக்க ஆரம்பிக்கும் அதில் ஒன்று இந்த குறும நிரல் macro பதிவை தற்காலிக நிறுத்துவதற்கும்(pause) மற்றொன்று மொத்தமாக நிறுத்துவதற்கும் (stop records) பயன்படுகின்றன.
செய்ய வேண்டிய செயல் அனைத்தையும் மிக கவனமாக செய்து முடித்துவிட்டு stop record என்ற பொத்தானை கண்டிப்பாக தெரிவு செய்து சொடுக்குக. நீங்கள் இவ்வாறு பதிவு செய்த செயல்களுக்கான குறிமுறையை திரையில் காண Tools => Macro => Visual Basic Editor என்றவாறு தெரிவு செய்தவுடன் VBE சாளரம் திரையில் திறந்து நீங்கள் பதிவு செய்த Macroவின் குறிமுறைகளின் வரிகள் படம் – 3 ல் உள்ளவாறு பிரதிபலிக்கும்.
கீழ்காணும் குறிமுறைகளை இந்த தானியங்கி செயல்களுக்காக நகலெடுத்து ஒட்டிக் கொள்ளுங்கள்.
Dim word obj as New word.Application
Word Obj.Documents.Add Template ; = “Normal.dot”
New Template : = False, Document Type : = 0
படம்-3