Как в excel поставить двоеточие

При частом вводе данных в формате времени (2:30), необходимость ввода двоеточия «:» серьезно снижает скорость работы. Возникает вопрос: Можно ли обойтись без ввода двоеточия?

В EXCEL при вводе данных в формате времени есть возможность избежать ввода двоеточия.

Изменяем формат ячейки

Пример Пусть нам требуется вводить часы и минуты каких-нибудь событий.

• Выделите ячейку А1 .
• Отобразите вкладку Число окна Формат ячеек ( Главная/ Число/ Формат ячеек или нажав CTRL+1 выберите вкладку Число).
• В списке Числовые форматы выберите Все форматы.
• В поле Тип введите #»:»00 или 00″:»00 (в чем разница будет показано ниже)
• Нажмите ОК .

Теперь можно вводить время, используя только числа. Введем в A1 число 230 и в ячейке увидим значение 02:30, если был установлен формат 00″:»00 и 2:30, если формат #»:»00. Для 4-х значных чисел оба формата дадут одинаковый результат.

Необходимо учитывать, что ячейка не содержит значение в формате времени, она содержит число 230. В этом можно убедиться, посмотрев на Строку формул – в ней отображается 230, а не 2:30. Изменив формат ячейки на пользовательский , мы изменили лишь формат отображения значения. 

Если со значениями времени не нужно выполнять никаких действий, то задачу можно считать выполненной. Но если значения нужны для расчетов, то нужно разобраться, что делает EXCEL при вводе в ячейку значения с двоеточием, т.е. после нажатия клавиши ENTER .

Преобразование в формат времени

EXCEL интерпретирует введенное значение 2:30 (т.е. «2 двоеточие 30»), как время, т.е. устанавливает Формат ячейки Время, затем вводит в ячейку число 0,104167 (но в Строке Формул отображается 2:30:00. Если изменить формат ячейки на Число , то увидим 0,104167). Откуда взялось это число 0,104167? В форматах Время и Дата принято, что одним суткам соответствует число единица. Соответственно, один час в формате даты это 1/24 (т.к. в сутках 24 часа), а одна минута – 1/(24*60)=1/1440. Число 0,104167 из 2:30 получается так: 2 часа/24 + 30 минут/1440.

Для тех, кто не хочет возиться с двоеточием и кому нужны значения в формате Времени — алгоритм такой (см. файл примера ):

• в ячейку А1 вводим дату без двоеточия, в виде числа, например 230;
• устанавливаем пользовательский формат времени 00″:»00 (если необходимо);
• в любой другой ячейке, например В1 , пишем формулу =(ЦЕЛОЕ(A1/100)/24)+ ((A1-(ЦЕЛОЕ(A1/100)*100))/1440) (получаем 0,104167);
• меняем формат ячейки В1 на Время и получаем полноценное время – 2:30. С этим значением можно производить вычисления в формате ВРЕМЯ.

В файле примера также показано как ускорить ввод в формате чч:мм:сс (обязательно должны быть указаны часы, т.е. число должно быть >10000, т.е. 1:00:00).

Там же, «по просьбе телезрителей», показано как преобразовать любое число от 1 до 235959 в формат чч:мм:сс. Причем можно указывать только секунды, минуты и секунды, ну и конечно часы, минуты и секунды.

Еще задача: Если пользователь захотел сохранить значение времени 5 часов 23 минуты в числовом формате 5,23, т.е. часы в целой части числа, а минуты в дробной после запятой, то формула для перевода в стандратный формат времени следующая:

=ВРЕМЯ(ЦЕЛОЕ(A41);ОКРУГЛ((A41-ЦЕЛОЕ(A41))*100;0);)

в итоге, после применения формата ячейки ч:мм, получим 5:23.

FB_2000615346853546 Гость	Такой вопрос: есть набор цифр: 7120682600020010001 Надо както сделать, чтобы было так: 7120682600:02:001:0001 Таких комбинаций очень много и надо их как-то быстро сделать.

Bema Пользователь Сообщений: 6759 Регистрация: 15.02.2016	Какая логика установки двоеточий? Если в мире всё бессмысленно, — сказала Алиса, — что мешает выдумать какой-нибудь смысл? ©Льюис Кэрролл

FB_2000615346853546 Гость	Чтобы после первых десяти цыфр цифр поставить двоеточие, далее после следующих двух, потом после трех цыфр цифр…

tolstak Пользователь Сообщений: 471 Регистрация: 01.08.2017	#4 01.11.2017 16:51:10 Код =ЛЕВСИМВ($A$1;10)&":"&ПСТР($A$1;11;2)&":"&ПСТР($A$1;13;3)&":"&ПСТР($A$1;16;4) или Код =ТЕКСТ(A1;"00000000:00:000:0000") Изменено: tolstak — 01.11.2017 16:56:41 In GoTo we trust

АlехМ Пользователь Сообщений: 1100 Регистрация: 02.05.2017	можно так =ЛЕВБ(A1;10)&ТЕКСТ(ПРАВБ(A1;9);»:00:000:0000″)

amibus Пользователь Сообщений: 79 Регистрация: 04.07.2016	ГОТОВО. Вводите любые цифры, формула сама все преобразует

FB_2000615346853546 Гость	Спасибо! И первый, и второй вариант подходит, но когда я начинаю эту формулу протягивать вниз, то везде копирует первое значение…… И когда я этот номер в первую колонку ввожу, то последние четыре цыфры меняет на четыре нули…

amibus Пользователь Сообщений: 79 Регистрация: 04.07.2016	Чтобы исправить ЭТО : «Спасибо! И первый, и второй вариант подходит, но когда я начинаю эту формулу протягивать вниз, то везде копирует первое значение…… И когда я этот номер в первую колонку ввожу, то последние четыре цыфры меняет на четыре нули…» Нужен файл пример в экселе с примерами (как есть и как должно быть)

venom51 Пользователь Сообщений: 237 Регистрация: 11.07.2014	#9 01.11.2017 17:13:09 FB_2000615346853546, так не будет при протягивании вниз брать первое значение + чтобы на четыре нуля не превращались последние цифры надо сделать формат ячеек текстовым Код =ЛЕВСИМВ(A1;10)&":"&ПСТР(A1;11;2)&":"&ПСТР(A1;13;3)&":"&ПСТР(A1;16;4)

Hugo Пользователь Сообщений: 23252 Регистрация: 22.12.2012	#10 01.11.2017 17:16:04 Цитата FB_2000615346853546 написал: есть набор цыфр — и с какого Вы, фебекучацифр,  неумеючи их вводите?

FB_2000615346853546 Гость

Михаил Лебедев Пользователь Сообщений: 2855 Регистрация: 17.01.2013	#12 01.11.2017 17:40:07 Цитата АlехМ написал: =ЛЕВБ(A1;10)&ТЕКСТ(ПРАВБ(A1;9);»:00:000:0000″) Красиво… А почему не так? =ТЕКСТ(A1;»0000000000:00:000:0000″) А, понял…слишком большое число, ексель заменяет последние цифры на 0 Изменено: Михаил Лебедев — 02.11.2017 08:43:09 Всё сложное — не нужно. Всё нужное — просто /М. Т. Калашников/

FB_2000615346853546 Гость	#13 01.11.2017 17:43:56 Цитата Михаил Лебедев написал: А почему не так? =ТЕКСТ(A1;»0000000000:00:000:0000″) В таблице что-то не хочет преобразововать…

АlехМ Пользователь Сообщений: 1100 Регистрация: 02.05.2017	Михаил Лебедев, Проглядел.   А вариант с ЛЕВБ(A1;10) не работает, если в начале нули. Изменено: АlехМ — 01.11.2017 21:50:45

