Question

是否可以将磁盘中的图像用作可打印的Excel电子表格背景，而不会覆盖单元格？我想在工作表上嵌入文档的剪辑图像，在图像顶部的特定单元格中添加文本和计算，并能够将其与单元格中的值一起打印。

我使用了以下代码，但它没有将图像作为背景。即使透明度是35％，图像也会褪色，单元格中的值也是如此。

Worksheets("tool").Range("A1").Select
ActiveSheet.Shapes.AddShape(msoShapeRectangle, 0, 0, 432, 435).Select

With Selection.ShapeRange.Fill
    .Visible = msoTrue
    .UserPicture "Z:\Capture.JPG"
    .Transparency = 0.35
    .TextureTile = msoFalse
    .TextureHorizontalScale = 1
    .TextureVerticalScale = 1
    .TextureAlignment = msoTextureTopLeft
End With

有没有更好的方法来满足我的需求？

非常感谢！

Answer 1

以下将图像放在屏幕上，没有透明度/淡入淡出等。

Worksheets("tool").SetBackgroundPicture Filename:= "Z:\Capture.JPG"

这会将图像添加为文档标题的一部分，因此会打印。

With Worksheets("tool").PageSetup
    .LeftHeaderPicture.Filename = "Z:\Capture.JPG"
    .LeftHeader = "&G"
End With

您始终可以使用绘图程序编辑图像以模仿淡入淡出/透明度。

是否可以使用可打印图像作为电子表格背景

1 个答案: