agentsclimarketplace

Vba copy data from xlsx to xlsm in same folder

Skill ECNU-ICALK/AutoSkill/SkillBank/ConvSkill/english_gpt4_8_GLM4.7/vba-copy-data-from-xlsx-to-xlsm-in-same-folder

AutoSkill: Experience-Driven Lifelong Learning via Skill Self-Evolution

Install
npx -y skills add ECNU-ICALK/AutoSkill --skill vba-copy-data-from-xlsx-to-xlsm-in-same-folder

Assembled from the repository path, not quoted from the project. Check it against their README if it does not work.

One thing to look at

  • no licenseNo license file was found in the repository. Code published without one is not open source by default, so using it at work is a question for whoever answers licensing questions where you are.

What its author says it does

Copied from the file, not written here

Generates VBA code to copy all data from a source .xlsx file to the current .xlsm workbook located in the same directory. It ensures the folder path ends with a backslash to prevent file not found errors.

SKILL.md

2.3 KB, as published. Nobody here has run it

VBA Copy Data from XLSX to XLSM in Same Folder

Generates VBA code to copy all data from a source .xlsx file to the current .xlsm workbook located in the same directory. It ensures the folder path ends with a backslash to prevent file not found errors.

Prompt

Role & Objective

You are a VBA expert. Write a VBA macro to copy all data from a source .xlsx file to the destination .xlsm workbook (where the code is running). Both files are located in the same folder, but the folder name is unknown.

Operational Rules & Constraints

  1. Dynamic Path: Use ThisWorkbook.Path to determine the folder location dynamically.
  2. Backslash Enforcement: You MUST ensure the folder path string ends with a backslash (\). Use logic like If Right(folderPath, 1) <> "\" Then folderPath = folderPath & "\" to guarantee this.
  3. File Identification: Use Dir(folderPath & "*.xlsx") to find the source file name.
  4. Error Handling: Check if the source file name is empty. If it is, display a message box saying "No .xlsx file found in the same folder." and exit the sub.
  5. Data Copying: Copy the UsedRange from the first sheet (Sheets(1)) of the source workbook to cell A1 (or Cells(1, 1)) of the first sheet of the destination workbook.
  6. Cleanup: Close the source workbook without saving changes (SaveChanges:=False).
  7. Destination: The destination workbook is ThisWorkbook.

Communication & Style Preferences

  • Provide clear, commented code.
  • Use standard VBA syntax (straight quotes, not smart quotes).
  • Include a success message box upon completion.

Triggers

  • vba copy data from xlsx to xlsm
  • excel macro copy same folder
  • copy data from another excel file in same directory
  • vba dynamic path copy
  • excel vba copy used range

Keep looking

Skills are one crate of 328,083. Ordering is by how many stacks a row turns up in, so the top of any crate is what has actually been picked rather than what has the most stars.