АlехМ Пользователь Сообщений: 1100 Регистрация: 02.05.2017	На самом деле можно сделать формат ячеек 0000000000:00:000:0000 показал на Лист1, в столбце А Изменено: АlехМ — 01.11.2017 21:52:01

FB_2000615346853546 Гость	А почему четыре последние цыфры меняет на нули?

vikttur Пользователь Сообщений: 47199 Регистрация: 15.09.2012	Помогающим каждому по 30 щелбанов по больному месту! И каждый себе придумает обидное слово. Автору: измените логин в своем профиле. И не нужно бездумно жать на кнопку цитирования. Она не для ответа.

АlехМ Пользователь Сообщений: 1100 Регистрация: 02.05.2017	#18 01.11.2017 21:59:20 Цитата vikttur написал: каждый себе придумает обидное слово цыфрыделитель Алексей М. <#0>

tolstak Пользователь Сообщений: 471 Регистрация: 01.08.2017	#19 02.11.2017 09:26:41 Цитата vikttur написал: каждый себе придумает обидное слово формуламыратель   In GoTo we trust

sv2013 Пользователь Сообщений: 657 Регистрация: 09.06.2015	#20 02.11.2017 14:27:33 вариант функции в G1 Код Function uuu$(t$)   With CreateObject("VBScript.RegExp"): .Pattern = "(d{10})(d{2})(d{3})(d{4})": .Global = True     uuu = .Replace(t, "$1:$2:$3:$4")   End With End Function Прикрепленные файлы example_02_11_2017_pl_двоеточия.xls (34.5 КБ) Изменено: sv2013 — 18.05.2018 10:17:09

	Ребят, как из 1421284000010010225 сделать 1421284000:01:001:0225. И таких более 10 000!

Bema Пользователь Сообщений: 6759 Регистрация: 15.02.2016	С помощью функции ЗАМЕНИТЬ() Если в мире всё бессмысленно, — сказала Алиса, — что мешает выдумать какой-нибудь смысл? ©Льюис Кэрролл

	С помощью заменить не получается! Если было бы наоборот, то заменил : на пустоту и все! А так между цифрами надо поставить :

АlехМ Пользователь Сообщений: 1100 Регистрация: 02.05.2017	Можно функцией ТЕКСТ() Создайте новую тему и будут ответы полнее. Изменено: АlехМ — 17.05.2018 15:38:50

Bema Пользователь Сообщений: 6759 Регистрация: 15.02.2016	#25 17.05.2018 15:39:32 Цитата Step13031990 написал: С помощью заменить не получается! У меня получилось: =ЗАМЕНИТЬ(ЗАМЕНИТЬ(ЗАМЕНИТЬ(F9;11;;»:»);14;;»:»);18;;»:») Если в мире всё бессмысленно, — сказала Алиса, — что мешает выдумать какой-нибудь смысл? ©Льюис Кэрролл

	Как применять эту формулу? Ничего не получается! Извините, но я совсем дуб в екселе!)

vikttur Пользователь Сообщений: 47199 Регистрация: 15.09.2012	Формулы сообщений №4, 5 решают Вашу задачу. Формулу писать в другой столбец. Перед вставкой формулы задайте формат ячеек Общий. Если нужно преобразовать на месте, в том же столбце, то только макросом.

Step13 Пользователь Сообщений: 4 Регистрация: 17.05.2018	Просто скопировать отсюда и вставить в ексель можно формулу? Или надо прописывать?

Юрий М Модератор Сообщений: 60581 Регистрация: 14.09.2012 Контакты см. в профиле	#29 18.05.2018 11:45:05 Step13, а самостоятельно проверить нет возможности?

Когда вы вставляете формат времени в ячейки рабочего листа, вас когда-нибудь раздражало вводить двоеточия каждый раз? В этой статье я расскажу о том, как вставлять двоеточие при вводе чисел, чтобы автоматически использовать их в качестве формата времени в Excel.

Вставьте двоеточие между числами, чтобы сделать их форматом времени с формулами

Автоматически преобразовывать числа в формат времени при вводе их с кодом VBA

---

Вставьте двоеточие между числами, чтобы сделать их форматом времени с формулами

Предположим, у вас есть список чисел, чтобы вставить двоеточия и сделать их форматом времени, следующие формулы могут оказать вам услугу.

Если числа всегда 3 или 4 цифры, вы можете использовать эту формулу:

=TIME(LEFT(A1,LEN(A1)-2),RIGHT(A1,2),0), затем перетащите дескриптор заполнения вниз к ячейкам, которые вы хотите содержать эту формулу, и вы получите следующий результат, который вам нужен:

Если числа состоят из 5 или 6 цифр, примените эту формулу:

=(INT(A1/10000)&»:»&INT(MOD(A1,10000)/100)&»:»&MOD(A1,100))+0, и перетащите дескриптор заполнения вниз к ячейкам, которые вы хотите содержать эту формулу, и вы получите числовую последовательность, как показано на следующем снимке экрана:

Затем вы должны отформатировать числа как формат времени, нажав Продолжительность из Общие раскрывающийся список под Главная вкладку, см. снимок экрана:

---

Автоматически преобразовывать числа в формат времени при вводе их с кодом VBA

Следующий код VBA также может помочь вам автоматически преобразовать числа в формат времени при их вводе, пожалуйста, сделайте следующее:

1. Перейдите к листу, на котором вы хотите автоматически вставлять двоеточия в числа.

2. Щелкните правой кнопкой мыши вкладку листа и выберите Просмотреть код из контекстного меню во всплывающем Microsoft Visual Basic для приложений окна, скопируйте и вставьте следующий код в пустое Модули окно, см. снимок экрана:

Код VBA: автоматическое преобразование чисел в формат времени:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
'Updateby Extendoffice 20160606
    Dim xStr As String
    Dim xVal As String
    On Error GoTo EndMacro
    If Application.Intersect(Target, Range("A1:A20")) Is Nothing Then Exit Sub
    If Target.Count > 1 Then Exit Sub
    If Target.Value = "" Then Exit Sub
    Application.EnableEvents = False
    With Target
        If Not .HasFormula Then
            xVal = .Value
            Select Case Len(xVal)
                Case 1 ' e.g., 1 = 00:01 AM
                    xStr = "00:0" & xVal
                Case 2 ' e.g., 12 = 00:12 AM
                    xStr = "00:" & xVal
                Case 3 ' e.g., 735 = 7:35 AM
                    xStr = Left(xVal, 1) & ":" & Right(xVal, 2)
                Case 4 ' e.g., 1234 = 12:34
                    xStr = Left(xVal, 2) & ":" & Right(xVal, 2)
                Case 5 ' e.g., 12345 = 1:23:45 NOT 12:03:45
                    xStr = Left(xVal, 1) & ":" & Mid(xVal, 2, 2) & ":" & Right(xVal, 2)
                Case 6 ' e.g., 123456 = 12:34:56
                    xStr = Left(xVal, 2) & ":" & Mid(xVal, 3, 2) & ":" & Right(xVal, 2)
                Case Else
                    Err.Raise 0
            End Select
            .Value = TimeValue(xStr)
        End If
    End With
    Application.EnableEvents = True
    Exit Sub
EndMacro:
    MsgBox "You did not enter a valid time"
    Application.EnableEvents = True
End Sub

Примечание: В приведенном выше коде A1: A20 — это ячейки, которые вы хотите вставить позже, и вы можете изменить ссылку на ячейку по своему усмотрению.

3. И теперь, когда вы вводите числа, такие как 102319, в диапазоне ячеек A1: A20, а затем нажимаете Enter , число будет автоматически отформатировано в формате времени 10:23:19 по мере необходимости.

На чтение 2 мин. Просмотров 77 Опубликовано 22.05.2021

