由于使用了放大镜脚本,我需要在文章中加载完整大小的图像,即使客户选择像大,中......这样的缩略图大小......
我的意思是不是后缩略图,我的意思是嵌入帖子本身的图像。因此,与the_post_thumnail
相关的任何函数都没有那么有用我想...... :-)
示例...应生成此代码:
<img src="..../uploads/image.png" width="300" height="500" />
而不是
<img src="..../uploads/image-300x500.png" width="300" height="500" />
对此有什么好主意的人?谢谢!
答案 0 :(得分:0)
您可以使用Sub DigitBlocks()
Dim rng As Range, a As Double, b As Double, c As Double, d As Double, e As Double
Set rng = ActiveSheet.Range("A2").CurrentRegion
a = Val(Right(Left(rng.Address, InStr(rng.Address, ":") - 1), Len(Left(rng.Address, InStr(rng.Address, ":") - 1)) - InStrRev(Left(rng.Address, InStr(rng.Address, ":") - 1), "$"))) + 1
b = 3
For d = a To rng.Rows.Count
Range("M" & b).Value = Range("J" & d).Value
e = Range("K" & d).Value
For c = 1 To e
Range("N" & b + c - 1).Value = c
Next c
b = b + c
Next d
End Sub
过滤器并提供由您构建的标记,您可以在其中显示完整图像,如下面的代码所示:
image_send_to_editor