我在{strong> Amazon S3 上使用Carrierwave
和carrierwave-base64
进行文件上传。
如果上传的文件超过xMB
,我该如何压缩它们。文件采用jpeg,png和jpg格式作为图像。
答案 0 :(得分:1)
我认为你可以使用Sub DoIt()
Dim Rng As Range, C As Range
Set Rng = Columns("K:K").SpecialCells(xlCellTypeConstants, 23)
Columns("K:K").SpecialCells(xlCellTypeBlanks).EntireRow.Interior.Color = xlNone
For Each C In Rng.Cells
If C.Offset(, -7) = C Then
Range(Cells(C.Row, "K"), Cells(C.Row, "D")).Interior.Color = vbYellow
Else: Range(Cells(C.Row, "K"), Cells(C.Row, "D")).Interior.Color = xlNone
End If
Next C
End Sub
钩子。例如:
before :store