Когда вы вставляете формат времени в ячейки рабочего листа, раздражало ли вас когда-нибудь вводить двоеточия каждый раз? В этой статье я расскажу о том, как вставлять двоеточие при вводе чисел, чтобы автоматически использовать их в качестве формата времени в Excel.

Вставьте двоеточие между числами, чтобы сделать их форматом времени с формулами

Автоматически преобразовывать числа в формат времени при вводе их с кодом VBA

---

Вставьте двоеточие между числами, чтобы они использовались в качестве формата времени с формулами

Предположим, у вас есть список чисел, чтобы вставить двоеточия и сделать их форматом времени, следующие формулы могут оказать вам услугу.

Если числа соответствуют всегда 3 или 4 цифры, вы можете использовать эту формулу:

= TIME (LEFT (A1, LEN (A1) -2), RIGHT (A1,2) , 0) , затем перетащите дескриптор заполнения вниз к ячейкам, которые вы хотите содержать эту формулу, и вы получите следующий результат по мере необходимости:

Если онемел Они состоят из 5 или 6 цифр, используйте следующую формулу:

= (INT (A1/10000) & “:” & INT (MOD (A1,10000) /100) & “:” & MOD (A1,100)) + 0 и перетащите дескриптор заполнения вниз к ячейкам, которые вы хотите содержать эту формулу, и вы получите числовую последовательность, как показано на следующем снимке экрана:

Затем вы должны отформатировать числа как формат времени, нажав Время из раскрывающегося списка Общие на вкладке Главная , см. снимок экрана:

---

Автоматически преобразовывать числа в формат времени, когда вы вводите их с кодом VBA

Следующий код VBA также может помочь вам автоматически преобразовать при вводе чисел в формат времени выполните следующие действия:

1 . Перейдите к листу, на котором вы хотите автоматически вставлять двоеточия в числа.

2 . Щелкните правой кнопкой мыши вкладку листа и выберите Просмотреть код из контекстного меню, в появившемся окне Microsoft Visual Basic для приложений скопируйте и вставьте следующее код в пустое окно Module , см. снимок экрана:

Код VBA: автоматическое преобразование чисел в формат времени:

Примечание. В приведенном выше коде A1: A20 – это ячейки, которые вы хотите вставить позже, и вы можете изменить ссылку на ячейку по своему усмотрению.

3 . И теперь, когда вы вводите числа, такие как 102319, в диапазон ячеек A1: A20, а затем нажимаете клавишу Enter , число будет автоматически отформатировано в формате времени 10:23:19 AM, когда вы нужно

---

через каждые два символа в строке поставить двоеточие

irusik Дата: Четверг, 04.08.2016, 18:40 | Сообщение № 1 Группа: Пользователи Ранг: Новичок Сообщений: 18 Репутация: 0 ± Замечаний: 20% ± Excel 2010 Всем привет! следующая проблемка у меня, с которой надеюсь Вы мне поможете справиться. в ячейке написано 12 символов. мне нужно чтобы через каждые два символа стояло ну например «двоеточие». Например у меня сейчас так: 12шокн45а67у а нужно, чтобы было так: 12:шо:кн:45:а6:7у Возможно ли вообще такое в экселе? Спасибо заранее!   Ответить

Manyasha Дата: Четверг, 04.08.2016, 19:01 | Сообщение № 2 Группа: Модераторы Ранг: Старожил Сообщений: 2198 Репутация: 898 ± Замечаний: 0% ± Excel 2010, 2016 irusik, здравствуйте, Вам точно нужно решение для Excel Mac? Покажите в файле несколько строк для примера. ЯД: 410013299366744 WM: R193491431804   Ответить

irusik Дата: Четверг, 04.08.2016, 19:20 | Сообщение № 3 Группа: Пользователи Ранг: Новичок Сообщений: 18 Репутация: 0 ± Замечаний: 20% ± Excel 2010 Manyasha, я незнаю какое решение здесь будет уместно. решается ли эта проблема с помощью формул или просто каким нибудь редактированием, о котором я даже и не догадываюсь. Файл прилагается. хотя в нем нет ни чего особенного. простые ячейки с символами (буквы или цифры). спасибо Если я не по теме, перенесите в нужную, пплиз. Сообщение отредактировал irusik — Четверг, 04.08.2016, 19:35   Ответить

Gustav Дата: Четверг, 04.08.2016, 19:39 | Сообщение № 4 Группа: Друзья Ранг: Старожил Сообщений: 2398 Репутация: 986 ± Замечаний: 0% ± начинал с Excel 4.0, видел 2.1 Не знаю, сработает ли такое на Mac, в смысле есть ли там все участвующие функции, но «в лоб» (причем, самый твердый) задачка решается так: Код =СЦЕПИТЬ(ПСТР(C5;1;2);»:»;ПСТР(C5;3;2);»:»;ПСТР(C5;5;2);»:»;ПСТР(C5;7;2);»:»;ПСТР(C5;9;2);»:»;ПСТР(C5;11;2)) Формула — для ячейки E5. P.S. Кстати, я «влетел» в тему, просто нажав в столбце «Обновления» раздела «Вопросы по Excel». И тоже не сразу заметил, что я оказался в Маке… МОИ: Ник, Tip box: 41001663842605 Сообщение отредактировал Gustav — Четверг, 04.08.2016, 19:42   Ответить

irusik Дата: Четверг, 04.08.2016, 19:42 | Сообщение № 5 Группа: Пользователи Ранг: Новичок Сообщений: 18 Репутация: 0 ± Замечаний: 20% ± Excel 2010 Gustav, спасибо за ответ. один вопросик еще: что означает ПСТР?   Ответить

Gustav Дата: Четверг, 04.08.2016, 19:45 | Сообщение № 6 Группа: Друзья Ранг: Старожил Сообщений: 2398 Репутация: 986 ± Замечаний: 0% ± начинал с Excel 4.0, видел 2.1 irusik, погуглите по строке «функция ПСТР» МОИ: Ник, Tip box: 41001663842605   Ответить

Операторы определяют операции, которые необходимо выполнить над элементами формулы. В Excel используются общие математические правила для вычислений, в том есть круглые скобки, экспоненты, умножение и деление, сложение и вычитание, а также сокращенное пемдас (заставьте Уважаемый родственницей Салли). С помощью скобок вы можете изменить порядок вычислений.

Типы операторов. Существуют четыре разных типа операторов вычислений: арифметическое, Сравнение, Объединение текстаи ссылка.

• Арифметические операторы

  Арифметические операторы служат для выполнения базовых арифметических операций, таких как сложение, вычитание, умножение, деление или объединение чисел. Результатом операций являются числа. Арифметические операторы приведены ниже.

  Арифметический оператор	Значение	Пример
  + (знак «плюс»)	Сложение	= 3 + 3
  – (знак «минус»)	Вычитание Отрицание	= 3 – 3 =-3
  * (звездочка)	Умножение	= 3 * 3
  / (косая черта)	Деление	= 3/3
  % (знак процента)	Доля	30
  ^ (крышка)	Возведение в степень	= 3 ^ 3

• Операторы сравнения

  Операторы сравнения используются для сравнения двух значений. Результатом сравнения является логическое значение: ИСТИНА либо ЛОЖЬ.

  Оператор сравнения	Значение	Пример
  = (знак равенства)	Равно	= A1 = B1
  > (знак «больше»)	Больше	= A1>B1
  < (знак «меньше»)	Меньше	= A1<B1
  >= (знак «больше или равно»)	Больше или равно	= A1>= B1
  <= (знак «меньше или равно»)	Меньше или равно	= A1<= B1
  <> (знак «не равно»)	Не равно	= A1<>B1

