VBA ఫైల్ తొలగించు | VBA కోడ్ ఉపయోగించి ఫోల్డర్లోని ఫైళ్ళను ఎలా తొలగించాలి?
VBA లో మనం కంప్యూటర్లో ఉన్న ఏదైనా ఫైల్ను VBA కోడ్లను ఉపయోగించి తొలగించగలము మరియు ఏదైనా ఫైల్ను తొలగించడానికి ఉపయోగించే కోడ్ను కిల్ కమాండ్ అంటారు, ఏదైనా ఫైల్ను తొలగించే పద్ధతి మొదట, మేము ఫైల్ యొక్క మార్గాన్ని అందిస్తాము అంటే ఎక్కడ ఫైల్ కంప్యూటర్లో ఉంది, ఆపై ఫైల్ను తొలగించడానికి కిల్ కమాండ్ను ఉపయోగిస్తాము.
VBA కోడ్ ఉపయోగించి ఫైళ్ళను ఎలా తొలగించాలి?
VBA ప్రారంభంలో కఠినమైన విషయం కాని మీరు VBA తో ఎక్కువ సమయం గడుపుతున్నప్పుడు మీరు నా లాంటి ప్రేమను ప్రారంభిస్తారు. మేము కంప్యూటర్ యొక్క మరొక ఫోల్డర్ నుండి ఫైళ్ళను తెరవగలము, మేము వారితో కలిసి పని చేయవచ్చు మరియు ఇప్పుడు మనం VBA కోడింగ్ ఉపయోగించి ఫైళ్ళను కూడా తొలగించవచ్చు. ఈ వ్యాసంలో, నిర్దిష్ట ఫోల్డర్లోని VBA కోడ్ను ఉపయోగించి ఫైల్లను ఎలా తొలగించవచ్చో మేము మీకు చూపుతాము.
మేము పెద్ద ప్రాజెక్టులతో పని చేస్తున్నప్పుడు మా ప్రక్రియకు మద్దతు ఇవ్వడానికి సాధారణంగా చాలా ఇంటర్మీడియట్ ఫైళ్ళను సృష్టిస్తాము. అన్ని పనులు పూర్తయిన తర్వాత భవిష్యత్తులో ఎలాంటి గందరగోళాన్ని నివారించడానికి మేము ఆ ఫైళ్ళను తొలగించాలి.
మరియు ఒక దృష్టాంతం ఏమిటంటే, మేము మా ఇమెయిల్ను సాధారణంగా స్వీకరించినప్పుడు, మా రెగ్యులర్ పని కోసం జోడింపులను సేవ్ చేస్తాము లేదా మేము ఆ సమయానికి నివేదికను చూడాలనుకుంటున్నాము మరియు తరువాత మేము ఆ ఫైల్లను తొలగించాల్సి ఉంటుంది.
ఆ ఫైళ్ళను మానవీయంగా తొలగించడానికి సమయం పడుతుంది లేదా మేము సేవ్ చేయడం మర్చిపోవచ్చు మరియు అది మన కంప్యూటర్లోని స్థలాన్ని ఆక్రమిస్తుంది. సాధారణ VBA కోడ్లతో ఆ ఫైల్లను ఎలా తొలగించాలో మేము మీకు చూపుతాము.
VBA కోడ్ను ఉపయోగించి ఫోల్డర్లో ఫైల్లను తొలగించే విధానాన్ని చంపండి
సరళమైన KILL ఫంక్షన్ ఫోల్డర్, నిర్దిష్ట ఫైల్, అన్ని ఎక్సెల్ ఫైల్స్ మొదలైనవాటిని తొలగిస్తుంది. VBA లోని KILL పద్ధతి యొక్క వాక్యనిర్మాణాన్ని చూడండి. కిల్ పద్ధతి చదవడానికి-మాత్రమే ఫైళ్ళను తొలగించదు.
మార్గం పేరు: పాత్ పేరు ఫైళ్ళను తొలగించడానికి కంప్యూటర్లోని ఫోల్డర్ మార్గం తప్ప మరొకటి కాదు.
గమనిక: మార్గం పేరు వైల్డ్కార్డ్ అక్షరాలను కూడా కలిగి ఉంటుంది. మేము ఎక్సెల్ లో వైల్డ్ కార్డ్ అక్షరాలుగా ఆస్టరిస్క్ (*) మరియు ప్రశ్న గుర్తులు (?) ఉపయోగించవచ్చు.
ఏ పొడవునైనా స్ట్రింగ్తో సరిపోల్చడానికి ఆస్టరిస్క్ (*) ఉపయోగపడుతుంది.
ఒకే అక్షరంతో సరిపోలడానికి ప్రశ్న గుర్తు (?) ఉపయోగపడుతుంది.
ప్రత్యేక ఫైల్ పేరును తొలగించండి
ఉదాహరణకు, నాకు క్రింద ఉన్న ఫోల్డర్ ఉంది.
ఈ ఫోల్డర్లో, “ఫైల్ 5” అని పిలువబడే ఫైల్ను తొలగించాలనుకుంటున్నాను. KILL ఫంక్షన్తో కోడ్ను ప్రారంభించండి.
కోడ్:
ఉప Delete_Files () కిల్ (పాత్ నేమ్) ఎండ్ సబ్
ఫోల్డర్ మార్గాన్ని కాపీ చేసి పేస్ట్ చేయండి.
మరియు డబుల్ కోట్స్లో అతికించండి.
"E: \ Excel Files" ని చంపండి
ఇప్పుడు మరో వెనుకబడిన స్లాష్ (\) ను ఉంచండి మరియు పొడిగింపుతో ఫైల్ పేరును నమోదు చేయండి.
"E: \ Excel Files \ File5.xlsx" ని చంపండి
మీరు ఈ కోడ్ను అమలు చేసినప్పుడు, ఇది పేర్కొన్న ఫోల్డర్ మార్గంలో “ఫైల్ 5.xlsx” అని పిలువబడే ఫైల్ను తొలగిస్తుంది.
అన్ని ఎక్సెల్ ఫైళ్ళను తొలగించండి
VBA ని ఉపయోగించి ఫోల్డర్లోని అన్ని ఎక్సెల్ ఫైల్లను తొలగించడానికి మనం KILL ఫంక్షన్తో వైల్డ్కార్డ్ అక్షరాలను ఉపయోగించాలి. ఫోల్డర్ మార్గాన్ని పేర్కొన్న తరువాత మనం ఫైల్ను “* .xl *” గా పేర్కొనాలి.
కోడ్:
"E: \ Excel Files \ *. Xl *" ని చంపండి
మీరు ఈ కోడ్ను అమలు చేసినప్పుడు, ఇది ఫోల్డర్లోని అన్ని ఎక్సెల్ ఫైల్లను తొలగిస్తుంది.
ఒకే ఎక్సెల్ ఫైల్ మరియు అన్ని ఎక్సెల్ ఫైళ్ళను ఎలా తొలగించగలమో చూశాము. మేము ఫోల్డర్లోని అన్ని ఫైల్లను తొలగించాలనుకుంటే దాన్ని ఎలా తొలగించగలం. మేము ఎక్సెల్ VBA ని ఉపయోగిస్తున్నందున, ఇది ఇతర ఫైళ్ళను తొలగించగలదా?
సమాధానం అవును !!! ఫోల్డర్లోని అన్ని ఫైల్లను తొలగించడానికి క్రింది కోడ్ను ఉపయోగించండి.
కోడ్:
"E: \ Excel Files \ *. *"
మొత్తం ఫోల్డర్ను మాత్రమే తొలగించండి
మొత్తం ఫోల్డర్ను తొలగించడం సాధ్యమేనా?
అవును, ఇది సాధ్యమే.
ఇది చేయుటకు, మనం చేయవలసిన మొదటి విషయం ఏమిటంటే, KILL ఫంక్షన్ను ఉపయోగించడం ద్వారా ఫోల్డర్లోని అన్ని ఫైల్లను తొలగించాలి, ఆపై ఫోల్డర్ను తొలగించడానికి మనం ఇంకొక ఫంక్షన్ను ఉపయోగించాలి RmDir.
కోడ్:
RmDir "E: \ Excel Files \"
ఇక్కడ RmDir ఖాళీ ఫోల్డర్ను మాత్రమే తొలగిస్తుంది, ఏదైనా సబ్ ఫోల్డర్ ఉంటే అది వాటిని తొలగించదు.
ఫోల్డర్లోని అన్ని టెక్స్ట్ ఫైల్లను తొలగించండి
ఫోల్డర్లోని అన్ని టెక్స్ట్ ఫైల్లను తొలగించడానికి క్రింది కోడ్ను ఉపయోగించండి.
కోడ్:
"E: \ Excel Files \ *. Txt" ని చంపండి
చదవడానికి-మాత్రమే ఫైళ్ళను తొలగించండి
KILL ఫంక్షన్ ఫోల్డర్లోని “చదవడానికి మాత్రమే” ఫైల్లను తొలగించలేనని నేను చెప్పినట్లు. అటువంటి సందర్భంలో మనం “Dir $” & “SetAttr” ఫంక్షన్లను ఉపయోగించాలి. చదవడానికి-మాత్రమే ఫైళ్ళను తొలగించడానికి ఉదాహరణ కోడ్ క్రింద ఉంది.
కోడ్:
ఉప Delete_Files1 () మసక DeleteFile స్ట్రింగ్ DeleteFile = "E: \ Excel Files \" If Len (Dir $ (DeleteFile))> 0 అప్పుడు SetAttr DeleteFile, vbNormal Kill DeleteFile End if Sub Sub
మీరు ఈ VBA ఫైల్ ఎక్సెల్ మూసను ఇక్కడ నుండి డౌన్లోడ్ చేసుకోవచ్చు - VBA ఫైల్ ఎక్సెల్ మూసను తొలగించండి