Recent content by Porterbery

Ещё вот так пробовал, потомуц что в конечном итоге-то мне надо чтобы мой макрос заменял все нулевые значения не нулевыми <1 с определенной строки. Тоже не получается. Sub Макрос2() Dim Строкаввода As Integer Строкаввода = InputBox(Prompt:="Введите строку с которой наужно начинать...

Sub Макрос1() Dim Строкаввода As Integer Строкаввода = InputBox(Prompt:="Введите строку с которой наужно начинать замену", _ Title:="Радактирование LAS-файла", _ Default:="194") Range("Chr(34) & A & chr(34) & Строкаввода").Select...

Блин в экселе есть и такое?:) Спасибо. Теперь можно будут сделать мою работу быстрее, но мне уже поставили задачу намного сложнее этой....буду читать. Надо написать прогу, чтобы в экселе была кнопочка загрузить файл *.dbf и в этом файле некоторая последовательность действий...результат заносился...

похоже что никто ничем мне помочь не может:( все равно спасибо за попытку...

интервал CMKOL 2.00 Отсутствует 10.00 Отсутствует 2.00 Отсутствует 2.60 Отсутствует 9.00 Отсутствует цемент за колонной 2.00 Сплошной 15.20 Сплошной 8.20 Сплошной 1.80 Сплошной 9.60 Сплошной 21.40 Сплошной 6.60 Сплошной 2.00 Сплошной 20.80 Сплошной 2.40 Сплошной 46.60 Сплошной 2.80 Сплошной...

Все понятно, но ничего не понимаю чем это может помочь. Я сделал именно такой счетчик, т.е. эту формулу '=ЕСЛИ(D1=D2;C1+1;1)' прогнал её по всем ячейкам вниз и получил какие-то непонятные числа...что они мне дают??? Непойму что сравнивается? мне нужно чтобы все значения в одном столбце(поле)...

Пожалуйста помогите. Я про макросы узнал совсем недавно(стыдно), но мне надо очень срочно сделать определенную работу. есть 2 столбца(мне нужных). В одном числа, а в соседнем значения(слова,грубо говоря). Т.е. 21 Персики 12 Персики 11 Персики 11 ананасы 2 ананасы 134 анансы 12 абрикосы...