係統粉 > 電腦問答 > 其他問答

已解決請問在EXCEL 中插入N個小長方形,每個長方形裏麵都有不同編號

提問者:smile_smirk  |  瀏覽次  |  提問時間:2017-10-06  |  回答數量:3

請問在EXCEL 中插入N個小長方形,每個長方形裏麵都有編號,怎樣弄,因為數量有些多,不想一個一個去改,麻煩大神幫忙請問在EXCEL中插入N個小長方形,每個長方形裏麵都有不同編號(圖1)

已有3條答案
願得一人心yz

願得一人心yz

回答數:114  |  被采納數:42

用VBA可以做到,示例如下請問在EXCEL 中插入N個小長方形,每個長方形裏麵都有不同編號(1)代碼如下Sub 批量插入圖形並填充文本文本()For i = 1 To 21 ActiveSheet.Shapes.AddShape(msoShapeRectangle, _ Cells(2, (21 - i + 1) * 2).Left, _ Cells(2, (21 - i + 1) * 2).Top, _ Cells(2, (21 - i + 1) * 2).Width, _ Cells(2, (21 - i + 1) * 2).Height).Select Selection.ShapeRange(1).TextFrame2.TextRange.Characters.Text = _ i & "#" & vbCr & "注" & vbCr & "塑" & vbCr & "機" With Selection.ShapeRange(1).TextFrame2.TextRange.Characters(1, 3). _ ParagraphFormat .FirstLineIndent = 0 .Alignment = msoAlignLeft End WithNext iEnd Sub
可按需修改
2017-10-06 11:05:42
讚 11
丿半角灬憂傷丶

丿半角灬憂傷丶

回答數:67  |  被采納數:12

這個問題的解決就需要VBAA代碼。
2017-10-06 11:21:58
讚 6
神騎誓

神騎誓

回答數:64  |  被采納數:72

這個並不是excel格式裏麵的公式了,所以沒有辦法列公式。唯一的快捷方式就是,用表格先拉好1.2.3.4.5……然後,你把小長方形插入,改成底色透明度,大約40%。用excel的格式。如圖:
2017-10-06 11:18:48
讚 6
相關問答
最新其他問答
解決方法