задачка для vba excel гуру :)

Программирование на Visual Basic for Applications
number1215
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 07.03.2006 (Вт) 14:47

задачка для vba excel гуру :)

Сообщение number1215 » 07.03.2006 (Вт) 14:57

может кто подскажет из знатоков vba excel:

есть таблица - 1 столбец в котором список названий - каждое название (допустим, "полупроводниковые приборы") - ссылка ... т.е. если на него нажать перейдешь на какой-то url

нужно в соседнюю колонку вывести сами url'ы


пример здесь: http://number1215.narod.ru/

к сожалению я совершенно незнаком с vba, а задачку решить нужно срочно, если можно то прямо скипт киньте плиз ... думаю, он всего на несколько строк - для знающих людей на 2 минуты

заранее спасибо

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 07.03.2006 (Вт) 15:17

WorkSheet.Hyperlinks(<i>).Address и WorkSheet.Hyperlinks(<i>).Range тебе помогут.
Lasciate ogni speranza, voi ch'entrate.

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 07.03.2006 (Вт) 15:18

Что-то типа такого:
Код: Выделить всё
With ActiveSheet
For I = 1 To .Hyperlinks.Count
  .Hyperlinks(I).Range.Offset(0,1).Value = .Hyperlinks(I).Address
Next I
End With
Lasciate ogni speranza, voi ch'entrate.

number1215
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 07.03.2006 (Вт) 14:47

Сообщение number1215 » 07.03.2006 (Вт) 15:57

alibek писал(а):Что-то типа такого:
Код: Выделить всё
With ActiveSheet
For I = 1 To .Hyperlinks.Count
  .Hyperlinks(I).Range.Offset(0,1).Value = .Hyperlinks(I).Address
Next I
End With


сорри, за тупой вопрос ... а где здесь буква столбца задается?

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 07.03.2006 (Вт) 16:00

А ты запусти код-то...
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

number1215
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 07.03.2006 (Вт) 14:47

Сообщение number1215 » 08.03.2006 (Ср) 15:37

спасибо всем :)
особенно alibek'у - реально выручил :D


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 97

    TopList