[已解决]EXCEL,VBA控件图片相关,求高手们的热心帮助,谢谢!

chulia_wong

EXCEL,VBA控件图片相关,求高手们的热心帮助,谢谢!

最佳答案

月排行榜 / 总排行榜

爱疯

2016-6-10 21:27

要求副本2.rar (40.45 KB, 下载次数: 17)

2016-6-10 21:26 上传

点击文件名下载附件





Private Sub CommandButton1_Click()
    With Me.CommandButton1
        If .Caption = "显示" Then
            .Caption = "隐藏"
            Me.Shapes(1).Visible = msoTrue
        Else
            .Caption = "显示"
            Me.Shapes(1).Visible = msoFalse
        End If
    End With
End Sub


最好还是用8楼的1）

跳转到最佳答案楼层

JX_shangrila

又是彩票？

爱疯

为什么不直接查看sheet1？

chulia_wong

JX_shangrila 发表于 2016-6-10 19:33
又是彩票？

就是这样！请问怎么做的呀？

chulia_wong

爱疯 发表于 2016-6-10 19:54
为什么不直接查看sheet1？

为了直观的把它们聚集到一起去，而一个sheet面积有限！里面放了其它板块！

爱疯

chulia_wong 发表于 2016-6-10 20:19
为了直观的把它们聚集到一起去，而一个sheet面积有限！里面放了其它板块！

它们，是指像sheet1的a1:o14吗？还有哪些

chulia_wong

爱疯 发表于 2016-6-10 20:33
它们，是指像sheet1的a1:o14吗？还有哪些

就是指sheet1的那个区域，没有其它了！

爱疯

1）最好或者说更规范的方式是，sheet1只放a1:o14这一方面的数据。

2）如果一定要让a1:o14和其它方面的数据，混在sheet1里。
   那么在sheet2表用照相机，照下a1:o14，可以吗？

chulia_wong

爱疯 发表于 2016-6-10 21:06
1）最好或者说更规范的方式是，sheet1只放a1:o14这一方面的数据。

2）如果一定要让a1:o14和其它方面的数 ...

可以呀。只是不知道像机可以隐藏不

爱疯

要求副本2.rar (40.45 KB, 下载次数: 17)

2016-6-10 21:26 上传

点击文件名下载附件





Private Sub CommandButton1_Click()
    With Me.CommandButton1
        If .Caption = "显示" Then
            .Caption = "隐藏"
            Me.Shapes(1).Visible = msoTrue
        Else
            .Caption = "显示"
            Me.Shapes(1).Visible = msoFalse
        End If
    End With
End Sub


最好还是用8楼的1）