VBA設置對象格式?jīng)]有控件屬性
設置對象格式中找不到控件，是什么問題呀,，各位大神![VBA設置對象格式?jīng)]有控件屬性](http://img.biancha.cn/upload/2word/wk3dvrgqwjy.png)
代碼及注釋如下:Sub main()Dim Sh1(1 To 100) As String‘定義數(shù)組,，用于存放shape名Dim sh As ShapeDim i As IntegerWith Worksheets("Sheet6")For Each sh In .Shapes'遍歷所有的Shape對象If Not ***.intersect(***.topleftcell, .Range("A1:J20")) Is Nothing Then'Shape對象如何不在A1:J20區(qū)域中i = i + 1'累加數(shù)量Sh1(i) = ***.Name'將Shape名依次存放在數(shù)組Sh1中End IfNext shEnd Withactivesheet.***.range(Sh1).Select，選中Sh1中存放的ShapeEnd Sub追答：選中你要進行操作嗎,？說一下,，下一步做什么呢！追答：可以一個個移啥,，都移相同的距離,，如果一定要全部選中，吃個飯回來寫,。
相關推薦
便查問答是一款實用的網(wǎng)絡熱門知識問答平臺,，專注于分享你不知道的知識、經(jīng)驗及生活問題,，在這里所有人都能找到答案歡迎網(wǎng)友參與討論,。