Добрый день!  
 
Просьба подсказать, как реализовать выбор из списка значений прямо из ячейки?  
Сделал Проверку значений по списку, список на другом листе.    
Но хочется, чтобы автоматически подставлялась первое подходящее значение.  
 
Сейчас же, если не выбрано конкретное значение и что-то введено в ячейку, вылетает предупреждение. Может быть можно переопределить обработчик события, по которому вылетает сообщение?

Увы, но 502 Bad Gateway...  
 
{quote}{login=Казанский}{date=27.09.2012 05:54}{thema=}{post}Установите у формы свойство ScrollHeight больше, чем Height, и ScrollBars = 2, и получите вертикальную прокрутку.{/post}{/quote}оно! спасибо!

Добрый день!  
 
Подскажите, пожалуйста, как сроллить форму.  
Создал UserForm. На нее с помощью мастера  добавил ScrollBar.  
В ходе работы с формой у меня динамически расширяется форма вниз: добавляются строки в соотв. с выбранными значениями. В один прекрасный момент значений становится так много, что все они не умещаются на экране.    
Что мне надо написать в обработчике событий, чтобы можно было перемещаться (вертикально скроллиться) по форме?

{quote}{login=Казанский}{date=26.09.2012 02:59}{thema=}{post}  
 
Ну разумеется, у "ничто" нет метода или свойства AddItem :))Наверно, при инициализации надо  
 
Set mComboBox = userform1.combobox1{/post}{/quote}  
 
Ага, спасибо!

но не понимаю, почему не работает    
mComboBox.AddItem (tmp)    
 
в той же самой процедуре.  
mComboBox объявлен в классе как  
 
Private mComboBox As ComboBox  
 
В инициализации присваиваю    
Set mComboBox = Nothing  
 
А затем прогоняю по всем ячейкам range и делаю добавление:  
   Dim tmp As Variant  
   For Each tmp In ContentList  
       mComboBox.AddItem (tmp)  
   Next tmp  
 
И тут выскакивает Run-time error '91'  
Object variable or with block variable is not set  
 
Опять не знаю, что делать.    
 
Выскакивает ошибка

{quote}{login=EducatedFool}{date=26.09.2012 12:04}{thema=}{post}Вы или файл не тот прикрепили, или я чего-то не понимаю  
(в прикреплённом файле нет ни намёка на модуди класса, и приведённый вами код)  
 
Причин ошибки может быть несколько:  
1) не создан экземпляр класса DataList (MyDataList = Nothing)  
2) ошибка внутри процедуры Public Sub SetDataList  
3) нет активного листа - Range("A1:A6") дает ошибку  
4) может, убрать скобки?  MyDataList.SetDataList Range("A1:A6")  
 
 
Прикрепите «правильный» файл - посмотрим.{/post}{/quote}  
 
Уже вижу, что п.4 сработал  
и п.2. сработал: в процедуре пытаюсь очистить переменную типа комбобокс.

Да, не тот файл, спасибо! Во вложении верный файл

уважаемый доброфорум, прошу помощи с одной ситуацией.  
имеется класс DataList в котором есть метод    
Public Sub SetDataList(SourceRange As Range)  
 
В коде модуля пытаюсь передать в этот метод объект типа Range  
MyDataList.SetDataList (Range("A1:A6"))  
 
При исполнении вылетает ошибка:  
Run-time error '424':  
Object required

Подскажите, пожалуйста, как добавить обычную линию на пользовательскую форму в Excel 2010.  
 
Понимаю всю абсурдность вопроса, но никак не могу найти линию ни на Toolbox, ни в Additional Controls.

Добрый день!    
 
Тема, вроде бы, типовая, и должна уже была быть, но поиск не дал ответа на мой вопрос.  
 
Компилятор ругается на следующий код:  
 
sub T(expr as string)  
   dim Source,s1 as string  
   Source = expr  
   s1 = ""  
 
   For i = 1 To Len(Source)  
       s1 = s1 + Source(i)  
   Next i  
 
