Bentuk VBA transparan

ActiveSheet.Shapes(1).Fill.Visible = msoFalse
VasteMonde