VBA ఫైల్కాపీ ఫంక్షన్ | ఒక డైరెక్టరీ నుండి మరొకదానికి ఫైల్ను కాపీ చేయండి
ఎక్సెల్ VBA ఫైల్కాపీ ఫంక్షన్
ఫైల్ కాపీ అనేది ఫైల్ను ఒక ప్రదేశం నుండి మరొక ప్రదేశానికి కాపీ చేయడానికి ఉపయోగించే ఇన్బిల్ట్ vba ఫంక్షన్. ఈ ఫంక్షన్ను ఉపయోగించడానికి, మేము ప్రస్తుత ఫైల్ మార్గం మరియు గమ్యం ఫైల్ మార్గాన్ని పేర్కొనాలి.
సరే, ఫైల్కాపీ ఫంక్షన్ యొక్క వాక్యనిర్మాణాన్ని చూద్దాం.
- మూలం: ఇది మనం ఫైల్ను కాపీ చేయాల్సిన అవసరం తప్ప మరొకటి కాదు. మేము పూర్తి అర్హత గల ఫోల్డర్ మార్గాన్ని పేర్కొనాలి.
- గమ్యం: ఇది కాపీ చేసిన ఫైల్ను అతికించాల్సిన గమ్యం ఫోల్డర్.
ఉదాహరణలు
VBA కోడ్ ఉపయోగించి ఫైళ్ళను ఎలా కాపీ చేయాలో ఉదాహరణలు క్రింద ఉన్నాయి.
మీరు ఈ VBA ఫైల్ కాపీ ఎక్సెల్ మూసను ఇక్కడ డౌన్లోడ్ చేసుకోవచ్చు - VBA ఫైల్ కాపీ ఎక్సెల్ మూసఉదాహరణ # 1
సరళమైన ఉదాహరణతో ప్రారంభిద్దాం. ఫోల్డర్లో “సేల్స్ ఏప్రిల్ 2019” అనే ఫైల్ ఉంది. అదే చిత్రం క్రింద ఉంది, “మూలం”.
పై స్థానం నుండి, నేను ఈ ఫైల్ను కాపీ చేసి వేరే ఫోల్డర్కు అతికించాలనుకుంటున్నాను. అదే చిత్రం క్రింద ఉంది, “గమ్యం మూలం ”.
సరే, దాని కోసం కోడ్ వ్రాద్దాం.
తెరవండి ఫైల్కాపీ ఉప విధానం లోపల పని.
కోడ్:
ఉప ఫైల్కాపీ_ఎక్సంపుల్ 1 ()
ఫైల్కాపీ
ఎండ్ సబ్
ఇప్పుడు మొదటి వాదన కోసం, మన కరెంట్ ఉన్న ఫైల్ పాత్ గురించి చెప్పాలి.
కోడ్:
ఉప ఫైల్కాపీ_ఎక్సంపుల్ 1 ()
ఫైల్ కాపీ “D: \ నా ఫైళ్ళు \ VBA \ ఏప్రిల్ ఫైల్స్
ఎండ్ సబ్
ఫోల్డర్ మార్గాన్ని ప్రస్తావించిన తరువాత, ఫైల్ పొడిగింపుతో ఫైల్ను పేర్కొనాలి. కాబట్టి బ్యాక్స్లాష్ (\) ఉంచడం ద్వారా ఫైల్ పేరును పేర్కొనండి.
కోడ్:
ఉప ఫైల్కాపీ_ఎక్సాంపుల్ 1 () ఫైల్కాపీ "డి: \ నా ఫైల్స్ \ విబిఎ \ ఏప్రిల్ ఫైల్స్ \ సేల్స్ ఏప్రిల్ 2019.xlsx", ఎండ్ సబ్
ఇప్పుడు రెండవ ఆర్గ్యుమెంట్లో మనం కాపీ చేసిన ఫైల్ను ఎక్కడ పేస్ట్ చేయాలో ప్రస్తావించండి.
కోడ్:
ఉప ఫైల్కాపీ_ఎక్సాంపుల్ 1 () ఫైల్కాపీ "డి: \ నా ఫైల్స్ \ విబిఎ \ ఏప్రిల్ ఫైల్స్ \ సేల్స్ ఏప్రిల్ 2019.xlsx", "డి: \ నా ఫైల్స్ \ విబిఎ \ గమ్యం ఫోల్డర్ \ సేల్స్ ఏప్రిల్ 2019.xlsx" ఎండ్ సబ్
ఫోల్డర్ మార్గాన్ని చివర్లో ప్రస్తావించిన తరువాత మనం చేయవలసిన ఒక విషయం ఏమిటంటే, ఫైల్ పేరును అలాగే గమ్యం వాదనలో పేర్కొనాలి.
ఇప్పుడు F5 కీని ఉపయోగించి కోడ్ను రన్ చేయండి లేదా మాన్యువల్గా, అది ఫైల్ను దిగువ స్థానం నుండి గమ్య స్థానానికి కాపీ చేస్తుంది.
“D: \ నా ఫైళ్ళు \ VBA \ ఏప్రిల్ ఫైళ్ళు \ అమ్మకాలు ఏప్రిల్ 2019.xlsx”
“D: \ నా ఫైళ్ళు \ VBA \ గమ్యం ఫోల్డర్ \ అమ్మకాలు ఏప్రిల్ 2019.xlsx”
ఉదాహరణ # 2 - మూల మార్గం మరియు గమ్యం మార్గాన్ని నిల్వ చేయడానికి వేరియబుల్స్ ఉపయోగించండి.
మునుపటి ఉదాహరణలో, మేము సోర్స్ పాత్ మరియు గమ్యం మార్గాన్ని నేరుగా ఫార్ములాకు సరఫరా చేసాము. ఇది కొనసాగించడానికి ఉత్తమమైన పద్ధతి కాదు, కాబట్టి వాటిని వేరియబుల్స్లో నిల్వ చేద్దాం.
ఉదాహరణకు ఈ క్రింది కోడ్ను చూడండి.
కోడ్:
ఉప ఫైల్కాపీ_ఎక్సాంపుల్ 2 () మసక సోర్స్పాత్ స్ట్రింగ్ డిమ్ డెస్టినేషన్ పాత్ స్ట్రింగ్ సోర్స్పాత్ = "డి: \ నా ఫైల్స్ \ విబిఎ \ ఏప్రిల్ ఫైల్స్ \ సేల్స్ ఏప్రిల్ 2019.xlsx" డెస్టినేషన్ పాత్ = "డి: \ నా ఫైల్స్ \ విబిఎ \ గమ్యం ఫోల్డర్ \ సేల్స్ ఏప్రిల్ 2019. xlsx "ఫైల్కాపీ సోర్స్పాత్, డెస్టినేషన్ పాత్ ఎండ్ సబ్
మీ కోసం కోడ్ను వివరంగా వివరిస్తాను.
మొదట నేను రెండు వేరియబుల్స్ డిక్లేర్ చేసాను.
డిమ్ సోర్స్పాత్ స్ట్రింగ్గా డిమ్ డెస్టినేషన్ పాత్ స్ట్రింగ్
అప్పుడు మొదటి వేరియబుల్ కోసం, ఫోల్డర్ మార్గాన్ని ఫైల్ మరియు ఫైల్ పేరును దాని ఫైల్ ఎక్స్టెన్షన్తో పాటు కాపీ చేయాల్సిన చోట నుండి కేటాయించాను.
SourcePath = "D: \ నా ఫైళ్ళు \ VBA \ ఏప్రిల్ ఫైళ్ళు \ అమ్మకాలు ఏప్రిల్ 2019.xlsx"
అదేవిధంగా రెండవ వేరియబుల్ కోసం, నేను ఫైల్ పేరు మరియు ఎక్సెల్ పొడిగింపుతో గమ్యం ఫోల్డర్ మార్గాన్ని కేటాయించాను.
గమ్యం మార్గం = "D: \ నా ఫైళ్ళు \ VBA \ గమ్యం ఫోల్డర్ \ అమ్మకాలు ఏప్రిల్ 2019.xlsx"
అప్పుడు ఫైల్కాపీ ఫార్ములా కోసం, నేను ఈ వేరియబుల్స్ను సుదీర్ఘ ఫోల్డర్ పాత్ స్ట్రింగ్స్కు బదులుగా సరఫరా చేసాను.
ఫైల్కాపీ సోర్స్పాత్, డెస్టినేషన్ పాత్
ఈ విధంగా, మేము మార్గాలను నిల్వ చేయడానికి మరియు వాటిని సమర్థవంతంగా ఉపయోగించడానికి వేరియబుల్స్ ఉపయోగించవచ్చు.
ఉదాహరణ # 3 - ఫైల్ కాపీ ఫంక్షన్తో లోపం
కొన్నిసార్లు ఫైల్ కాపీ ఫంక్షన్ “అనుమతి నిరాకరించబడింది” యొక్క లోపాన్ని ఎదుర్కొంటుంది.
మేము ఈ లోపాన్ని పొందటానికి కారణం, ఎందుకంటే కాపీ చేసే ఫైల్ తెరిచినప్పుడు మరియు పై లోపం కాపీ చేయడానికి మీరు ప్రయత్నిస్తే, కాబట్టి ఎల్లప్పుడూ ఫైల్ను మూసివేసి కోడ్ను అమలు చేయండి.