Спасибо большое, Виктор)

Всем привет)

Есть массив данных, из него надо выбрать только те напротив которых стоит знак "+".
Найти к сожалению не смог(

Заранее спасибо.

Андрей

Да. Он самый) приветствую)

Здравствуйте, Юрий
застыдили )  забыл диапазон закрепить )
ну я тоже подумал про баг. значит не ошибся.
Данные действительно выгружались из mysql базы. видимо произошло какое то волшебство  

Спасибо всем.

Да вот нет ( не догадался, несмотря на прошлый опыт.

Добрый день, Виктор. Рад вас видеть )

День добрый.
Есть значение Х. Есть таблица где значение Х есть (Х=Х=true). Но в некоторых случаях функция ВПР не находит это значение.

Подробности в примере.
Вопрос- почему?

З.Ы. Х - дата
Заранее большое спасибо.

Да не) я на шарпе пишу, на vba уже неинтересно )

спасибо большое)

не, не снят. чего то запутался я в трех соснах) вообщем та же ошибка, решения я не знаю. прошу помощи)

вопрос снят) пытался метод в листе сделать.

День добрый.  
 
Есть метод    
 
Sub DrawTest(r As Range)  
r.Interior.Color = vbRed  
End Sub  
 
Передаю туда напрямую ячейку:  
Sub test1()  
DrawTest (Cells(7, 14))  
End Sub  
 
все работает.  
 
Но при попытке передать range:  
Sub test2()  
Dim r As Range  
Set r = Cells(7, 14)  
DrawTest ®  
End Sub  
 
Выдает ошибку. Как победить?    
 
Заранее спасибо. Андрей

вопрос снят. Найти и заменить "~*" все решило. Спасибо )    
 
З.Ы. всем привет)

День добрый, есть массив текстовых данных в которых встречается знак *. Надо его ликвидировать. Банальное "найти и заменить" результата не дало, равно как и Cells.Replace what:=Chr(42), replacement:=""  
 
Подскажите как с этим зловредным символом работать. Спасибо.  
 
З.Ы. Посимвольно просматривать ячейки не могу, в виду большого их количества.

на все UserForm_Terminate() вешайте вставку времени в ячейку. время всегда будет соответствовать времени закрытия последней формы

сначала надо ваш пример разбить на столбцы вида: вид, модель, марка и т.д.  
 
потом уже искать совпадения.  
 
бить на столбцы можно макросом если будут четкие критерии аля "модель всегда начинается с символов ВВК и заканичается символом "[" "

1. массив на лист  
2. r=range(...).Find(x).row  
3. Profit

{quote}{login=Дъмитръ}{date=07.12.2010 10:50}{thema=}{post}А мониторы? :){/post}{/quote}  
к своему стыду должен признать что да. Мониторы разные - цвета по разному показывают. Не знаю почему не проверил это в первую очередь) Извините за беспокойство. Спасибо)

одинаковые версии екселя, винды, цветовые схемы тоже идентичны (

День добрый. Есть диаграмма - на одном компьютере разноцветная красивая, открываю на другом - цвета совсем другие. И совсем уже не красиво.  
 
Подскажите пожалуйста куда копать и как победить. Заранее спасибо.

{quote}{login=Муля}{date=02.12.2010 12:43}{thema=}{post}Ув. Костик!  
ВАм вот это надо сделать. См. у файле. Там же см. адресс темы.  
У меня когда то тоже такое было. Срабатывает, возвращая окну стандартный вид.  
С ув. Муля!{/post}{/quote}  
 
во) спасибо большое. а то у меня такая же беда была

Hugo: вот как раз ваш второй вариант подходит для выделения строк (как и запрашивалось изначально)

эдак он каждую ячейку обрабатывать будет?  
 
может так лучше?  
 
Sub rt()  
Dim r As Long  
Dim s As String  
Dim rRange As Range  
Dim arr  
Set rRange = Selection  
s = rRange.Address  
arr = Split(s, ",")  
End Sub  
 
выдрать числа из массива надеюсь сами сможете)

гг) подсказка понятие растяжимое, да? :)

>... т. е. вот так ???  
>... я ничего не упустил ??  
 
Ну а что за переменная wbBook? Где объявляется, где вычисляется?  
 
Dim wb As Workbook  
Dim wbBook as boolean  
wbbook=false  
For Each wb In Workbooks  
if wb.name="Продажи.xlsx" then  
wbBook=true  
exit for  
end if  
Next wb  
 
как то так например

а подсказка такая: сделать проверку на то открыта ли книга в данный момент. Если закрыта - ваш код. Если уже открыта то строку  
Set TempWb = Workbooks.Open(Filename:=iPath & "Продажи.xlsm", UpdateLinks:=False, ReadOnly:=True)  
заменить на    
Set TempWb = Workbooks("Продажи")  
 
как то так.

Спасибо )

День добрый. Макросом получил строку http://www.phones.megafon.ru/ надо открыть ее в браузере(любом). Подскажите пожалуйста как.  
 
Заранее спасибо. Андрей.

подскажите как в 2007 это заставить работать? библиотеки такой нету

{quote}{login=vikttur}{date=11.11.2010 09:08}{thema=}{post}  
Многие приходящие на форум считают себя знатоками. После двух-трех недель эта уверенность исчезает :){/post}{/quote}  
 
+1. Я когда пришел сюда думал что знаю эксель очень хорошо) Сейчас с улыбкой вспоминаю то свое мнение)  
 
А по поводу работы расскажу историю. Жил да был логист на большом предприятии и большая часть его работы заключалась в расчетах всяких разных табличных данных в екселе. Делал он ее долго муторно, вообщем решило руководство нанять ему помощника в помощники, дабы помощник всей этой муторной работой занимался, а логист творил. Наняли выпускника института с неплохим знанием ексель (ну как неплохим - формулы знал мало-мало, вба вообще не знал, но все равно лучше чем 99% остального планктона).  
Поначалу выпускник действуя так как научил его мудрый наставник обрабатывал все эти данные таким же муторным способом. Занимало это процентов 80% всего его рабочего времени. Потом там формулку ввернул, тут приемчик применил, а какую то табличку домой на выходные утащил и там с ней пошаманил. Вообщем скоро довел всю эту работу практически до уровня: вставил на первый лист-нажал Ф9-погодил минуты две-на последнем листике результат нужный получил. Да, это было бестолково, грозмоздко, на неоптимальных формулах, но работало (а как говорят в армии - если это глупо, но работает - значит это не глупо) и вся работа по всей этой обработке стала занимать 40-60 минут в день без лишних напрягов.  
И вроде бы все хорошо и все довольны должны быть. Но реальность внесла свои коррективы. Начальство эти изменения увидело, оценило (а тут еще и кризис на дворе наступил) и приняло мудрое решение. Приказало молодому специалисту научить старого пользоваться всеми эти шаманскими табличками, старому логисту поднять зарплату за освоение новых горизонтов, ну а нашего героя за ненадобностью сократить. Все.

Firebird/InterBase® driver};Dbname= p"  замените на Firebird/InterBase® driver};Dbname= " & p