| Цитата |
|---|
| написал: Sub FillRegistry() Dim dic As Object Set dic = CreateObject("Scripting.Dictionary") dic.Item(Sheets("Маленький").Range("D1").Value) = 0 dic.Item(Sheets("Длинный").Range("D1").Value) = 0 dic.Item(Sheets("Большой").Range("E2").Value) = 0 If dic.Exists(Empty) Then dic.Remove Empty If dic.Count Then With Sheets("РЕЕСТР") With .Cells(.Rows.Count, 1).End(xlUp).Cells(2, 1).Resize(dic.Count) .Columns(1).Value = Date .Columns(2).Value = Application.Transpose(dic.Keys()) End With End With End IfEnd Sub |
Заполнение реестра адресатов отправленных писем с других листов
Заполнение реестра адресатов отправленных писем с других листов
|
25.08.2022 16:44:15
Здравствуйте! в экселе не особый эксперт, но может с чьей-либо подсказкой и смогла бы разобраться.
Есть документ с адресами и страницы с конвертами для печати определенного размера. Нужно сделать реестр распечатанных писем. Сегодня я отправляла 2 письма и печатала 2 конверта. Нужно что бы адресаты распечатанных вбивались в реестр в колонку "Кому".
Изменено: - 25.08.2022 17:04:51
|
|
|
|
|
ВПР И ПОИСКПОЗ
ВПР И ПОИСКПОЗ
ВПР И ПОИСКПОЗ
ВПР И ПОИСКПОЗ
|
29.07.2022 21:23:55
Добрый вечер! Уже не первый день ломаю голову в чем может быть проблем? даже по новому таблицу сделала, но по истечению нескольких дней при вводе нового адреса на листе "Адреса" опять идет заполнение из других граф.
В данной таблице при выборе адресата на листах "Маленький" и др. все заполняется правильно автоматически, но если выбрать ГЛХУ "Сморгонский лесхоз" -заполняет не верный адрес. А в новой таблице при вводе нового адреса такая же проблема-вбивает автоматом вместо нужного адреса значения из других ячеек. В чем может быть проблема? |
|
|
|
|
Зная дату и фамилию, записать значение в ячейку пересечения этих двух параметров
Зная дату и фамилию, записать значение в ячейку пересечения этих двух параметров
|
13.01.2021 21:30:22
Добрый вечер!Помогите разобраться,ничего не могу найти по этому поводу.Есть табель рабочего времени на n работников.Нужно расставить по итогу месяца все больничные (б),трудовые отпуска(о) и отпуска без сохранения з/п (а). Что бы не искать глазами нужную ячейку,нужно зная дату и фамилию в ячейку пересечения этих двух параметром поставить нужную букву.Т.е. хочу сделать 3 ячейки:1-выпадающий список фамилий,2-выпадающий список дней месяца,а 3-прописывать нужную букву и чтоб она автоматом переносилась в нужную ячейку табеля.помогите,пожалуйста, в данном вопросе
|
|
|
|
|
