Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Рандомное проставление значения в диапазоне
 
Добрый день!

Есть диапазон на листе B7:Z13 , нужно чтобы при нажатии на кнопку, проставлялась цифра 1 по следующему правилу: в одной колонке должна быть одна цифра, расстояние по горизонтали между цифрами должно быть не менее 4 ячеек.


Помогите с кодом генерации.
Изменено: Aleksey63 - 07.02.2019 10:35:57
После закрытия предпросмотра выполнить скрытие активной книги
 
Подскажите, из формы вызываю предварительный просмотр
Код
.PrintPreview
Если я его закрываю или сделаю печать, у меня открывается моя скрытая книга.
Где мне нужно указать повторное скрытие книги? или может есть какая проверка закрытия предварительного просмотра печати?

Попробовал указать скрытие при активации книги, т.е.
Код
Private Sub Workbook_Activate()
        Application.Visible = false
End Sub
но почему-то не срабатывает
Запретить форматирование при вставке
 
Есть много операций, заставляющих копировать и вставляют данные из одного файла в другой.
Как можно запретить форматирование ячейки? а ещё лучше, как копировать только содержимое и тип ячейки, чтобы при вставке в нужную ячейку, вставленный текст принимал её форматирование?
Интересует реализация в коде.
Проверить входит ли выбранная дата в диапазон дат
 
Есть список людей с датами приёма на работу и датой увольнения.
Есть список дат в combobox.
Нужно чтобы в ведомость на второй лист попадали только те, кто работал в выбранный день.

Получится условие: Если ВыбраннаяДата находится в промежутке между Дата1 и Дата2, то добавляем в ведомость, иначе пропускаем человека.

Нашёл много тем, где уже обсуждалось, но там используются сами формулы на листе, а мне это не подходит.
Какая функция даёт проверку нахождения между двумя датами? или одной функцией не обойтись?

Пробую как
Код
IF Число>=Cells(1,1).Value and Число<=Cells(2,1).Value then ...
else
...
End if
Изменено: Aleksey63 - 23.04.2017 17:24:35
Вывести диапазон дат в combobox
 
Помогите вывести диапазон дат в combobox
Диапазон должен начаться с ячейки E2 и закончится датой из последней ячейки столбца F.
Вывести просто весь столбец с уникальными значениями у меня получилось, а вот такой диапазон не пойму как.
Соединить уникальные значения из ячеек в одну
 
Есть столбец с датами:
29.04.2016
30.04.2016
31.04.2016
01.05.2016
Нужно чтобы файл сохранялся под именем: От 29,30,31,1 апреля 2016 года.xls

сделал так
Код
Data1 = Split(.Range("F1"))
Data2 = Split(.Range("F2"))

   fName = ThisWorkbook.Path & "\Архив\" & "От " & Left(Data1(0), 2) & "," & Left(Data2(0), 2) & " апреля " & Right(Data1(0), 4) & "года" & ".xls"
 
   With ActiveWorkbook
        .SaveAs Filename:=fName, FileFormat:=xlOpenXMLWorkbook
        .Close
    End With
результат получил От 29,30 апреля 2016 года.xls

Как мне сформировать имя, если у меня будет 10дат, например и как преобразовать число месяца первой даты в слово?
Изменено: Aleksey63 - 22.04.2017 12:33:41
Экспорт данных листа в новую книгу при каждом новом импорте
 
Добрый вечер. Подскажите на примере, как реализовать мою идею?
Есть функция импорта. По нажатию на кнопку нас просят выбрать книгу excel, откуда произвести экспорт. После выбора, данные из первого по счёту листа выбранной книги, копируются и вставляются в текущую открытую книгу на лист БазаДанных.
Нужно, чтобы при каждом новом таком импорте, старые данные на листе БазаДанных автоматически экспортировалась в excel файл в определённую папку и имели имя файла: БазаДанных_Даты.xls

На листе БазаДанных есть столбец с датами вида 29.10.2015
Необходимо определить уникальные даты в столбце и вывести их в имя файла по следующему шаблону: БазаДанных_29,30,31,1_октября_2015xls.

Пример книги, где есть функция импорта и книги из которой будут экспортироваться данные прикрепил.
Там же в архиве папка, куда необходимо сохранять файлы с экспортируемыми данными.
Изменено: Aleksey63 - 21.04.2017 20:49:09
Найти данные по условию и вывести на печать по шаблону
 
Здравствуйте!

Прошу помощь показать как реализовать мою цель.
Например, есть база данных, состоящая из 3 столбцов:
Имя;пол;cтаж.

Есть 2 кнопки на форме, при нажатии на первую - вывести на печать список тех, у кого стаж 5 и пол "М", при нажатии на вторую - вывести у кого стаж 1 и пол "Ж".
Печататься должно по форме, которую разработал.
Файл с базой, формой, кнопками прикрепил.
Страницы: 1
Наверх