精品丰满熟女一区二区三区_五月天亚洲欧美综合网_亚洲青青青在线观看_国产一区二区精选

  • <menu id="29e66"></menu>

    <bdo id="29e66"><mark id="29e66"><legend id="29e66"></legend></mark></bdo>

  • <pre id="29e66"><tt id="29e66"><rt id="29e66"></rt></tt></pre>

      <label id="29e66"></label><address id="29e66"><mark id="29e66"><strike id="29e66"></strike></mark></address>
      學(xué)習(xí)啦 > 學(xué)習(xí)電腦 > 工具軟件 > 辦公軟件學(xué)習(xí) > Excel教程 > Excel2007教程 > excel2007插入日期選擇器的教程

      excel2007插入日期選擇器的教程

      時(shí)間: 業(yè)華773 分享

      excel2007插入日期選擇器的教程

        Excel中經(jīng)常需要使用到日期選擇器為用戶提供選日期的便捷,插入日期選擇器具體該如何操作呢?下面是由學(xué)習(xí)啦小編分享的excel2007插入日期選擇器的教程,以供大家閱讀和學(xué)習(xí)。

        excel2007插入日期選擇器的教程

        插入日期選擇器步驟1:在某一單元格中插入日歷控件

        插入日期選擇器步驟2:選中要插入日歷控件的單元格,設(shè)置單元格格式為日期型;

        插入日期選擇器步驟3:點(diǎn)擊工具欄,“插入—對(duì)象—日歷控件”,

        插入日期選擇器步驟4:用快捷方式Alt+F11,雙擊插入控件的工作表名稱,粘貼下面的代碼,用來實(shí)現(xiàn)單擊A1時(shí)彈出日歷控件,單擊日歷控件后,將選中的日期值填入A1并隱藏控件。

        Private Sub Calendar1_Click()

        ActiveCell = Calendar1

        Calendar1.Visible = False

        [a2].Select

        End Sub

        Private Sub Worksheet_SelectionChange(ByVal Target As Range)

        If Target.Address = "$A class="main">

      excel2007插入日期選擇器的教程

      時(shí)間: 業(yè)華773 分享

        End Sub


      excel2007插入日期選擇器的教程圖1

        有關(guān)其他版本插入日期選擇器的教程:

        插入日期選擇器步驟1:在開發(fā)工具欄選擇插入-其他控件,打開其他控件選擇框。


      excel2007插入日期選擇器的教程圖2

        插入日期選擇器步驟2:在選擇框中選擇calendar control8.0,確定。


      excel2007插入日期選擇器的教程圖3

        插入日期選擇器步驟3:在適當(dāng)?shù)奈恢美L制日歷,并將高度和寬度適當(dāng)調(diào)整。這時(shí)的日歷控件還比較原始,不會(huì)點(diǎn)擊日期后自動(dòng)隱藏日歷并在單元格內(nèi)填入日期,這時(shí)就需要添加自己的代碼。


      excel2007插入日期選擇器的教程圖4

        插入日期選擇器步驟4:在設(shè)計(jì)模式下雙擊日歷。

        點(diǎn)擊設(shè)計(jì)模式,當(dāng)圖表顏色變深后就是設(shè)計(jì)模式,打開代碼編輯器。

        在光標(biāo)處輸入下方的代碼:

        ActiveCell = Calendar1.Value Me.Calendar1.Visible = FalseEnd Sub

        Private Sub Worksheet_SelectionChange(ByVal Target As Range)

        If Target.Column = 1 Or Target.Column = 2 Then

        '此處的1和2為你要顯示日歷的列序號(hào)

        Me.Calendar1.Left = Target.Left Me.Calendar1.Top = Target.To If Target.Value <> "" Then Me.Calendar1.Value = Target.Value Else Me.Calendar1.Value = Now( End I Me.Calendar1.Visible = TruElse Me.Calendar1.Visible = FalseEnd If


      excel2007插入日期選擇器的教程圖5

        插入日期選擇器步驟5:關(guān)閉代碼編輯器,將EXCEL保存為啟用宏的工作薄。


      excel2007插入日期選擇器的教程圖6

        插入日期選擇器步驟6:再次打開該工作薄,點(diǎn)擊第一列或者第二列,就可以彈出日歷選擇器,選擇日期后,在單元格內(nèi)會(huì)插入日期,日歷選擇器消失。注意這是在非編輯模式下才可以實(shí)現(xiàn)的。


      excel2007插入日期選擇器的教程圖7

        插入日期選擇器步驟7:EXCEL除了這個(gè)日歷控件外還有一個(gè)另一個(gè)比較簡(jiǎn)單的日歷選擇器Microsoft date and time picker control(SP6)。


      excel2007插入日期選擇器的教程圖8

        插入日期選擇器步驟8:插入該控件后,在非設(shè)計(jì)模式下即可點(diǎn)擊彈出日期選擇界面。如下:


      excel2007插入日期選擇器的教程圖9

      845855