Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Строки в VBA / 5 сообщений из 5, страница 1 из 1
24.05.2007, 18:12:02
    #34549483
Fezz
Fezz
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Строки в VBA
Доброго времени суток! Извините, поиск не помог найти подобную тему ..... нужна простейшая вещь - в VBA имеется переменная со значением времени, например "11:03". Необходимо заменить "03" минуты на "00" минут ..... как это можно сделать именно через стринговое обращение последовательно к 4-му и 5-му символу и их замене?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.05.2007, 18:15:53
    #34549501
White Owl
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Строки в VBA
Код: plaintext
1.
2.
3.
    Dim s As String
    s = "11:03"
    Mid(s,  4 ,  2 ) = "00"
    Debug.Print s
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.05.2007, 18:18:17
    #34549509
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Строки в VBA
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Sub sub1()
Dim MyTime As String

    MyTime = "11:03:15"
    
    MyTime = Left(MyTime,  3 ) & "00" & Mid(MyTime,  6 )
    
End Sub
или
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Sub sub2()
Dim MyTime As String

    MyTime = "11:03:15"
    
    MyTime = WorksheetFunction.Replace(MyTime,  4 ,  2 , "00")
    
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.05.2007, 18:22:11
    #34549516
Fezz
Fezz
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Строки в VBA
Хм ..... смех да грех, прога к серваку обращается и сложные запросы выполняет, а элементарно со строками работать я ее еще не научил :) Спасибо, White Owl, все здорово
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.05.2007, 18:23:21
    #34549521
Fezz
Fezz
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Строки в VBA
vbapro ..... твой экзампл мне хорошую идею подсказал, не забыть бы :) спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Строки в VBA / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 282ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2182911]:
 0ms
get settings:
 4ms
get forum list:
 8ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 47ms
get topic data:
 6ms
get forum data:
 1ms
get page messages:
 21ms
get tp. blocked users:
 1ms
others: 190ms
total:  282ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]