ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ½Ð°ÝExcel¤u§@ªí¤¤ªº¹Ï¤ùµô¤Á

³o¬O§RÑH¤ùªº¤W¤è¡A¦pªG­n§R¥ªÃä©Î¥kÃä¡A­n«ç¼Ë§@©O¡H
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

TOP

­ì¨Ó¥i¥H³o·dªº
¤Ó¼¡Á¤F¡K


    Sub test()
For Each Z In ActiveSheet.Shapes
With Z.PictureFormat
.CropTop = .CropTop + Z.Height * 0.2
End With
Next
End Sub


    Sub test()
For Each Z In ActiveSheet.Shapes
With Z.PictureFormat
.CropRight = .GropRight + Z.Height * 0.2
End With
Next
End Sub


    Sub test()
For Each Z In ActiveSheet.Shapes
With Z.PictureFormat
.CropLeft = .CropLeft + Z.Height * 0.2
End With
Next
End Sub
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

TOP

        ÀR«ä¦Û¦b : ¤Ñ¤W³Ì¬ü¬O¬P¬P¡A¤H¥Í³Ì¬ü¬O·Å±¡¡C
ªð¦^¦Cªí ¤W¤@¥DÃD