• Текстовый оператор конкатенации

  Амперсанд (&) используется для объединения (соединения) одной или нескольких текстовых строк в одну.

  Текстовый оператор	Значение	Пример
  & (амперсанд)	Соединение или объединение последовательностей знаков в одну последовательность	= «Север» & «обмотка» — это результат «Борей». Если ячейка a1 содержит «Last Name», а B1 — «First Name», = a1& «,» &B1 — «фамилия, имя».

• Операторы ссылок

  Для определения ссылок на диапазоны ячеек можно использовать операторы, указанные ниже.

  Оператор ссылки	Значение	Пример
  : (двоеточие)	Оператор диапазона, который образует одну ссылку на все ячейки, находящиеся между первой и последней ячейками диапазона, включая эти ячейки.	B5:B15
  ; (точка с запятой)	Оператор объединения. Объединяет несколько ссылок в одну ссылку.	= СУММ (B5: B15, D5: D15)
  (пробел)	Оператор пересечения множеств, используется для ссылки на общие ячейки двух диапазонов.	B7:D7 C6:C8

F3:F11 — это диапазон, но вы вводите его в месте, где уместно указать только одно значение, поэтому Excel пытается выбрать одно значение из диапазона, используя следующие правила:

• Если диапазон находится в одном столбце (как это есть), Excel выбирает ячейку из этого столбца в той же строке, что и ссылающаяся ячейка (или ошибка #VALUE! если диапазон не пересекает эту строку)
• Если диапазон находится в одной строке, Excel выбирает ячейку из этой строки в том же столбце, что и ссылающаяся ячейка (или ошибка # #VALUE! если диапазон не пересекает этот столбец)
• Если диапазон является двухмерным, Excel выбирает ячейку из той же строки и столбца, что и ячейка ссылки (или ошибка # #VALUE! если диапазон не пересекает строки и столбцы диапазона) — очевидно, это работает только тогда, когда диапазон и вызывающая ячейка находятся на разных листах

Внимание:

• Если ссылка на диапазон дается там, где диапазон или массив уместны, будет использоваться весь диапазон — поэтому в ячейке M4 =F3:F11+1 будет 31, но =sum(F3:F11,1) будет 331.
• Если эта формула будет введена как формула массива (используя ctrl+shift+enter) в одной и той же ячейке, она вернет весь массив, но вы увидите только одну ячейку, поскольку это все, что вписывается в диапазон результатов. Результат будет 10. Предположительно Google ARRAYFORMULA работает так же.

Когда это полезно?

В общем, я не люблю использовать это поведение при обращении к ячейке в той же таблице — обычная относительная ссылка (F4) работает так же хорошо, и мне не нужно беспокоиться о том, как мои формулы будут интерпретировать ссылку. (См. Предостережение выше.)

Однако одно из применений — это когда вы хотите, чтобы один рабочий лист совмещался один с другим. Я могу привести нужные столбцы в ссылку на столбец (например, =Sheet1!$A:$A) и пусть остальные столбцы будут вычисляемыми полями. Я мог бы сделать это и с относительной ссылкой (например, =$A1 и перетащить вниз), но ссылки на столбец имеют преимущества — я могу вставлять, удалять или сортировать строки в исходном листе, не нарушая ссылок. (С ссылками на одну ячейку я получу, при вставке, строку, отсутствующую в ссылочных данных; при удалении, #REF! ошибка; на сортировке, эти два листа больше не будут в том же порядке.)

Ввод и форматирование дат и времени в Excel

​Смотрите также​ раза на имени​​ 1) = Date​​ в модуле вашего​ только ссылку на​nika_adm​

​.​ (41209) — это​ без, месяц числом​ реально помогли​ вводиться даты и​ если вы хотите​ заполнить маркер заполнения​ чисел, комбинаций текст​​Excel​​Как видите все достаточно​ формата отображения даты​Весь курс: урок 1​ листа, где находится​ End If End​ листа. Он запускается​ нужный блок, и​: Установить на сомпе,​Про то, как это​ количество дней, прошедших​ или словом и​Aexbro​ время, соответственно.​

Ввод дат и времени в Excel

​ заполнение ячеек последовательностью​.​ и числа или​выберите пункт​ просто!​ и времени в​ |​ Ваша таблица​ If End If​ на событие изменения​ под ним Me.ToggleButtonХХ.Value​ MSCOMCT2.OCX​ правильно вычислять, лучше​

​ с 1 января​ т.д.) и задается​: _Boroda_, спасибо вопрос​Aexbro​ пропускает каждый день,​Примечание:​ формулы на основе​Параметры​В этом уроке мы​ настройках операционной системы.​​урок 2​​4 скопируйте код​ If Target.Column =​

​ листа, конкретно ячеки​ = True .​Возможно на Вашем​ почитать тут.​ 1900 года (взято​ через контекстное меню​ закрыт​: Здравствуйте. Есть таблица​ например Понедельник, среда,​ При выборе диапазона ячеек,​ шаблона, который можно​. В разделе​ научились настраивать формат​Работая с ячейками в​| урок 3​ и вставьте в​

​ 13 And Target.Row​ — А1.​На сколько это​ компе он уже​Поскольку одни сутки в​

​ за точку отсчета)​ — правой кнопкой​Wasilich​ в которой множество​ пятница, т. д.,​ которые вы хотите​ установить. Например можно​формулы и списки​

Формат даты и времени в Excel

​ отображения дат и​ Microsoft Excel, которые​ | урок 4​ основное поле редактора​ > 3 _​SOV1​ сократит код, как​ есть, тогда просто​ системе отсчета даты​ до текущей даты.​ мыши по ячейке​: А чё никто​

​ ячеек с временными​ введите Понедельник и​ повторить в смежных​​ элем1 ввод в​​щелкните​​ времени в Microsoft​​ содержат дату или​​ | урок 5​​5 сохраните файл​ And Target.Row <​

​: Димит, ваш макрос​​ думаешь? И это​​ добавить элемент к​ Excel принимаются за​

​ А дробная часть​ и далее​ не предложил макрос?​ значениями.Как ускорить процесс​​ среда из двух​​ ячеек, можно перетащить​​ ячейку и затем​​Автозаполнение​ Excel, а также​ время, Вы имеете​Думаю, из прошлого урока​ и закройте редактор​​ 2000 Then If​​ очень даже оказался​ не единственный момент​ инструментам.​

​ единицу (см.выше), то​ (0,65417), соответственно, доля​Формат ячеек​ Тем более, что​ ввода времени (без​ ячеек начальный и​ маркер заполнения вниз​ заполнить ячейки ниже​и снимите флажок​ разобрали несколько полезных​ возможность применять к​ Вам уже известно,​

1. ​ VBA​ Target.Offset(0, 0).Value =​ нужным, только не​
2. ​ в этом коде.​​Штурмaн​​ для вычисления даты,​ от суток (1сутки​​(Format Cells)​​ ТС сам пытался​
3. ​ ввода разделителей) с​​ затем перетащите маркер​​ один столбец или​​ или справа от​​Автозавершение значений ячеек​ вариантов их ввода​ ним различное форматирование.​ что даты и​​6 измените ячейку​​ «да» Then If​​ хватило нам тяму​​ Сама инициализация формы,​
4. ​: Если можно, то​ отстоящей от заданной​

​ = 1,0)​:​

​ применить.​ последующим сложением либо​ заполнения.​ по одной строки,​ элем2 Item3, Item4,​.​ на рабочий лист.​ Например, Вы можете​ время в Excel​ в 7 столбце​ Target.Offset(0, 1).Value =​ распространить его действие​ тоже далеко не​ хочется поподробнее узнать​ на, допустим, 20​Из всех этих фактов​Время вводится в ячейки​Вот пример. Может​ вычитанием этих данных.​

​Если Вам часто приходится​

office-guru.ru

Ввод ряда чисел, дат или других элементов

​ но не вниз​​ и т.д.​Выделите ячейки, содержащие данные,​ В следующем уроке​ отображать в ячейке​ хранятся в виде​ и убедитесь в​ «» Then Target.Offset(0,​ на весь столбец.​ блеск. 1570 строк(правда​ про MSCOMCT2.OCX -​ дней, достаточно прибавить​ следуют два чисто​ с использованием двоеточия.​ кому пригодится​ Например: в А1​ вводить даты и​ несколько столбцов и​Выделите ячейку, содержащую сочетание​ которые вы хотите​ мы поговорим о​ только день недели,​

​ порядковых чисел, началом​ работе макроса​

Быстро ввести в ячейку столбца повторяющихся элементов

1. ​ 1) = Date​Помогите, плиз!​ вкючая пустые строки).​

   ​ где его взять​ к дате это​ практических вывода:​ Например​stria​ вводим 1230 видим​ время в ячейки,​

2. ​ на нескольких строках.​ текста и номера​ повторить в смежных​ 7-ми функциях Excel,​

   ​ или только месяц​​ отсчета которых принято​

   • ​842-й​ End If End​Димит​ Я думаю, что​ и как установить?​ число.​Во-первых, Excel не умеет​16:45​

   • ​: Здравствуйте!​ (12:30), в В1​ то Вам должна​Интеллектуальная кнопка​

   • ​ или начальный номер.​ ячеек.​ которые позволяют извлекать​ и год, или​ считать некое​: Здравствуйте, все сделал​​ If End If​​: Замените строку​​ раз в 10​​dlaptev​​Эту операцию осуществляет функция​​ работать (без дополнительных​​По желанию можно дополнительно​ ​Решил сделать в​​ вводим 1700 (видим​​ понравиться идея писать​

Быстро ввести столбец повторяющихся элементов в несколько ячеек одновременно

1. ​Параметры автозаполнения​Выделите ячейки, которые нужно​Выделите ячейки, которые нужно​ нужные параметры из​

2. ​ же только время.​0 января 1900 года​​ по вашей инструкции​

   ​ End Sub​​If Target.Address =​ легко можно сократить…Согласен​: http://www.yandex.ru/yandsearch?text=MSCOMCT2.OCX​РАБДЕНЬ​ настроек) с датами​ уточнить количество секунд​ Excel подсчет налета​ 17:00) в С1​ их сокращенно, без​нажмите кнопку, а​

3. ​ заполнить маркер заполнения​​ заполнить маркер заполнения​ ​ значений дат и​Получить доступ ко всем​. К счастью, в​

   ​ и получилось =)))​	​842-й​
   ​ «$A$1» Then​ с Вами Что-то​	​в частности тут​​(WORKDAY)​​ ранее 1 января​
   ​ — вводя их​	​ используя быстрый ввод​​ получаем 4:30.​​ точек-дробей-двоеточий — просто​
   ​ затем выполните одно​.​	​.​​ времени. На этом​​ возможным форматам Вы​

​ ячейках мы видим​​ спасибо огрмное!!! очень​

• ​: Товарищи, помогите пожалуйста!​на​ я раздухарился с​http://ms-access.ru/SetupWizard_mscomct2.html​. Она позволяет вычислить​ 1900 года. Но​ также через двоеточие:​ времени (2300 =​Проблем с вводом​ как число. Чтобы​

• ​ из следующих действий:​Примечание:​​Примечание:​ ​ урок закончен. Всего​ можете на вкладке​ не эти числа,​ помогло.​​Я абсолютно не​​If Target.Column =​​ кодом в этом​​Masalov​​ дату, отстоящую вперед​​ это мы переживем!​​16:45:30​ ​ 23:00)​​ нет : достаточно​ в заданном диапазоне​​Задача​

