excel - 将 Excel 工作表另存为 PDF,同时每次刷新信息
问题描述
我是 VBA 的新手,我需要创建一个宏来从 Excel 工作表生成和保存 PDF。
我有一个输出表,它根据在我的 D2 单元格中输入的数字从其他表中提取信息。(每个数字都与一组信息相关,大约有 500 组,所以我需要 500 个 PDF)。
我需要构建一个每次都重复这些步骤的宏:
- 在我的 D2 单元格中输入列表中的数字(以便刷新信息)
- 将输出表另存为 PDF,用我的 D2 单元格中的数字命名文件
- 对列表中的每个数字重复该过程
我已经看到了一些构建宏以将工作表保存为 PDF 的代码,但我正在努力使用代码来迭代该过程数百次。
有没有人从事过类似的工作或有任何想法?太感谢了!
解决方案
这已经是一个开始:
Dim pdf_number As Range
For Each pdf_number In Sheets("your_sheet").Range("range_with_your_pdf_numbers")
'change value in D2 based on your number
Sheets("output").Range("D2") = pdf_number.Value
'This should refresh your output sheet
Application.Calculate
'... Your code to save you pdf ...
Next
基本上,这将通过一系列数字(......您应该在某处定义,例如在另一张纸中 - 我错过了知道这些数字在哪里/是否有这些数字的信息),并为其中的每一个更新单元格 D2数字。然后,您可以在此循环中执行您想要的操作,例如将其保存为 pdf。您还可以使用“pdf_number.Value”来生成您的 pdf 文件名。
推荐阅读
- javascript - JavaScript form (ajax submission) with validation doing something funky
- python - 我有多个列表,我想按最新的进行过滤
- c - 在结构 C 中锁定 pthread_mutex_t
- javascript - 改变请求动画帧的速度
- mysql - MySQL在列上创建具有条件的表
- python - 如何发送一个固定大小(10 个字节)的 HEADER,它指示要发送和接收的消息的大小(使用 Python 和 pickle)
- python - IOError:[Errno 13] 打开文件时权限被拒绝
- amazon-s3 - 将视频实时流保存到 Amazon S3
- c++ - 从另一个 cpp 文件引用私有向量
- r - 如何获得R中日期间隔的重叠值