Можно ли вводить даты из выпадающего календаря?

1170
Hany

В Excel 2003 можно ли вводить даты в ячейку из раскрывающегося календаря, а не вводить их вручную?

1
Что тебе сказали твои исследования? Поиск «раскрывающийся календарь Excel 2003» дает [Добавление раскрывающегося списка календаря в Excel 2003] (http://answers.microsoft.com/en-us/office/forum/office_2003-excel/adding-a-calendar -drop-down-box-to-excel-2003 / 3bb460b6-c966-471a-ace3-49c1a9343b14) в качестве первой ссылки. Пожалуйста, прочитайте [Как мне задать хороший вопрос?] (Http://superuser.com/help/how-to-ask). DavidPostill 8 лет назад 1
Большое спасибо Ясс, ваша ссылка ответила на мой вопрос. Hany 8 лет назад 0
Ответ добавлен ... DavidPostill 8 лет назад 1

2 ответа на вопрос

2
miroxlav

There is number of ways:

  • adding form field with dropdown calendar can be more comfortable, but suitable for limited cell count made manually.

    1. enable Developer tab in Excel
    2. select Insert > others (bottom-right icon) > Microsoft Date and Time Picker Control 6.0
    3. place the control on your sheet
    4. using Developer tab, display property sheet of the control
    5. set LinkedCell property to your cell
    6. using Developer tab, switch off Design Mode

  • adding universal date/time dropdown picker can be slightly less intuitive to use, but you do not need any further special handling of date cells

    • you can either get that addin (well, for you need to find something like that) or create your own with similar functionality (needs experience with software development). The way goes through Excel add-ins.
Спасибо, Мирокслав. К сожалению, в Excel 2003 нет вкладки «Разработчик» и не поддерживается универсальный инструмент выбора. Но ссылка в комментарии Ясса ответила на мой вопрос. Hany 8 лет назад 0
0
DavidPostill

Можно ли вводить даты в ячейку из выпадающего календаря?

Используйте следующее для Excel 2003.

Добавление раскрывающегося списка календаря в Excel 2003

  1. Вставьте> Объект, прокрутите вниз и нажмите «Управление календарем Microsoft».

  2. Щелкните правой кнопкой мыши вкладку листа и просмотрите код.

  3. Вставьте следующий код: 

    Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Cells.Count > 1 Then Exit Sub 'Change this to your range of dates If Not Intersect(Target, Range("A1:A100")) Is Nothing Then Calendar1.Top = Target.Top + Target.Height Calendar1.Left = Target.Left + Target.Width / 2 - Calendar1.Width / 2 Calendar1.Visible = True Calendar1.Value = Now ElseIf Calendar1.Visible Then Calendar1.Visible = False End If End Sub Private Sub Calendar1_Click() ActiveCell.Value = (Calendar1.Value) ActiveCell.NumberFormat = "dd mmm yy" End Sub

    Обратите внимание, что в коде диапазон дат установлен как A1: A100, сохраните синтаксис и измените его в соответствии с требованиями.

  4. Закройте редактор VB.

  5. Выйти из режима дизайна.

Когда вы нажимаете в a1: A100, вы получаете календарь, который по умолчанию соответствует сегодняшней дате.

Нажмите на дату, и она будет введена в активную ячейку.

Источник Добавление раскрывающегося списка календаря в Excel 2003

Похожие вопросы