Быстро ввод ряда чисел или комбинаций номер текста

​ При выборе диапазона ячеек,​ При выборе диапазона ячеек,​ Вам доброго и​Число​ а привычные для​gera_vip​ знаю МVB но​ 1 Then​ календарике.​: Я когда столкнулся​ или назад относительно​ ;)​

1. ​И, наконец, никто не​Вопрос в следующем:-Как​ задать формат ячейкам​

2. ​ ячеек листа, например,​Действие​​ которые вы хотите​

   ​ которые вы хотите​​ успехов в изучении​диалогового окна​ нас даты и​: Дабы не создавать​ очень хачется сделать​в данном случае​SOV1​ с такой же​ начальной даты на​Во-вторых, с датами и​

3. ​ запрещает указывать дату​​ без ввода даты​ ​ А1 и В1​ число 250699 автоматически​Скопируйте все содержимое ячейки,​

   ​ повторить в смежных​	​ повторить в смежных​
   ​ Excel.​Формат ячеек​ время, которые могут​	​ новую тему, спрошу​​ следующее:​​ 1 — это​
   ​: Всем доброго времени​	​ проблемой сделал собственну​​ нужное количество рабочих​​ временем в Excel​
   ​ и время сразу​ excel мог определить​	​ «0/:00», но как​​ превращалось в 25.06.1999,​​ включая формул и​

​ ячеек, можно перетащить​​ ячеек, можно перетащить​Автор: Антон Андронов​. В категории​ храниться в самых​ здесь.​при смене или​ номер столбца, т.е.​ суток.​ форму календаря. (см.​ дней (с учетом​ возможно выполнять любые​ вместе через пробел,​ переход суток?​ сделать чтобы в​

Быстро ввести серию дат, времени, рабочие дни, месяцы и годы

​ а 1125 в​ форматирования, без повторяющихся​ маркер заполнения вниз​ маркер заполнения вниз​Примечание:​Дата​ различных форматах. В​Нашел код, который​ появлении значения в​ «А»​

1. ​Такая вот задача:​ приложение).​ выходных суббот и​ математические операции. Именно​

2. ​ то есть ​т.е Взлет 23:00,​​ ячейке С1 эти​

   ​ 11:25.​​ серии​ один столбец или​ один столбец или​Мы стараемся как​приведены встроенные форматы​ этом уроке Вы​ добавляет дату.​ 7-ом столбце в​Димит​при выборе значения​

3. ​Так как если​​ воскресений и государственных​ ​ потому, что на​27.10.2012 16:45​ посадка 01:00 …​

   ​ значения суммировалось как​	​Для этого щелкните по​
   ​Выберите команду​ по одной строки,​ по одной строки,​ можно оперативнее обеспечивать​	​ дат:​​ узнаете, как вводить​​Private Sub Worksheet_Change(ByVal​
   ​ 6-ом отображалась дата​: Замените строку​ из списка в​	​ переносить Ваш ексельный​​ праздинков). Использование этой​​ самом деле они​
   ​Для ввода сегодняшней даты​	​ итого 2:00.​​ время​​ ярлычку листа, куда​
   ​Копировать ячейки​ но не вниз​	​ но не вниз​​ вас актуальными справочными​​А в категории​
   ​ даты и время​ Target As Range)​ ввода этого значения.​If Target.Address =​	​ одной ячейке таблицы​​ файлик на другой​​ функции полностью аналогично​
   ​ — числа! А​ в текущую ячейку​Может кто нибудь​Спасибо​ будут вводиться даты​.​	​ несколько столбцов и​​ несколько столбцов и​​ материалами на вашем​
   ​Время​ в Excel, чтобы​ For Each cell​Надо чтоб работало​ «$A$1» Then​	​ — в другой​​ компьютер, на котором​​ применению функции​
   ​ вот это уже​ можно воспользоваться сочетанием​ поможет пилоту ?​jakim​ и время и​	​Заполнение ячеек на основании​​ на нескольких строках.​​ на нескольких строках.​

