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

Страницы: 1
Добавление нового дня в ежедневник, VBA
 
а как можно добавить новый день просто с пустыми полями, а не со временем? понравился файл пользователя C.M.
Макрос по созданию нового листа из ячейки
 
Jungl, спасибо.
Макрос по созданию нового листа из ячейки
 
Jungl, я совершенно не соображаю в кодах, это где нужно прописать?
Макрос по созданию нового листа из ячейки
 
не могу поправить макрос по созданию нового листа из ячейки, мне нужно, чтобы только из ячеек столбца А создавался новый лист, а у меня создается из последующих еще, помогите пожалуйста.
Код
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo A
r_ = Range("a" & Cells.Rows.Count).End(xlUp).Row
If Target.Row = r_ And Range("a" & r_) <> "" Then
    n_ = Format(Range("a" & r_), "MMMM YYYY")
    s_ = ThisWorkbook.Sheets.Count
    Sheets("Øàáëîí").Copy After:=Sheets(s_)
    Sheets(s_ + n).Name = n_
End If
Exit Sub
A: MsgBox "Ïðîâåðü, íåò ëè ëèñòà ñ òàêèì èìåíåì."
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error GoTo A
r_ = Range("a" & Cells.Rows.Count).End(xlUp).Row
If Target.Row <= r_ And Range("a" & r_) <> "" Then
n_ = Format(Target, "MMMM YYYY")
    Sheets(n_).Activate
End If
A:
End Sub

Как сделать минидиаграмму в ячейках
 
Здравствуйте. Возникла потребность в представлении наглядном в какой стадии заказ. есть таблица, в которой отмечено "+" что готово, "-" что не готово, "*" что в работе.

Можно сделать в ячейках либо диаграммув ячейке, зависящую от этих значений "+", "-", "*", либо количесвто процентов сделанной работы?
Страницы: 1
Наверх