Как сделать сайт:
  HTML
  JavaScript
  PHP
  CMS
Microsoft Office:
  Word
  Excel
  VBA
Просто о сложном
Список форумов on-line-teaching.com on-line-teaching.com
Онлайн курсы MS Office: Word, Excell. Как сделать сайт: HTML, JS, PHP
 
 FAQFAQ   ПоискПоиск   ПользователиПользователи   ГруппыГруппы   РегистрацияРегистрация 
 ПрофильПрофиль   Войти и проверить личные сообщенияВойти и проверить личные сообщения   ВходВход 

Подскажите пожалуйста, с поиском в строке, еще 1 вопрос!

 
Начать новую тему   Ответить на тему    Список форумов on-line-teaching.com -> Excel: общие вопросы
Предыдущая тема :: Следующая тема  
Автор Сообщение
stan
Prizivnik - draftee
Prizivnik - draftee


Зарегистрирован: 13.06.2008
Сообщения: 3

СообщениеДобавлено: Пт Июн 13, 2008 9:48 am    Заголовок сообщения: Подскажите пожалуйста, с поиском в строке, еще 1 вопрос! Ответить с цитатой

Вопрос состоит в том, что имеется строка, например: "C:\Documents and Settings\Администратор\Рабочий стол\документы\dx000001.blg", необходимо получить имя открываемого файла, т.е. dx000001,естесственно имя файла может меняться в зависимости от выбранного файла пользователем,путь к файлу храниться в локальной переменной, каким образом это возможно сделать?..
P.S. Заранее благодарю за ответ и помощь...


Последний раз редактировалось: stan (Пн Июн 16, 2008 8:08 pm), всего редактировалось 1 раз
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail
AsIs
captain
captain


Зарегистрирован: 27.01.2006
Сообщения: 250
Откуда: СПб

СообщениеДобавлено: Вс Июн 15, 2008 2:01 pm    Заголовок сообщения: Ответить с цитатой

Например вот так:
Код:
Sub ExtractFileName()
    Dim strPath As String, strFileName As String
    Dim intC As Integer
   
    strPath = "C:\Documents and Settings\Profile\dx000001.blg"
    intC = Len(strPath)
    Do Until Mid(strPath, intC, 1) = "\"
        strFileName = Mid(strPath, intC, 1) & strFileName
        intC = intC - 1
        If intC = 0 Then Exit Do
    Loop
    MsgBox (strFileName)
End Sub


PS: с библиотеками .Net Framework все было бы на порядок короче...
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail Посетить сайт автора
stan
Prizivnik - draftee
Prizivnik - draftee


Зарегистрирован: 13.06.2008
Сообщения: 3

СообщениеДобавлено: Пн Июн 16, 2008 5:29 pm    Заголовок сообщения: Ответить с цитатой

А как пользоваться такой библиотекой?
P.S. Заранее благодарю...Спасибо за ответ...
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail
Показать сообщения:   
Начать новую тему   Ответить на тему    Список форумов on-line-teaching.com -> Excel: общие вопросы Часовой пояс: GMT + 2
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах


Powered by phpBB © 2001, 2005 phpBB Group
Русская поддержка phpBB