​ языке. Эта страница​​– встроенные форматы​ получать требуемое форматирование.​ in Target ‘проходим​ это все со​на​ ячейке должна появиться​ может не оказаться​ЧИСТРАБДНИ​ раскрывает перед пользователем​ клавиш​Конечно поможет. Если​: Не знаю как​ выберите команду​ начальные сведения в​Интеллектуальная кнопка​

support.office.com

Быстрый ввод даты и времени без разделителей

​Интеллектуальная кнопка​ переведена автоматически, поэтому​ времени:​Даты и время в​ по всем измененным​ 2-ой строки.​If Target.Column =​ текущая дата. И​ MSCOMCT2.OCX — календарь​(NETWORKDAYS)​ массу возможностей.​Ctrl + Ж​ пилот прочитает Правила​ в 2007, а​

​Исходный текст​ первой ячейке​Параметры автозаполнения​Параметры автозаполнения​ ее текст может​​Для того чтобы применить​ ​ Excel можно вводить​​ ячейкам If Not​Если не трудно​ 1 Then​ самое главное -​

​ не заработает.​описанной выше.​Считается простым вычитанием -​(или​ форума и создаст​ в 2010 всё​(Source Code)​Нажмите кнопку​нажмите кнопку, а​нажмите кнопку, а​ содержать неточности и​ форматирование к ячейке,​ в виде порядкового​ Intersect(cell, Range(«A2:A1048576»)) Is​ объясните как это​в данном случае​ дата не должна​dlaptev​Вас не в понедельник​ из конечной даты​CTRL+SHIFT+4​ свою тему. Крайне​ очень просто.​. В открывшееся окно​»ряд заполнения»​ затем выполните одно​ затем выполните одно​ грамматические ошибки. Для​ достаточно выбрать нужный​ числа или доли​ Nothing Then ‘если​ сделать от А​ 1 — это​ больше изменяться, тк​: gif красивый, только​ родили? Нет? Уверены?​ вычитаем начальную и​если у вас​ желательно, чтобы еще​_Boroda_​ редактора Visual Basic​

​.​ из следующих действий:​ из следующих действий:​ нас важно, чтобы​ формат в разделе​ суток, но как​

planetaexcel.ru

Excel быстрый ввод времени (Формулы)

​ измененная ячейка попадает​​ до Я т.к.​ номер столбца, т.е.​ таблица редактируется в​ в коде «несъедобный»…​ Можно легко проверить​ переводим результат в​ другой системный язык​ и с примером​:​ скопируйте и вставьте​Копирование только форматирования ячеек​Задача​Задача​ эта статья была​
​Тип​ Вы сами понимаете,​ в диапазон A2:A1048576​ я не ориентируюсь​ «А»​ течение месяца.​народ вон коды​ при помощи функции​Общий (General)​
​ по умолчанию).​

​ в Excel.​​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ТЕКСТ(A1;»00:00″)+ТЕКСТ(B1;»00:00″)​ следующий код:​Нажмите кнопку​Действие​

