标题:如何提取图形作为模板
只看楼主
syaoraney
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2022-12-27
 问题点数:0 回复次数:2 
如何提取图形作为模板
新建 Microsoft Excel 工作表.zip (12.51 KB)


各位大神,
如何通过插件,提取c列的模板,然后得到F列的结果?
感谢
搜索更多相关主题的帖子: 结果 图形 模板 提取 插件 
2022-12-27 22:27
woolley
Rank: 1
等 级:新手上路
威 望:1
帖 子:14
专家分:0
注 册:2004-11-25
得分:0 
没明白,是要将A列的内容加个文本框,放到F列吗?
2023-01-31 16:53
woolley
Rank: 1
等 级:新手上路
威 望:1
帖 子:14
专家分:0
注 册:2004-11-25
得分:0 
试试这个代码
Sub Macro1()
    Dim i As Integer
    Dim t As Worksheet
    Dim myshape As Shape
    Set t = ActiveSheet
    t.Shapes(1).Select
    Selection.Copy
    For i = 2 To 4
        Cells(i, 6).Select
        ActiveSheet.Paste
        Set myshape = t.Shapes(i)
        myshape.Select
        Selection.Characters.Text = Cells(i, 1)
    Next i
End Sub
2023-02-01 10:23



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-511014-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.179281 second(s), 11 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved