Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: VBA Добавлено: 28.01.03 12:04  

Автор вопроса:  ak

подскажите плиззз...

У меня есть столбец данных(время)..в Excel.....

нужно заменить его весь...т.е. прибавить к этому времени 4 часа

Как это сделать я хз.....

Ответить

  Ответы Всего ответов: 2  

Номер ответа: 1
Автор ответа:
 Alex&r



Вопросов: 10
Ответов: 105
 Профиль | | #1 Добавлено: 28.01.03 13:01

Dim TimeOld, TimeInterval
Sheets("Лист...").Select
i = 1
Do
TimeInterval = TimeValue("4:00:00")
TimeOld = Cells(Row, Column).Value
TimeOld = TimeOld + TimeInterval
Cells(Row, Column).Value = TME
i = i + 1
Loop While Cells(Row, Column) <> ""

 

Ответить

Номер ответа: 2
Автор ответа:
 Alex&r



Вопросов: 10
Ответов: 105
 Профиль | | #2 Добавлено: 28.01.03 13:03

Опечатка!

Cells(Row, Column).Value = TimeOld

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам