ഉള്ളടക്ക പട്ടിക
VBA -ലെ DIR ഫംഗ്ഷൻ, നൽകിയിരിക്കുന്ന ഫോൾഡറിൽ നിന്നുള്ള ഡയറക്‌ടറിയോ ഫയലുകളോ ആണ് പ്രധാനമായും കാണിക്കുന്നത്. ഈ ഫംഗ്ഷൻ ഉപയോഗിച്ച് ഇതിന് ആദ്യ ഫയൽ തിരികെ നൽകാനും കഴിയും. നിർദ്ദിഷ്ട ഫയലുകളും ഫോൾഡറുകളും ലഭിക്കുന്നതിന് ഈ ഫംഗ്‌ഷന് ധാരാളം ഉപയോഗങ്ങളുണ്ട്. VBA കോഡിന്റെ പാത്ത് നാമത്തിൽ ഫയൽ പാത്ത് ചേർത്താൽ മതി. VBA DIR കോഡുകൾ ഉപയോഗിക്കുന്നത് നിങ്ങൾക്ക് ബുദ്ധിമുട്ടായി തോന്നിയേക്കാം. വിഷമിക്കേണ്ട, ഈ ലേഖനത്തിൽ, VBA DIR ഫംഗ്ഷൻ ഉപയോഗിക്കുന്നതിന് മികച്ച ദൃശ്യവൽക്കരണത്തിനായി ഞങ്ങൾ ചില ഉദാഹരണങ്ങൾ കാണിക്കാൻ പോകുന്നു. ലേഖനം വായിച്ചതിനുശേഷം നിങ്ങൾക്ക് ഫംഗ്ഷൻ ഉപയോഗിക്കാൻ കഴിയുമെന്ന് പ്രതീക്ഷിക്കുന്നു. അതിനാൽ, നമുക്ക് ആരംഭിക്കാം.
പ്രാക്ടീസ് വർക്ക്ബുക്ക് ഡൗൺലോഡ് ചെയ്യുക
ഇനിപ്പറയുന്ന പരിശീലന വർക്ക്ബുക്ക് ഡൗൺലോഡ് ചെയ്യുക. വിഷയം നന്നായി മനസ്സിലാക്കാൻ ഇത് നിങ്ങളെ സഹായിക്കും.
DIR Function.xlsm
DIR ഫംഗ്ഷന്റെ ആമുഖം
സംഗ്രഹം:
VBA DIR ഫംഗ്ഷൻ തന്നിരിക്കുന്ന ഫോൾഡർ പാത്തിൽ നിന്ന് ഒരു ഫയലിന്റെയോ ഡയറക്‌ടറിയുടെയോ പേര് നൽകുന്നു. പരമ്പരാഗതമായി, ഇത് ആദ്യ ഫയൽ തിരികെ നൽകുന്നു.
Syntax:
Dir [ (pathname, [ attributes ] ) ] വാദങ്ങളുടെ വിശദീകരണം:
| വാദം | ആവശ്യമാണ്/ഓപ്ഷണൽ | വിശദീകരണം |
|---|---|---|
| PathName | ഓപ്ഷണൽ | പാത്ത് ആക്‌സസ് ചെയ്യാനും ഫയൽ വ്യക്തമാക്കാനും |
| ആട്രിബ്യൂട്ടുകൾ | ഓപ്ഷണൽ | സ്ഥിരമായ അല്ലെങ്കിൽ സംഖ്യാ പദപ്രയോഗം പൊരുത്തപ്പെടുന്ന ഫയലുകളുടെ ആട്രിബ്യൂട്ടുകൾ വ്യക്തമാക്കുന്നു |
കുറച്ച് മുൻകൂർ ഉണ്ട്നിർവചിക്കപ്പെട്ട ആട്രിബ്യൂട്ടുകൾ, അവ-
| ആട്രിബ്യൂട്ട് പേര് | വിവരണം |
|---|---|
| vbNormal | ഫയലുകൾ പ്രത്യേക ആട്രിബ്യൂട്ടുകളൊന്നുമില്ലാതെ |
| vbReadOnly | ആട്രിബ്യൂട്ടുകളില്ലാത്ത റീഡ്-ഒൺലി ഫയലുകൾ |
| vbHidden | മറച്ചിരിക്കുന്നു ആട്രിബ്യൂട്ടുകളില്ലാത്ത ഫയലുകൾ |
| vbSystem | ആട്രിബ്യൂട്ടുകളില്ലാത്ത സിസ്റ്റം ഫയലുകൾ |
| vbVolume | വോളിയം ലേബൽ |
| vbDirectory | ആട്രിബ്യൂട്ടുകളില്ലാത്ത ഡയറക്‌ടറികൾ അല്ലെങ്കിൽ ഫോൾഡറുകൾ |
| vbAlias | നിർദ്ദിഷ്ട ഫയലിന്റെ പേര് ഒരു അപരനാമമാണ്<17 |
7 Excel-ൽ VBA DIR ഫംഗ്ഷൻ ഉപയോഗിക്കുന്നതിന്റെ ഉദാഹരണങ്ങൾ
വിവരണത്തിൽ നിന്ന്, VBA DIR ഫംഗ്ഷൻ നൽകുന്നത് നൽകിയിരിക്കുന്ന പാത്ത് നാമത്തിൽ നിന്നുള്ള ഫയലിന്റെ പേര്. ഉദാഹരണത്തിലൂടെ അത് മനസ്സിലാക്കാം. നിങ്ങൾക്ക് വിവിധ ഉദാഹരണങ്ങൾ കാണിക്കുന്നതിനായി ഞങ്ങൾ ഇവിടെ Exceldemy_Folder ഒരു ഡയറക്ടറി സൃഷ്‌ടിച്ചു. ഈ ഫോൾഡറിൽ വ്യത്യസ്‌ത ചെറിയ ഫോൾഡറുകളും ഫയലുകളും ഉണ്ട്.
1. പാതയിൽ നിന്ന് ഫയലിന്റെ പേര് കണ്ടെത്തുക
ഞങ്ങളുടെ ഫോൾഡറിൽ, നമുക്ക് ഒരു നിർദ്ദിഷ്ട ഫയൽ കണ്ടെത്താനാകും ഫയലിന്റെ പേര് പാത്ത് പ്രഖ്യാപിക്കുന്നു.
ഫയലിന്റെ പാത്ത് പകർത്തിയ ശേഷം, നിങ്ങൾ കോഡ് പ്രവർത്തിപ്പിക്കേണ്ടതുണ്ട്.
ഇക്കാരണത്താൽ, ഡെവലപ്പർ ടാബ് >> വിഷ്വൽ ബേസിക് തിരഞ്ഞെടുക്കുക. തുടർന്ന് തിരുകുക ടാബിലേക്ക് പോകുക >> മൊഡ്യൂൾ തിരഞ്ഞെടുക്കുക. പൊതുവായ ഡയലോഗ് ബോക്സിൽ, ഞങ്ങൾ കോഡ് എഴുതുന്നു.
ഞങ്ങളുടെ അജണ്ട പോലെ <1 കണ്ടെത്തുക എന്നതാണ്>ഫയലിന്റെ പേര് പാത്ത് നെയിമിൽ നിന്ന്, ഞങ്ങൾ സജ്ജീകരിക്കുംപൂർണ്ണ പാതയുടെ പേര് (റൂട്ട് മുതൽ ഫയലിലേക്ക്) കൂടാതെ ഞങ്ങളുടെ കോഡ്
3005
ഇവിടെ ഞങ്ങളുടെ കോഡിനുള്ളിൽ, ഞങ്ങൾ പാതയുടെ പേര് E:\Exceldemy\Sales_of_January ആയി സജ്ജീകരിച്ചിരിക്കുന്നു. xlsx
കോഡ് ബ്രേക്ക്ഡൗൺ:
- ആദ്യം, FN<എന്ന പേരിൽ ഒരു സ്‌ട്രിംഗ് വേരിയബിൾ ഞങ്ങൾ പ്രഖ്യാപിച്ചു. 2>. കൂടാതെ Dir ഫംഗ്ഷന്റെ ഔട്ട്‌പുട്ട് ഈ വേരിയബിളിൽ സംരക്ഷിച്ചു.
- അടുത്തതായി, Dir ഫംഗ്ഷൻ ഫയലിന്റെ പേര് കണ്ടെത്തി നൽകിയ പാതയിൽ നിന്ന് തിരികെ നൽകുന്നു.<29
- അപ്പോൾ MsgBox സന്ദേശ ബോക്സിലൂടെ ഔട്ട്‌പുട്ട് സജ്ജമാക്കുന്നു. MsgBox ഒരു സന്ദേശ ബോക്‌സ് ഉപയോഗിച്ച് ഔട്ട്‌പുട്ട് നൽകുന്നു.
- തുടർന്ന്, F5 കീ ഉപയോഗിച്ച് കോഡ് പ്രവർത്തിപ്പിക്കുക.
അവസാനം, Sales_of_January.xlsx എന്ന പേരിലുള്ള ഫയൽ ഞങ്ങൾ കണ്ടെത്തി.
2. ഒരു ഡയറക്ടറിയുടെ നിലനിൽപ്പ് പരിശോധിക്കുക
Dir ഫംഗ്ഷൻ ഉപയോഗിച്ച് നമുക്ക് ഒരു ഡയറക്ടറിയുടെ അസ്തിത്വം പരിശോധിക്കാം. Exceldemy ഫോൾഡർ നിലവിലുണ്ടോ എന്ന് പരിശോധിക്കാൻ നമുക്ക് കോഡ് എഴുതാം. ഇനിപ്പറയുന്ന കോഡ് പൊതുവായ ബോക്സിൽ എഴുതി F5 കീ ഉപയോഗിച്ച് റൺ ചെയ്യുക.
1250
കോഡ് ബ്രേക്ക്ഡൗൺ :
- ഞങ്ങൾ രണ്ട് വേരിയബിളുകൾ പ്രഖ്യാപിച്ചു; PN -ൽ ഞങ്ങളുടെ ചെക്കിംഗ് ഡയറക്ടറിയുടെ മുഴുവൻ പാത്ത്‌നെയിം അടങ്ങിയിരിക്കുന്നു.
- ഇവിടെ Dir ഫംഗ്‌ഷനിൽ, ഞങ്ങൾ രണ്ട് മൂല്യങ്ങൾ സജ്ജീകരിച്ചിരിക്കുന്നു, പാതനാമവും ആട്രിബ്യൂട്ടും മൂല്യം vbDirectory ആയി. ഈ ആട്രിബ്യൂട്ട് മൂല്യം ഡയറക്ടറി കണ്ടുപിടിക്കാൻ സഹായിക്കും. ഈ ഫംഗ്ഷന്റെ ഔട്ട്‌പുട്ട് ഇതിൽ സംഭരിച്ചിരിക്കുന്നു ഫയൽ വേരിയബിൾ.
- അപ്പോൾ വേരിയബിൾ ശൂന്യമാണോ അല്ലയോ എന്ന് ഞങ്ങൾ പരിശോധിച്ചു. വേരിയബിൾ അല്ലെന്ന് ഞങ്ങൾ കണ്ടെത്തുകയാണെങ്കിൽ, ഒരു സന്ദേശ ബോക്സിലൂടെ ഡയറക്ടറിയുടെ അസ്തിത്വം പ്രഖ്യാപിക്കുക, അല്ലെങ്കിൽ, റിട്ടേൺ നിലവിലില്ല.
ഇവിടെ, എക്‌സൽഡെമി ഡയറക്ടറി നിലവിലുണ്ട്, അതിനാൽ “ Exceldemy നിലവിലുണ്ട് ”, ഇവിടെ Exceldemy എന്നത് ഫോൾഡറിന്റെ പേരാണ്.
3. നിലവിലില്ലാത്ത ഒരു ഫോൾഡർ സൃഷ്‌ടിക്കുക
നിങ്ങളുടെ പിസിയിൽ ഇല്ലാത്ത ഒരു ഫോൾഡർ നിങ്ങൾക്ക് സൃഷ്‌ടിക്കാം. ഇതിനായി, നിങ്ങളുടെ ഫോൾഡറുകളിൽ ഇല്ലാത്ത ഒരു പാത്ത് നെയിം ഉണ്ടാക്കണം. ഞങ്ങൾ Exceldemy_1 എന്ന പേരിൽ ഒരു ഡയറക്ടറി സൃഷ്‌ടിക്കാൻ പോകുകയാണെന്ന് സങ്കൽപ്പിക്കുക. ഡയറക്ടറി സൃഷ്‌ടിക്കാൻ ഞങ്ങൾ MkDir കമാൻഡ് ഉപയോഗിക്കും, എന്നാൽ അതിനുമുമ്പ്, ഞങ്ങൾ ഇനിപ്പറയുന്ന VBA കോഡ് എഴുതേണ്ടതുണ്ട്.
6795
ഞങ്ങളുടെ കോഡിന്റെ Else ബ്ലോക്കിൽ നിന്ന് പാത്ത് നെയിം ഉപയോഗിച്ച് ഡയറക്ടറി സൃഷ്‌ടിക്കാൻ ഞങ്ങൾ ഇവിടെ ഒരു കമാൻഡ് എഴുതിയിട്ടുണ്ട്. F5 കീ ഉപയോഗിച്ച് കോഡ് റൺ .
ഡയറക്ടറി സൃഷ്‌ടിച്ചു. നമുക്ക് ഡയറക്ടറി ഫോൾഡർ നോക്കാം. Exceldemy_1 ഫോൾഡർ ഇപ്പോൾ നിങ്ങളുടെ കമ്പ്യൂട്ടറിൽ ദൃശ്യമാണ്.
സമാന വായനകൾ:
- Excel-ൽ VBA-ൽ ഒരു സബ്ബ് എങ്ങനെ വിളിക്കാം (4 ഉദാഹരണങ്ങൾ)
- VBA ഫംഗ്‌ഷനിൽ ഒരു മൂല്യം തിരികെ നൽകുക (അറേയും നോൺ-അറേ മൂല്യങ്ങളും)
- Excel-ൽ VBA UCASE ഫംഗ്ഷൻ ഉപയോഗിക്കുക (4 ഉദാഹരണങ്ങൾ)
- ഇതിൽ TRIM ഫംഗ്ഷൻ എങ്ങനെ ഉപയോഗിക്കാംExcel-ലെ VBA (നിർവചനം + VBA കോഡ്)
4. ഒരു ഡയറക്ടറിയിൽ നിന്ന് ആദ്യ ഫയൽ കണ്ടെത്തുക
Dir ഫംഗ്ഷന്റെ പ്രധാന ദൗത്യം നൽകിയിരിക്കുന്ന ഡയറക്‌ടറിയിലെ ആദ്യ ഫയൽ കണ്ടെത്താൻ. ഫംഗ്‌ഷനിൽ നിങ്ങൾ നൽകേണ്ടത് പാത്ത് നെയിം (കണ്ടെയ്‌നർ ഡയറക്ടറി വരെ) മാത്രമാണ്, അത് ആ ഡയറക്ടറിയിൽ നിന്നുള്ള ആദ്യത്തെ ഫയൽ തിരികെ നൽകും.
നമുക്ക് ഞങ്ങളുടെ -ൽ നിന്ന് ആദ്യ ഫയൽ കണ്ടെത്താം. Exceldemy ഡയറക്ടറി. ഞങ്ങളുടെ കോഡ് ആയിരിക്കും
3606
നിങ്ങൾക്ക് അടിസ്ഥാന കോഡ് കാണാം; ഞങ്ങൾ പാതയുടെ പേര് Dir ഫംഗ്‌ഷനിലേക്ക് കടത്തി. ഇപ്പോൾ F5 എന്ന കീ ഉപയോഗിച്ച് കോഡ് റൺ ചെയ്യുക, ഈ ഡയറക്ടറിയിൽ നിങ്ങൾ ആദ്യത്തെ ഫയൽ കണ്ടെത്തും.
5. എല്ലാം കണ്ടെത്തുക ഒരു ഡയറക്ടറിയിൽ നിന്നുള്ള ഫയലുകൾ
മുമ്പത്തെ വിഭാഗത്തിൽ, ഒരു ഡയറക്ടറിയിൽ നിന്ന് ആദ്യത്തെ ഫയലിന്റെ പേര് എങ്ങനെ കണ്ടെത്താമെന്ന് ഞങ്ങൾ കണ്ടു. ഒരു നിർദ്ദിഷ്ട ഡയറക്ടറിയിൽ നിന്ന് എല്ലാ ഫയലുകളും കണ്ടെത്തേണ്ടിവരുമ്പോൾ സാഹചര്യം ഉണ്ടാകാം. ഒരു നിർദ്ദിഷ്ട ഡയറക്‌ടറിയിലെ എല്ലാ ഫയലുകളും കണ്ടെത്തുന്നതിന്, നിങ്ങൾ ഇനിപ്പറയുന്ന VBA കോഡ് എഴുതണം.
9290
ഫയൽ നാമങ്ങൾ ഇങ്ങനെ സംഭരിക്കാൻ രണ്ട് വേരിയബിളുകൾ ഇതാ. ഒരൊറ്റ ( FN ), ഒരു ലിസ്‌റ്റായി ( FL ). Do while ലൂപ്പ് ആവർത്തിക്കുന്നു, ഒരു ഫയലും ഡയറക്ടറിയിൽ അവശേഷിക്കുന്നില്ല, ഈ ലൂപ്പ് ഉപയോഗിച്ച്, ഞങ്ങൾ എല്ലാ ഫയലിന്റെ പേരും FL വേരിയബിളിലേക്ക് തള്ളുന്നു.
കോഡ് എക്‌സിക്യൂട്ട് ചെയ്യുക, ചുവടെയുള്ള ചിത്രത്തിലെ പോലെ എല്ലാ ഫയലുകളും ഡയറക്ടറിയിൽ നിങ്ങൾ കണ്ടെത്തും.
6. ഒരു ഡയറക്ടറിയിൽ നിന്ന് എല്ലാ ഫയലുകളും ഫോൾഡറുകളും കണ്ടെത്തുക
ഞങ്ങൾഎല്ലാ ഫയലുകളും എവിടെ കണ്ടെത്താമെന്ന് മുൻ വിഭാഗത്തിൽ സൂചിപ്പിച്ചിട്ടുണ്ട്. ഒരു ഫോൾഡറിൽ എല്ലാ ഉപ ഫോൾഡറുകളും നമുക്ക് കണ്ടെത്താനാകും. ഇത് ചെയ്യുന്നതിന്, ഞങ്ങൾ താഴെ അറ്റാച്ച് ചെയ്‌തിരിക്കുന്ന ഇനിപ്പറയുന്ന VBA കോഡ് എഴുതുക.
1992
ഞങ്ങളുടെ കോഡിലെ മാറ്റം ആട്രിബ്യൂട്ട് പാരാമീറ്ററുകളുടെ ഉപയോഗം മാത്രമാണ്. ഞങ്ങൾ ആ ഫീൽഡിൽ vbDirectory ഉപയോഗിച്ചു. കോഡ് റൺ ചെയ്യുക, തുടർന്ന് Exceldemy_Folder .
7-ന്റെ എല്ലാ ഫയലുകളും ഉപഫോൾഡറുകളും നിങ്ങൾ കണ്ടെത്തും. ഒരു പ്രത്യേക തരത്തിലുള്ള എല്ലാ ഫയലുകളും കണ്ടെത്തുക
VBA Dir ഫംഗ്ഷൻ ഉപയോഗിച്ച്, നമുക്ക് ഏതെങ്കിലും പ്രത്യേക തരം ഫയലുകൾ കണ്ടെത്താനാകും. നമുക്ക് ഒരു ഉദാഹരണം ഉപയോഗിച്ച് പര്യവേക്ഷണം ചെയ്യാം.
ഞങ്ങളുടെ ഡയറക്ടറിയിൽ നിന്ന് .csv ഫയലുകൾ കണ്ടെത്താൻ പോകുന്നു. ഞങ്ങളുടെ കോഡ് ഇനിപ്പറയുന്നതു പോലെയായിരിക്കും-
1525
ഫയലുകൾ കണ്ടെത്തുന്നതിന് സമാനമായ ഒരു സംവിധാനം ഉപയോഗിക്കുന്ന കോഡ് നിങ്ങൾ മനസ്സിലാക്കിയിട്ടുണ്ടെന്ന് ഞങ്ങൾ പ്രതീക്ഷിക്കുന്നു. പാതയുടെ പേരിൽ, ഞങ്ങൾ ഒരു വൈൽഡ്കാർഡ് ഉപയോഗിച്ചു ( * ). ഈ നക്ഷത്രചിഹ്നം (*) സൂചിപ്പിക്കുന്നത് ഏത് സംഖ്യ വരെയുള്ള ഏത് പ്രതീകവും സംഭവിക്കാം എന്നാണ്. ഫയലിന്റെ പേര് എന്തും ആകാം എന്നാൽ ഒരു .csv ഫയലായിരിക്കണം വൈൽഡ്കാർഡ് ഉപയോഗിച്ചിരിക്കുന്നത്.
നിങ്ങൾ കോഡ് പ്രവർത്തിപ്പിക്കുമ്പോൾ, അത് തിരികെ നൽകും. ഞങ്ങളുടെ Exceldemy ഡയറക്ടറിയിൽ നിന്നുള്ള csv ഫയലുകൾ നിങ്ങളുടെ പരിശീലനത്തിനായി ഓരോ ഷീറ്റിലും വലതുവശത്തുള്ള ഭാഗം. ദയവായി അത് സ്വയം ചെയ്യുക.
ഉപസംഹാരം
ഇന്നത്തെ സെഷനെക്കുറിച്ച് അത്രമാത്രം. കൂടാതെ ഇത് ചില ലളിതമായ ഉദാഹരണങ്ങളാണ്Excel-ലെ VBA Dir ഫംഗ്ഷന്റെ. നിങ്ങൾക്ക് എന്തെങ്കിലും ചോദ്യങ്ങളോ നിർദ്ദേശങ്ങളോ ഉണ്ടെങ്കിൽ അഭിപ്രായ വിഭാഗത്തിൽ ഞങ്ങളെ അറിയിക്കുക. കൂടുതൽ നന്നായി മനസ്സിലാക്കാൻ, പരിശീലന ഷീറ്റ് ഡൗൺലോഡ് ചെയ്യുക. വൈവിധ്യമാർന്ന Excel രീതികളെക്കുറിച്ച് അറിയാൻ ഞങ്ങളുടെ വെബ്‌സൈറ്റ്, Exceldemy , ഒറ്റത്തവണ Excel സൊല്യൂഷൻ പ്രൊവൈഡർ സന്ദർശിക്കുക. ഈ ലേഖനം വായിക്കാനുള്ള നിങ്ങളുടെ ക്ഷമയ്ക്ക് നന്ദി.
