Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / с Excell работаю / 13 сообщений из 13, страница 1 из 1
19.01.2004, 11:19
    #32379905
Артист
Артист
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
с Excell работаю
Код: plaintext
1.
Set c = ActiveWorkbook.Sheets( "такойто" ).Range( "такойто" ).Find( "нужноевалуе" , LookIn:=xlValues)
fadr = c.Address(ReferenceStyle:=xlR1C1)

как из адреса получить строку и столбец в раздельных переменных?
или как правильно сдвинуть найденный адрес на например 1 столбец?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2004, 11:56
    #32380001
Владимир Саныч
Владимир СанычПривилегированный пользователь
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
с Excell работаю
Вопросы за первый класс.

авторкак из адреса получить строку и столбец в раздельных переменных?

Дано s="R4C2".

dim i as integer
i=instr(s,"C")
строка=mid(s,2,i-2)
столбец=mid(s,i+1)

авторили как правильно сдвинуть найденный адрес на например 1 столбец?

left(s,i) & cstr(столбец+1)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2004, 12:07
    #32380026
Артист
Артист
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
с Excell работаю
спасибо, я чего то строками не подумал оперировать :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2004, 12:08
    #32380028
Витал
Витал
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
с Excell работаю
1. авторкак из адреса получить строку и столбец в раздельных переменных?

sRow = Range(fadr).Cells(1,1).Row ' номер строки первой ячейки диапазона
sCol = Range(fadr).Cells(1,1).Column ' номер колонки первой ячейки диапазона

2. авторили как правильно сдвинуть найденный адрес на например 1 столбец

Range(fadr).Offset(0,1)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2004, 12:21
    #32380052
Витал
Витал
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
с Excell работаю
Кстати, Привет!!! Артист!!! Уже в Москве Ексель терзаешь?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2004, 12:28
    #32380065
Артист
Артист
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
с Excell работаю
ага, тока в аське пока не буду, позже :)
малясь запутался, хоть и делал по твоёму :)
как ДР ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2004, 12:30
    #32380071
Витал
Витал
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
с Excell работаю
ДР еще активно продолжается. Пока еще не просох и не предвидиться в ближайшие дни! :о)))

А в чем запутался?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2004, 12:36
    #32380078
Артист
Артист
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
с Excell работаю
Offset.Resize меня с толку сбило ...
щас разобрался, спасибо! а вот через строки как Саныч, честно и в
голову не пришла такая мысль :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2004, 12:58
    #32380113
Витал
Витал
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
с Excell работаю
Напрасно я не вник сразу в твою задачу. Все проще. Не надо вычислять адрес и по нему номер строки:

Код: plaintext
1.
2.
Set c = ActiveWorkbook.Sheets( "такойто" ).Range( "такойто" ).Find( "нужноевалуе" , LookIn:=xlValues)
c.Cells( 1 , 1 ).Value ' значение найденной ячейки
c.Cells(1,2).Value ' значение ячейки справа от найденной
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2004, 13:24
    #32380169
Артист
Артист
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
с Excell работаю
спасибо,
как нить с меня пиво :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2004, 13:34
    #32380193
Витал
Витал
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
с Excell работаю
Прокиснет пока до Питера доедет!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2004, 13:43
    #32380219
Артист
Артист
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
с Excell работаю
прокиснет то нет,
а вот кончится может
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2004, 14:07
    #32380284
Витал
Витал
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
с Excell работаю
Тогда бегу в соседний магазин и... "Твое здоровье!!!"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / с Excell работаю / 13 сообщений из 13, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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