|
|
| Тема |
 активира клетка съдържаща днешна дата |
|
| Автор |
vector_m (непознат
) |
|
| Публикувано | 13.01.11 21:00 |
|
|
|
В sheet1 в А1:А365 имам дати съответно от 01.01.2011 до 31.12.2011.
Как може да се направи така, че при активиране на sheet1 да направи активна клетката ,която съдържа текущата дата (днешната).
Сътворих този код но нищо не се получи.
For j = 1 To 366
If Day(Sheets("sheet1").Range("v1")) = (Sheets("sheet1").Cells(j, 1)) Then
Sheets("sheet1").Cells(j, 1).Activate
End If
Next j
А след това да селектира целия ред
ActiveCell.Rows("j,1").EntireRow.Select
БЛАГОДАРЯ ВИ!
Редактирано от vector_m на 13.01.11 21:02.
| |
| |
| 
|
|
