　暱稱: VBA向前衝

帖子: 559
主題: 58
精華: 0
積分: 626
點名: 0
作業系統: win8
軟體版本: office2013
閱讀權限: 50
性別: 男
來自: TW
註冊時間: 2010-11-22
最後登錄: 2024-6-14

1^# 跳轉到 » 正序看帖

打印

字體大小: tT

發表於 2012-4-6 10:31 | 只看該作者

[發問] 核取方塊 (能否設定框框大小)

本帖最後由 hugh0620 於 2012-4-6 11:03 編輯

Dear 大大
如圖中問題,是否有解呢,請大大指導一下

另外延伸一個問題,框框中只能打勾嘛?? 還是說可以整個填滿塗黑

樓主熱帖

學習才能提升自己

蝕光迴狼

　暱稱: 蝕光迴狼

中學生 Rank: 2

帖子: 75
主題: 6
精華: 0
積分: 83
點名: 0
作業系統: XP
軟體版本: Office 2003
閱讀權限: 20
性別: 男
來自: 臺灣
註冊時間: 2014-9-22
最後登錄: 2015-3-7

論壇榮譽勳章論壇贊助勳章

23^#

發表於 2014-10-7 23:47 | 只看該作者

使用【文字方塊】也可以達到此效果
寫入以下程式碼即可

Private Sub TextBox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If TextBox1.Text = "V" Then
TextBox1.Text = ""
Else
TextBox1.Text = "V"
End If
End Sub

複製代碼

我很笨,所以我很用心
　我學藝不精,但我渴求知識

TOP

sery356

小學生 Rank: 1

帖子: 1
主題: 0
精華: 0
積分: 1
點名: 0
作業系統: win7
軟體版本: 64
閱讀權限: 10
註冊時間: 2014-2-23
最後登錄: 2014-2-23

22^#

發表於 2014-2-23 18:21 | 只看該作者

這個是用巨集完成的嗎?

TOP

sheng6255

小學生 Rank: 1

帖子: 1
主題: 0
精華: 0
積分: 1
點名: 0
作業系統: WINDOWS
軟體版本: XP
閱讀權限: 10
註冊時間: 2014-2-21
最後登錄: 2014-2-21

21^#

發表於 2014-2-21 15:00 | 只看該作者

大師,小的也需要這個檔案可否寄給我呢?

TOP

kai6929

中學生 Rank: 2

帖子: 84
主題: 24
精華: 0
積分: 118
點名: 0
作業系統: xp
軟體版本: offcie 2007
閱讀權限: 20
註冊時間: 2010-5-6
最後登錄: 2024-2-17

20^#

發表於 2012-10-9 10:17 | 只看該作者

各位大師真棒!
                        請教一下巨集產生的核取方塊,能讓的儲存格對應嗎?
                        如:  按未選取 B10:=TRUE或 FALSE
                        或者如:  按未選取 B11:=1或 0
                                                                                                   請教一下巨集如何設定

TOP

kai6929

中學生 Rank: 2

帖子: 84
主題: 24
精華: 0
積分: 118
點名: 0
作業系統: xp
軟體版本: offcie 2007
閱讀權限: 20
註冊時間: 2010-5-6
最後登錄: 2024-2-17

19^#

發表於 2012-10-9 10:17 | 只看該作者

各位大師真棒!
                        請教一下巨集產生的核取方塊,能讓的儲存格對應嗎?
                        如:  按未選取 B10:=TRUE或 FALSE
                        或者如:  按未選取 B11:=1或 0

TOP

kai6929