excel - 如何将工作表复制为图像并将其粘贴到特定单元格中?
问题描述
情况 - 我正在设计一种将信息从一个班次传递到另一个班次的方法。它需要足够严格以保持标准化,但又需要足够灵活,以便人们可以解释发生的无数情况。我的想法是,他们填写自己的工作表并点击保存按钮,将这些信息收集到显示所有区域的集中工作表中。
问题 - 我不知道如何保存工作表并将其放入组合传递中,而不会使组合传递看起来很糟糕。
尝试的解决方案 - 我认为让工作表(由员工填写)将自身保存为图像并粘贴到组合工作表中,但我无法让它自动调整单元格大小以适合图像。
理想的解决方案 - 使单元格大小自动适应图像。
我对如何以不同方式处理这个问题持开放态度。我对 excel 还很陌生,很可能不知道所有可用的选项。
当前代码:
Sub Save()
Worksheets("Leads").Range("A1:G14").CopyPicture
Worksheets("Combined").Activate
Worksheets("Combined").Paste
CenterMe ActiveSheet.Shapes(1), Range("C6:D6")
End Sub
解决方案
我想出了一种将图片粘贴到工作表中的方法。
我得到的最终代码是:
Sub Save()
Worksheets("Leads").Range("A1:G14").CopyPicture
Worksheets("Combined").Activate
Worksheets("Combined").Paste Destination:=Worksheets("Combined").Range("C6:D6")
'So the image will be pasted at the destination range given
'You may also add a cell address instead of cell range
End Sub
来源 - https://docs.microsoft.com/en-us/office/vba/api/excel.worksheet.paste
希望这可以帮助 !
推荐阅读
- join - Log Analytics - 是否可以将行合并为同一列 ID 上的单行
- c - 如何将枚举变量分配给数组索引的指针
- jquery - JQUERY 嵌套元素选择器/元素
- c - 不知道如何实现指向 char 指针数组的指针
- azure - Azure Function BlobContainer.ListBlob 在 Portal CScript 中可用,在 VS C# 中不可用
- image - Android 和 iOS 之间的 Xamarin Forms 图像不匹配
- sql - 在 2 列的条件下从 sql server 中删除重复值
- amazon-web-services - Spark - “spark.deploy.spreadOut = false”可以在 S3 上提供性能优势
- python - 加快熊猫循环计数器
- html - FireFox 中的 SVG 渲染不准确