本文由日文译成中文。

这是一个在 Excel VBA 中使用单元格值将文件保存为文件夹名和文件名的示例。

　

将文件保存到驱动器 K，并将下图中的单元格 A1 作为文件夹名，单元格 A2 作为文件名。

ExcelVBAセル値ファイル名

ExcelVBAセル値ファイル名

< Sponsored Links >





如何将单元格值保存为文件夹或文件名

用 VBE 写出以下内容

Sub hozon()
    Dim wb As Workbook
    Dim ws As Worksheet
    Dim hozonPath As String
    Dim FolName As String   
    Dim FilName As String   

    Set wb = ThisWorkbook
    Set ws = ActiveSheet

    hozonPath = "K:\"
    FolName = ws.Range("A1").Value
    FilName = ws.Range("A2").Value

    wb.SaveAs Filename:=hozonPath & FolName & "\" & FilName
End Sub

ExcelVBAセル値ファイル名

　　

在执行 VBA 时，它被保存了下来。

ExcelVBAセル値ファイル名

　

< Sponsored Links >