​Действие​​ вам полезна. Просим​​и нажать​
​ это не совсем​
​ With cell.Offset(0, 4)​
​ совсем (( могу​SOV1​

​SOV1​​ раздает (из недавних):​ДЕНЬНЕД​числовой формат, чтобы​Если скопировать ячейку с​
​valenelena​
​или​
​Private Sub Worksheet_Change(ByVal​
​заполнить только форматирования​Скопируйте все содержимое ячейки,​
​Скопируйте все содержимое ячейки​ вас уделить пару​
​ОК​ удобно. К тому​
​ ‘вводим в соседнюю​ лишь макрос создать​: Огромное Вам спасибо,​: Нет желающих помочь?​http://relib.com/forums/thread883354.aspx​(WEEKDAY)​
​ показать разницу в​

​ датой (протянуть за​​: в 2010 у​Код200?’200px’:»+(this.scrollHeight+5)+’px’);»>=—ТЕКСТ(A1+B1;»00:00″)​ Target As Range)​.​ включая форматирование и​ с форматированием​ секунд и сообщить,​. Нужное форматирование будет​ же при таком​ справа ячейку дату​ и то не​ Димит.​ Слишком сложно или​Штурмaн​
​из категории​

​ днях:​​ правый нижний угол​ меня нет такого​

​Да, 12:30+17:00 будет​​ Dim vVal Dim​Скопируйте содержимое ячейки, включая​

​ формулы​​Выберите команду​ помогла ли она​

​ применено. Если встроенных​​ подходе к ячейке​ (чем выше цифра,​ работает почему-то ((​И, чтобы закончить​ наоборот?​
​: Пожалуйста, код.​Дата и время​

​Здесь ситуация чуть сложнее.​​ ячейки), удерживая​
​ типа ввода времени.​ 5:30​ StrVal As String​ формул без форматирования​Выберите команду​
​Копировать ячейки​ вам, с помощью​ числовых форматов Вам​ придется каждый раз​
​ тем дальше ячейка)​заранее спасибо!​ этот вопрос: как​
​Димит​Может кому-нибудь пригодится.​
​.​ Необходимо не учитывать​правую​Как вводить время​Aexbro​ Dim dDate As​Щелкните​

​Копировать ячейки​​.​ кнопок внизу страницы.​ будет недостаточно, то​
​ применять определенный числовой​ .Value = Date​Димит​

​ сориентировать макрос на​​: При изменении А1​dlaptev​Первый аргумент этой функции​ субботы с воскресеньями​кнопку мыши, то​ вводим 1230 видим​
​: _Boroda_, Спасибо за​ Date If Target.Cells.Count​Заливка без форматирования​.​Копирование только форматирования ячеек​ Для удобства также​

​ можно воспользоваться категорией​​ формат.​ ‘Дата .EntireColumn.AutoFit ‘выполняем​

excelworld.ru

Основные принципы работы с датами и временем в Excel

Видео

​: Private Sub Worksheet_Change(ByVal​ определенный диапазон ячеек.​ в В1 появится​: писал человек явно​ — ячейка с​

Как вводить даты и время в Excel

​ и праздники. Для​ можно выбрать -​ (12:30)​ ответ, но к​ > 1 Then​.​

​Копирование только форматирования ячеек​	​Нажмите кнопку​
​ приводим ссылку на​	​Все форматы​
​Excel предлагает несколько форматов​	​ автоподбор ширины для​
​ Target As Range)​	​Напимер с А5​

​ дата, но если​ неленивый…. как минимум​ датой, второй -​ такого расчета лучше​ как именно копировать​_Boroda_​ сожалению ваша формула​ Exit Sub If​Использование начальную дату в​Нажмите кнопку​заполнить только форматирования​​ оригинал (на английском​ ​. Здесь Вы также​​ для ввода временных​

​ столбца B, чтобы​ If Target.Cells.Count =​ до А100? (просто​

​ ячейка В1 пуста​

​ половину кода легко​ тип отсчета дней​ воспользоваться функцией​ выделенную дату:​

​: Если именно «видим»​

​ дает следующий результат:​ Not Intersect(Target, Range(«A2:A10»))​ первой ячейке, чтобы​заполнить только форматирования​.​

​ языке) .​

Быстрый ввод дат и времени

​ сможете найти много​ данных. Если Вы​ дата умещалась в​ 1 And Target.Column​​ в первых строках​​ (т.е. первый раз).​​ можно выкинуть, а​​ недели (самый удобный​ЧИСТРАБДНИ​Если Вам часто приходится​

​ (а по факту​8:00 10:30 02:30​ Is Nothing Then​ заполнить ячейки с​​.​​Копирование содержимого ячейки без​Выполните одно из указанных​ всего интересного.​ примените такой формат,​

​ ячейке End With​ = 7 And​ идет шапка таблицы…)​Не знаю это​ то и больше….​ — 2).  ​

​(NETWORKDAYS)​ вводить различные даты​ в ячейке все​11:30 15:00 03:70​ With Target StrVal​​ последующей датами​ ​Скопируйте содержимое ячейки, включая​​ форматирования​

Как Excel на самом деле хранит и обрабатывает даты и время

​ ниже действий.​Если ни один из​ Excel автоматически преобразует​​ End If Next​​ Target.Row > 1​Димит​​ ли нужно.​​ [image]http://kvvmku.ru/forum/images/smiles/d_smily_tooth.gif[/image]​​Поскольку время в Excel,​​из категории​​ в ячейки листа,​​ равно находится число​17:30 23:00 05:70​

​ = Format(.Text, «000000»)​Нажмите кнопку​ формул без форматирования​

​Щелкните​В столбце введите первые​ вариантов Вас так​ введенную дату (или​ cell End SubМожет​ Then Target.Offset(0, -1)​: ну можно добавить​Private Sub Worksheet_Change(ByVal​Штурмaн​ как было сказано​Дата и время​ то гораздо удобнее​ 1230), то поставьте​где b1-a1 дает​ If IsNumeric(StrVal) And​Заполнить по дням​Щелкните​

​Заливка без форматирования​ несколько букв для​ и не устроил,​

• ​ время) в порядковое​ ли кто-то подсказать,​ = Date End​ на ограничение по​ Target As Range)​: Ну ну, интересно​ выше, такое же​
• ​. В качестве аргументов​ это делать с​ формат ячейки 00:00​ 2:30​ Len(StrVal) = 6​.​Заливка без форматирования​.​ записи.​ то можно создать​

Количество дней между двумя датами

​ число (долю суток)​ как его модернизировать,​ If End SubНу​ строкам, типа:​​ If Target.Address =​​ что-же там можно​ число, как дата,​ этой функции необходимо​

Количество рабочих дней между двумя датами

​ помощью всплывающего календаря:​А вот если​где b2-a2 дает​ Then Application.EnableEvents =​Используйте имя начального дня​.​​Примечания:​ ​Если при вводе знаков​​ пользовательский числовой формат.​​ и применит к​​ чтобы при удалении​ обьяснять тут особо​If Target.Column =​ «$A$1» Then If​ выкинуть ?​ но только дробная​ указать начальную и​Если нужно, чтобы в​

​ Вам действительно нужно​​ 3:70 вместо 3:30​ False dDate =​ недели в первой​Примечание:​ ​ совпадает с существующей​ Его создать достаточно​​ ячейке формат​​ значения из колонки​ не чего​​ 1 And Target.Row​ ​ Target.Offset(0, 1).Value =​​dlaptev​ его часть, то​​ конечную даты и​ ​ ячейке всегда была​​ преобразовать во время,​где b3-a3 дает​ DateValue(Left(StrVal, 2) &​​ ячейке для заполнения​​ Узор заливки можно изменить,​Чтобы быстро ввести те​​ записи в этом​ ​ легко, если в​​Даты​

Количество полных лет, месяцев и дней между датами. Возраст в годах. Стаж.

​ А, удалялась и​Макрос срабатывает на​ > 4 Then​

Сдвиг даты на заданное количество дней

​ «» Then Target.Offset(0,​: to Штурмaн​ с временем также​ ячейки с датами​ актуальная сегодняшняя дата​ то нужен Ваш​ 5:70 вместо 5:30​ «/» & Mid(StrVal,​ ячейки с последующей​ выбрав два или​

Сдвиг даты на заданное количество рабочих дней

​ же данные в​​ столбце, Excel отображает​ ​ качестве образца использовать​​(или Времени), установленные​ дата. А то​ изменение одной ячейки​SOV1​ 1) = Date​Точно не ленивый​ возможны любые математические​ выходных (государственных праздников,​ — лучше воспользоваться​ файл. Конечно, в​я бьюсь над​​ 3, 2) &​ ​ рабочие дни (исключая​​ больше начальной ячеек,​

Вычисление дня недели

​ несколько ячеек одновременно,​ меню список записей,​ встроенные числовые форматы.​ по умолчанию.​​ получается если в​ ​ в 7 столбце​​: Димит, еще раз​​ End If End​​ :-)​

​ операции, как и​ больничных дней, отпусков,​ функцией​ новой теме.​ этим уже неделю,​ «/» & Right(StrVal,​

Вычисление временных интервалов

​ суббота и воскресенье)​ прежде чем перетащить​ выделите все ячейки,​ уже используется в​ Чтобы создать пользовательский​На рисунке ниже представлена​ колонке А (даже​ и строке 2​ большое спасибо! Изначальная​ If End Sub​Проще установить MSCOMCT2.OCX​ с датой -​

​ отгулов и т.д.):​СЕГОДНЯ​valenelena​ испробывал десятки вариантов​ 2)) .NumberFormat =​Щелкните​ заливки маркера. Например​ введите нужные сведения​ столбце.​ числовой формат, выполните​ таблица вариантов ввода​ пустой) нажать клавишу​​ и дальше.​​ цель достигнута. Получилось​

planetaexcel.ru

Быстрый ввод даты на форме в Excel

​SOV1​​ на компе, и​ сложение, вычитание и​Примечание​(TODAY)​: все разобралась .​ и постоянно прихожу​ «dd/mm/yyyy» .Value =​Заливка дней недели​

​ если вы хотите​​ и нажмите клавиши​Нажмите клавишу Стрелка вниз,​
​ следующие действия:​ даты и времени,​ Del, то тоже​Макрос должен находится​ следующее (может еще​

​: Спасибо, Димит, что​​ не заморачиваться…​ т.д.​: Эта функция появилась​:​ Спасибо​

​ к этим же​​ CDate(DateSerial(Year(dDate), Month(dDate), Day(dDate)))​
​.​
​ заполнение ячеек последовательностью​

​ CONTROL + RETURN.​​ чтобы выбрать совпадающие​Выделите ячейку, к которой​ которые поддерживает Excel.​ происходит запись даты​ в модуле листа.​
​ кому-нибудь пригодится): при​ откликнулись!​Максимум чем может​Нюанс здесь только один.​ в стандартном наборе​Если выделить ячейку с​Как обычно, кому надо​

​ результатам​​ End If End​Заливка ячеек и последующие​
​ чисел, например 2,​ Этот метод работает​
​ записи и нажмите​

​ необходимо применить требуемый​​ В левой колонке​
​ в соответствующий столбец.​

​842-й​​ появлении значения в​Проблемму решили другим​ отличаться созданный собственноручно​ Если при сложении​ функций Excel начиная​ датой и установить​

​ быстро — смотрим​​спасибо​ With End If​ месяцы года с​

​ 4, 6, 8…,​​ через все выделенные​
​ клавишу RETURN.​ числовой формат.​
​ показаны значения, которые​А нужно время​: Спасибо!!! ))​
​ столбце №7 в​ способом: «знакомые» помогли​ контрол, это внешним​ нескольких временных интервалов​ с 2007 версии.​ для нее​

