我希望能够允许用户上传图片。使用GD库,我将为一个图库创建/存储三个不同大小的图像,并展示产品。问题是为上传了不同大小的图片的人缩放尺寸。例如,一张4000 x 3000的图片可以缩放到我想要的240 x 180,但是我注意到有些用户的图片尺寸不同,比如3008 x 2000和3837 x 2551。
有没有人可以指导我如何处理这些不同的图像尺寸,以便将它们缩放到一个共同的大小。
我有一个VBA脚本,它将获取图片并将它们粘贴到Excel中的特定单元格中,这取决于其他单元格的值。
Public Function PictureLookup(Value As String, Location As Range, Index As Integer)
Application.Volatile
Dim lookupPicture As Shape
Dim sheetName As String
Dim picTop As Double
Dim picLeft As Double
sheetName = Location.Parent.Name
'Delete cu