如何在单个excel单元格中插入多个值，并将其导出为该单元格每个条目的pdf格式

我想在单个单元格中插入多个值，并将每个条目导出为单独的pdf格式。到目前为止，我只知道手动引用单元格并将其导出为PDF。这是我的宏：

 Sub SavePDF()
     Range("A8").Value = Range("A8").Value + 1
        Sheet3.ExportAsFixedFormat Type:=xlTypePDF, _
            Filename:="C:\Users\Report_" & _
            ActiveSheet.Range("A8").Value & ".pdf", _
            OpenAfterPublish:=False
    End Sub

假设我有一个范围：

M6:M14

，我想在单元格“M1”中输入结果。启动宏后，我希望为每个值创建一个新的pdf。例如：对于M6的值为pdf，对于M7的值为另一个，依此类推，直到我达到M14

请尝试此代码

Sub SavePDF()

    Dim NameRange As Range
    Dim i As Integer
    Dim PdfName As String

    Set NameRange = Range("M6:M14")

    For i = 1 To NameRange.Cells.Count
        PdfName = Trim(Range("A8").Value) & i
        With Sheet3
            .Range("M1").Value = NameRange.Cells(i).Value
            .ExportAsFixedFormat _
             Type:=xlTypePDF, _
             Filename:="C:\Users\Report_" & PdfName & ".pdf", _
             OpenAfterPublish:=False
        End With
    Next i
End Sub

请尝试此代码

Sub SavePDF()

    Dim NameRange As Range
    Dim i As Integer
    Dim PdfName As String

    Set NameRange = Range("M6:M14")

    For i = 1 To NameRange.Cells.Count
        PdfName = Trim(Range("A8").Value) & i
        With Sheet3
            .Range("M1").Value = NameRange.Cells(i).Value
            .ExportAsFixedFormat _
             Type:=xlTypePDF, _
             Filename:="C:\Users\Report_" & PdfName & ".pdf", _
             OpenAfterPublish:=False
        End With
    Next i
End Sub

---

我没有恰当地解释自己。我希望这些值位于pdf文档中。对于这个范围内的每一个不同的值，我想制作一个新的pdf。这段代码工作得很好，但我得到的是pdf名称中的值，而不是里面的值。您的pdf是从所有Sheet3创建的。在创建PDF之前，任何要添加到PDF的内容都必须先转到Sheet3。为了修改Sheet3，您应该给出要修改的单元格以及要转到该单元格的数据。现在看来M6:M14包含了数据。但是在第三张纸上，你希望他们去哪里？请修改您的问题以包含所有这些信息。很抱歉我解释得不好。我想要从M6:M14到单元格“M1”的范围。创建第一个pdf后，第二个pdf将自动创建，并使用第二个值，依此类推。。我已经编辑了我的帖子。谢谢大家!@GMalc的问题是，我希望PDF有M6:M14的内容。第一个值M6应该在pdf中。对于M6:M14中的每一个值，我想创建一个不同的pdf。@AngelVelkov仍然不太清楚，但尝试将

Sheet3.ExportAsFixedFormat

修改为

Sheet3.Cells（i.value）。ExportAsFixedFormat

我没有正确解释自己。我希望这些值位于pdf文档中。对于这个范围内的每一个不同的值，我想制作一个新的pdf。这段代码工作得很好，但我得到的是pdf名称中的值，而不是里面的值。您的pdf是从所有Sheet3创建的。在创建PDF之前，任何要添加到PDF的内容都必须先转到Sheet3。为了修改Sheet3，您应该给出要修改的单元格以及要转到该单元格的数据。现在看来M6:M14包含了数据。但是在第三张纸上，你希望他们去哪里？请修改您的问题以包含所有这些信息。很抱歉我解释得不好。我想要从M6:M14到单元格“M1”的范围。创建第一个pdf后，第二个pdf将自动创建，并使用第二个值，依此类推。。我已经编辑了我的帖子。谢谢大家!@GMalc的问题是，我希望PDF有M6:M14的内容。第一个值M6应该在pdf中。对于M6:M14中的每一个值，我想创建一个不同的pdf。@AngelVelkov仍然不太清楚，但尝试将

Sheet3.ExportAsFixedFormat

修改为

Sheet3.Cells（i.value）。ExportAsFixedFormat

您仍然不清楚；将

范围（“M6:M14”）

中的值“插入”到

范围（“M1”）

，

串联

求和，

添加

，这是什么意思？“我想导出第一个pdf，其中M1的第一个值为”是什么意思？请澄清并举例说明你想做什么；将

范围（“M6:M14”）

中的值“插入”到

范围（“M1”）

，

串联

求和，

添加

，这是什么意思？“我想导出第一个pdf，其中M1的第一个值为”是什么意思？请澄清并举例说明你想做什么。