麻辣家族討論版版 » Excel程式區 » 為何日期按了結算相同時間無法標註

返回列表下一主題上一主題發帖

為何日期按了結算相同時間無法標註

中學生 Rank: 2

帖子: 164
主題: 45
精華: 0
積分: 211
點名: 0
作業系統: 微軟
軟體版本: win10
閱讀權限: 20
性別: 女
註冊時間: 2017-8-28
最後登錄: 2022-8-5

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2018-2-5 11:31 | 只看該作者

為何日期按了結算相同時間無法標註

年假結算提醒.zip (26.84 KB)

樓主熱帖

收藏

yvonne

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

2^#

發表於 2018-2-5 13:16 | 只看該作者

回復 1# afu9240
了解看看

Sub test20180205()
Dim bb As String, i As Integer
bb = Cells(1, 13).Text
For i = 1 To 200
Debug.Print Cells(1, 13), Cells(1, 13).Text, Cells(i, 9)
Debug.Print TypeName(Cells(i, 9)), TypeName(Cells(i, 9).Text)
If Cells(i, 9) = bb Then Cells(i, 9).Interior.Color = vbGreen
Next
End Sub

複製代碼

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

中學生 Rank: 2

帖子: 164
主題: 45
精華: 0
積分: 211
點名: 0
作業系統: 微軟
軟體版本: win10
閱讀權限: 20
性別: 女
註冊時間: 2017-8-28
最後登錄: 2022-8-5

3^#

發表於 2018-2-5 13:22 | 只看該作者

回復 2# GBKEE

感謝G大幫忙!感激不盡
      想跟G大請教,這兩段Code的意思是在說明什麻呢??

         Debug.Print Cells(1, 13), Cells(1, 13).Text, Cells(i, 9)
         Debug.Print TypeName(Cells(i, 9)), TypeName(Cells(i, 9).Text)

yvonne

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

4^#

發表於 2018-2-5 13:35 | 只看該作者

本帖最後由 GBKEE 於 2018-2-5 13:36 編輯

回復 3# afu9240

可查看數值哪裡錯了

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

中學生 Rank: 2

帖子: 164
主題: 45
精華: 0
積分: 211
點名: 0
作業系統: 微軟
軟體版本: win10
閱讀權限: 20
性別: 女
註冊時間: 2017-8-28
最後登錄: 2022-8-5

5^#

發表於 2018-2-7 17:15 | 只看該作者

回復 4# GBKEE

G大不好意思
想跟你請教為何 SpinButton1.Value與表單號碼與實際內容會不一樣??,,,,另外像請教有辦法同一個單號的資料同時出現在TEXTBOX裡嗎???

各項付款申請單.zip (965.86 KB)

yvonne

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

6^#

發表於 2018-2-7 18:38 | 只看該作者

回復 5# afu9240

Option Explicit
Private Sub UserForm_Initialize()
Spinbutton
End Sub
Private Sub Spinbutton() '設定最大值最小值
With SpinButton1
.Max = Sheets("清單").Range("a" & Rows.Count).End(xlUp).Row
.Min = 2
.Enabled = .Max > 1 '1=沒有資料
End With
End Sub
Private Sub SpinButton1_Change()
Dim xx As Integer
xx = SpinButton1
Label51.Caption = xx - 1
TextBox87.Text = Sheets("清單").Cells(xx, 1)
ComboBox21.Value = Sheets("清單").Cells(xx, 2)
TextBox85.Text = Sheets("清單").Cells(xx, 3)
TextBox86.Text = Sheets("清單").Cells(xx, 4)
TextBox53.Text = Sheets("清單").Cells(xx, 5)
TextBox59.Text = Sheets("清單").Cells(xx, 6)
TextBox79.Text = Sheets("清單").Cells(xx, 7)
ComboBox27.Value = Sheets("清單").Cells(xx, 8)
TextBox71.Text = Sheets("清單").Cells(xx, 9)
End Sub

複製代碼

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

中學生 Rank: 2

帖子: 164
主題: 45
精華: 0
積分: 211
點名: 0
作業系統: 微軟
軟體版本: win10
閱讀權限: 20
性別: 女
註冊時間: 2017-8-28
最後登錄: 2022-8-5

7^#

發表於 2018-2-8 09:54 | 只看該作者

回復 6# GBKEE

G大感謝您的協助,長知識~
另外請教G大, 有辦法同一個單號的購買物品統一顯示在表單上嗎??

yvonne

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

8^#

發表於 2018-2-8 14:47 | 只看該作者

回復 7# afu9240
你這表單的[資料瀏覽]頁瀏覽後有要修改資料嗎?

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

中學生 Rank: 2

帖子: 164
主題: 45
精華: 0
積分: 211
點名: 0
作業系統: 微軟
軟體版本: win10
閱讀權限: 20
性別: 女
註冊時間: 2017-8-28
最後登錄: 2022-8-5

9^#

發表於 2018-2-8 16:16 | 只看該作者

回復 8# GBKEE

要修改~~^^

yvonne

中學生 Rank: 2

帖子: 164
主題: 45
精華: 0
積分: 211
點名: 0
作業系統: 微軟
軟體版本: win10
閱讀權限: 20
性別: 女
註冊時間: 2017-8-28
最後登錄: 2022-8-5

10^#

發表於 2018-2-9 11:44 | 只看該作者

回復 9# afu9240

G大您好

我最主要就是希望在瀏覽時能將同一樣表單號碼的資料帶進表單內,我試過好像不行,好像無法連接表單號碼同時SHOW出,所以想求助G大,
[attach]28350[/attach]

附上檔案內容~~

各項付款申請單.zip (1008.45 KB)

yvonne

靜思自在 : 【生命在呼吸間】佛陀說：「生命在呼吸間。」人無法管住自己的生命，更無法擋住死期，讓自己永住人間。既然生命去來這麼無常，我們更應該好好地愛惜它、利用它、充實它，讓這無常、寶貴的生命，散發它真善美的光輝，映照出生命真正的價值。

返回列表下一主題上一主題