Страницы: 1
RSS
формат ячейки вопрос
 
как будет выглядеть команда в макросе такая  
присвоить требуемый формат ячейке стоящей левее активной ячейки  
 
как присвоить формат активной ячейке вроде понятно например ActiveCell.NumberFormat = "h:mm;@" и как влево смещение ActiveCell.Offset(0, -1).Select    
 
а вот как одной строкой ?
 
Выбирайте любую из трёх равнозначных строк:  
 
ActiveCell.Offset(, -1).NumberFormat = "h:mm;@"  
ActiveCell.Previous.NumberFormat = "h:mm;@"  
ActiveCell(1, 0).NumberFormat = "h:mm;@"
 
так попробовать ActiveCell.Offset(0, -1).NumberFormat = "h:mm;@" ?
 
благодарю спасибо
 
еще вопрос по поводу ячейки    
как прописать условие Если активная ячейка НЕпустая    
 
как пустая так  
If ActiveCell.Value = "" Then  
 
а как НЕпустая ?
 
ActiveCell.Value <> ""    
 
IsEmpty(ActiveCell)
 
if Not IsEmpty(ActiveCell)
 
спасибо
 
последний вопрос касающийся активной ячейки  
как правильно написать чтоб при выделении заполненной ячейки в столбце и запуске макроса макрос нашел 1-ю незаполненную ячейку в столбце  
 
Sub Zzz()  
ActiveCell.Offset(......., 0).Select  
End Sub  
 
что нужно написать в ....  ?
 
Cells(Rows.Count, ActiveCell.Column).End(xlUp).Offset(1).Select  
 
вроде получилось так  
 
а как то проще можно ?
 
Sub Zzz()  
Dim r as range  
' первая незаполненная вверху  
Set r  = Cells(ActiveCell.CurrentRegion.Row-1, ActiveCell.Column)  
' первая незаполненная внизу  
Set r  = Cells(ActiveCell.CurrentRegion.Rows.Count + ActiveCell.CurrentRegion.Row, ActiveCell.Column)  
End Sub
Редко но метко ...
 
GIG_ant  чего-то не работает
 
{quote}{login=krol44}{date=31.10.2011 07:10}{thema=}{post}GIG_ant  чего-то не работает{/post}{/quote}  
Потому что GIG_ant ленивый. Или рабочий день закончился :)
Страницы: 1
Читают тему
Наверх
Loading...