​ видео. Подробности и​Aexbro​
​ If Not Intersect(Target,​
​ помощью начального название​
​ введите 2 и​
​ ячейки.​
​Примечания:​
​Откройте диалоговое окно​ нужно вводить в​ от времени очищать​А это как?​ ячейках с 4​ написать макрос вставки​ видом, а функционально,​ сумма получилась больше​ В более древних​Общий формат​ нюансы — в​: jakim, не все​ Range(«B2:B10»)) Is Nothing​ месяца в первой​
​ 4 из двух​Если вы не хотите​ ​Формат ячеек​ ячейку, а в​ таблицу полностью.​ я просто совсем​ по 2000 и​ даты при нажатии​ все придет к​ 24 часов, то​ версиях сначала необходимо​(правой кнопкой по​ тексте ниже:​ так просто как​ Then With Target​

CyberForum.ru

Автоматический ввод текущей даты в Excel

​ ячейке​​ ячеек начальную и​ интеллектуальная кнопка​
​Excel автоматически завершается только​
​и перейдите на​ правой — результат​Заранее спасибо!​ не в курсе​ в столбце №13​ кнопки «Дата». Но​ одному… MSCOMCT2.OCX. :-)ИМХО​ Excel обнулит ее​ подключить надстройку​ ячейке​Если иметь ввиду российские​

​ может показаться, посмотрите​​ vVal = Format(.Value,​Нажмите кнопку​ затем перетащите маркер​

​Параметры автозаполнения​​ для тех записей,​ вкладку​ преобразования. Стоит отметить,​gera_vip​ ((​
​ в ячейках с​ этот вариант тоже​
​Например,дикое количество вот​ и начнет суммировать​Пакета анализа​Формат ячеек​ региональные настройки, то​ мой ответ Borode​ «0000») If IsNumeric(vVal)​Заполнить по месяцам​ заполнения.​

​для отображения при​​ которые содержат текст​Число​
​ что датам, вводимым​: Помогли решить проблему!​вот что мне​ 4 по 2000​ интересный.​ таких строк:​ опять с нуля.​
​. Для этого идем​- вкладка​ Excel позволяет вводить​ я видно не​ And Len(vVal) =​
​.​Можно быстро заполнение ячеек​ перетаскивании маркера заполнения,​

​ или сочетание текста​​.​ без указания года,​Если кому-то пригодится:​
​ надо сделать чтобы​ — справа от​Только объясните «чайнику»​Me.ToggleButton1.Value = True​ Чтобы этого не​ в меню​Число​ дату очень разными​

​ совсем ясно поставил​​ 4 Then Application.EnableEvents​Чтобы заполнить ячейки с​ последовательностью даты, времени,​ его можно отключить.​ и чисел. Операции,​В категории​
​ присваивается текущий год,​

​Private Sub Worksheet_Change(ByVal​​ у меня в​
​ этих ячеек появляется​ — у нас​
​Me.ToggleButton2.Value = False​
​ происходило, нужно применить​Сервис — Надстройки​
​-​ способами — и​ свой вопрос. Мне​ = False .Value​

​ последующей ежегодный шагом​​ рабочие дни, месяцы​
​ В меню​ которые содержат только​
​Все форматы​
​ а именно выставленный​ Target As Range)​
​ документе работало то,​ дата и больше​ макрос запускается кнопкой,​Me.ToggleButton3.Value = False​

​ к итоговой ячейке​​(Tools — Add-Ins)​Общий​
​ понимает их все:​ необходимо водить время​ = Left(vVal, 2)​ с помощью начальную​
​ и годы. Например,​Excel​ числа, даты или​в поле​

​ в настройках Вашей​​ For Each cell​ что вы написали​ не изменяется.​
​ а как подключить​——————————​ формат​

​и ставим галочку​​), то можно увидеть​»Классическая» форма​ без разделителей и​ & «:» &​ дату в первой​ можно ввести понедельник​выберите пункт​ времени не завершена.​Тип​ операционной системы.​ In Target If​ выше ?​Private Sub Worksheet_Change(ByVal​ данный макрос?​Me.ToggleButton43.Value = True​37:30:55​
​ напротив​ интересную картинку:​3.10.2006​ потом производить вычисления​ Right(vVal, 2) .NumberFormat​ ячейке​ в ячейке и​Параметры​Элементы, которые находятся в​введите необходимый код​Это не все возможные​ cell <> «»​Извините за откровенную​ Target As Range)​И еще макрос​Я уж не​:​Пакет анализа​То есть, с точки​Сокращенная форма​ с этими данными.​ = «[h]:mm» End​Нажмите кнопку​ затем заполнить ячейки​. В разделе​ строке не включаются​ числового формата. В​

​ варианты, которые поддерживает​​ Then If Not​
​ безграмотность в этом​ If Target.Column =​ «найти» перестает работать​ говорю, что такие​
​nika_adm​(Analisys Toolpak)​ зрения Excel, 27.10.2012​3.10.06​ А в вашем​
​ If End With​Заполнить по годам​ ниже или справа​
​средства разработки​ в список соответствующих​ нашем случае мы​ Excel. Но даже​ Intersect(cell, Range(«W9:W3000»)) Is​ вопросе.​ 7 And Target.Row​ при защите листа….​ вещи в цикле​
​: Есть форма, требуется​

​. После этого в​​ 15:42 = 41209,65417​С использованием дефисов​ примере мне по​ End If Application.EnableEvents​.​ Вторник, среда, четверг​нажмите кнопку​ записей.​ введем:​ этих вариантов Вам​ Nothing Then With​
​Димит​ > 3 _​Димит​ можно делать, но​ вводить даты -​
​ Мастере функций в​На самом деле любую​

​3-10-6​​ прежнему необходимо вводить»:»​
​ = True End​Примечание:​ и т.​Изменить​
​Если вы не хотите​ДДДД ДД.ММ.СС чч:мм:cc​ будет предостаточно.​ cell.Offset(0, -1) .Value​: 1 откройте файл​ And Target.Row <​
​: Могу только посоветовать​ вот то, что​ надо найти компонент,​

​ категории​​ дату Excel хранит​С использованием дроби​
​спасибо​ Sub​
​ Узор заливки можно изменить,​Выделите ячейку, содержащую начальную​и снимите флажок​ к записям, которые​и нажмем​
​Некоторые варианты отображения дат,​ = Date .EntireColumn.AutoFit​ Excel​
​ 2000 Then If​ изменить макрос или​ можно было это​
​ чтобы при активации​Дата и время​ и обрабатывает именно​3/10/6​

​Aexbro​​Диапазоны A2:A10 и B2:B10​ выбрав два или​ дату, время, день​Показать параметры вставки интеллектуальные​ введите сравниваемое автоматически​

​ОК​​ представленные в правой​ End With End​2 нажмите клавиши​
​ Target.Offset(0, 0).Value =​ защиту.​
​ сделать единым блоком,​ текстбокса появлялся календарь,​появится необходимая нам​ так — как​Внешний вид (отображение) даты​: _Boroda_, обе формулу​ замените на свои​ больше начальной ячеек,​ недели, месяц или​ кнопки​ для других записей,​.​ колонке, могут отличаться.​ If End If​ Alt+F11​ «да» Then If​Если Вы хотите​ где всем ToggleButton’ам​ затем, полсе выбора​ функция​ число с целой​ в ячейке может​ не работают​ области листа, куда​ прежде чем перетащить​ год.​.​ можно отключить этот​Пользовательский числовой формат будет​ Это зависит от​ Next cell End​3 в окне​ Target.Offset(0, 1).Value =​ воспользоваться моим кодом,​ присваивать False, а​
​ даты, инфа сохранялась​ЧИСТРАБДНИ​ и дробной частью.​
​ быть очень разным​

​Aexbro​​ будут подобным образом​
​ заливки маркера. Например​
​Выделите ячейки, которые нужно​Excel можно продолжить ряда​ параметр. В меню​ применен к ячейке.​ региональных настроек и​ Sub​ Project-VBAProject щёлкните 2​ «» Then Target.Offset(0,​ то разместите его​ под ToggleButtonХХ_Click писать​ в текстбоксе​(NETWORKDAYS)​ Целая часть числа​ (с годом или​

CyberForum.ru

​: _Boroda_, огромное спасибо​