excel 如何使用PATH将照片上传到用户表单并在其他计算机上显示?

xytpbqjk  于 2023-08-08  发布在  其他
关注(0)|答案(1)|浏览(73)

我构建了一个用户表单,其中有一个后选择配置,根据选择显示图像和文本结果。
我上传的图片从一个细胞的图像路径是写到一个图片框。

Image1.Picture = LoadPicture (Sheets ("XXX"). Cells (34, 5))

字符串
我有两个问题:
1.图像上下颠倒加载。我试着找一个ROTATE命令,试着把图像提前180度放在一个文件夹里,甚至试着把它直接一个一个上传到图片框里也是同样的问题。如何让它旋转180度?
1.我把文件发送给我的同事,他们能够打开用户表单,但当他们点击显示按钮时,发生了一个错误,说没有找到PATH。我想这是因为图像只在我电脑上的一个文件夹中。如何将其放在共享文件夹中并使PATH与每个人相关(假设每台计算机都有不同的USER)?

lztngnrs

lztngnrs1#

关于你的第一个问题,有一种用vba代码旋转图像的方法,但是提前旋转图像可能更容易,这样图像就能正确显示。请参阅this post了解更多信息。
你的第二个问题可以通过多种方式解决,你可以在工作簿中包含图像并从那里加载它,但如果你不喜欢这样,你可以动态指定路径。当然,在这种情况下,您还必须向您的同事提供图像文件。如果图像存储在与excel文件相同的文件夹中,则可以使用

Application.ActiveWorkbook.Path

字符串
以动态地找到Excel文件的路径,该路径随后也将是图像的路径。您也可以将图像存储在excel文件夹的子文件夹中,并像这样创建该路径:

path=Application.ActiveWorkbook.Path & "\subfoldername"

相关问题