end sub  
 
Выделяет Source и пишет, что "Expected array". Возникает вопрос, как это обойти. Мне нужен посимвольный разбор строки.

В одной ячейке у меня имеется фраза в непонятной кодировке.  
Например, РєРѕРїРёСЏ  
 
Мне нужно написать макрос, который возьмет это значение, подставит в форму на сайте http://www.artlebedev.ru/tools/decoder/, нажмет "Расшифровать", получит фразу в нормальной кодировке, и подставит в сосденюю ячейку. В этом же примере, "копия".  
 
Помогите, пожалуйста. Главная трудность: как сказать экселю, что нужно подставить в форму и забрать ответ.

Добрый день!  
 
Подскажите, долго ли человеку, знающему макросы в Excel, перейти на макросы в OpenOfficce? насколько идентичны языки там и там?

{quote}{login=Юрий М}{date=29.01.2011 12:11}{thema=}{post}Используйте именованный диапазон и ссылайтесь на него.{/post}{/quote}  
 
точно. спасибо!

Добрый день!  
 
Помогите, пожалуйста, разобраться со следующей ситуацией:  
 
Имеется книга (excel 2003) с двумя листами (лист1, лист2).  
 
На лист1 список клиентов с некоторыми "светофорами" в соответствующей строке.    
Светофор - это фигура-круг с гиперссылкой на лист2.  
 
На лист2 те же клиенты, но с подробной информацией о них. соответственно, гиперссылка с лист1 ведет на соответствующего клиента на лист2.  
 
Но если на лист2 произвести сортировку клиентов, то получается, что гиперссылки сбиваются.  
 
Например, гиперссылка была на Лист2 B2. Там был клиент Газпром. После сортировки там стал клиент Роснефть. Получается, что на лист1 напротив Газпром по факту гиперссылка на лист2 на Роснефть.  
 
Вопрос: как сделать "динамичную" гиперссылку? Т.е. после сортировки гиперссылка должна измениться.  
 
PS поиск не дал нужных результатов. В основном там про другое.  
Желательно без макроса.

{quote}{login=Казанский}{date=01.11.2010 03:52}{thema=}{post}Попробуйте  
 
Sub БобруйскКрасным()  
Dim di As Chart, x, n As Long  
For Each di In Charts  
   n = 1  
   For Each x In di.SeriesCollection(1).XValues  
       If x = "Бобруйск" Then  
           di.SeriesCollection(1).Points(n).MarkerBackgroundColor = vbRed  'можно убрать  
           di.SeriesCollection(1).Points(n).MarkerForegroundColor = vbRed  'можно убрать  
           di.SeriesCollection(1).Points(n).Interior.Color = vbRed  
           Exit For  
       End If  
       n = n + 1  
   Next  
Next  
End Sub{/post}{/quote}  
 
Спасибо,    
Не сработало для ряда 2 и ряда 3  
И еще, подскажите, как сделать For Each di In Charts если встречается случай нескольких диаграмм на 1 листе?

{quote}{login=excellerator}{date=01.11.2010 03:25}{thema=Re: }{post}{quote}{login=Казанский}{date=01.11.2010 03:24}{thema=}{post}1. Диаграммы - отдельные листы в книге?  
2. "Орел","Пенза","Москва","Бобруйск" - это категории (по оси Х)?{/post}{/quote}  
 
1. Да, диаграммы - отдельный листы  
2. Да, это категории по оси Х. Беруться из определенного фиксированного диапазона.{/post}{/quote}  
 
забыл уточнить: vba excel 2003

{quote}{login=Казанский}{date=01.11.2010 03:24}{thema=}{post}1. Диаграммы - отдельные листы в книге?  
2. "Орел","Пенза","Москва","Бобруйск" - это категории (по оси Х)?{/post}{/quote}  
 
1. Да, диаграммы - отдельный листы  
2. Да, это категории по оси Х. Беруться из определенного фиксированного диапазона.