Может проблема в Windows. поробуй поставить нормальный шрифт стандартной теме, если не измениться значит что-то в другом.

{quote}{login=Pavel55}{date=23.10.2008 06:54}{thema=}{post}Может так  
 
Sub Макрос1()  
Dim r As Long, c As Long  
Dim n As Long, m As Long  
   r = 1  
   c = 3  
   n = 10  
   m = 1  
   Range(Cells(r, m), Cells(n, c)).Select  
End Sub{/post}{/quote}  
 
Работает. но у меня не много сложней задача. Переменные r,с,n,m должны иметь определенное заданное значение допустим Q1, Q2, Q3, Q4, который раскидываються виде диапазона на рабочем листе (A1:C10), (A1:C2) и т.п. вот и возник вопрос как сделать поиск этих значений и на основе их выделить диапазон. т.е получить такой универсальный код с помощью которого можно было бы выделять любую область. по значениям в углах.

{quote}{login=Pavel55}{date=23.10.2008 11:11}{thema=}{post}Ну, если диапазон известен, то так )  
 
Sub Макрос2()  
Dim myTable As Range  
Set myTable = Range("A1:D30")  
   myTable.Select 'выделяем для наглядности  
End Sub{/post}{/quote}  
 
Добрый вечер.  
Диапазон (представим его в форме квадрата) плавает в океане ячеек рабочего листа и определяется размером значений по углам.  
Диапазон:  Range("A1:C10").Select, в данном выделение углы квадрата соответственно A1, C1, A10, C10.  
Подскажите, пожалуйста, как написать  универсальный модуль, в котором можно подставлять значения по углам и выделять диапазон согласно заданным значениям. Значения носят произвольный характер это может быть числовое, текстовое, временное значение.

Видимо тут предпологалось. столбец один, два три)

А если в одном столце нужно удалить сразу два значения. т.е все встречающии Toyota и допустим ВАЗ. встретили ваз удалили строку идем дальше Toyota удалили еще одну страку и так до конца.?

Все клева работает но при входе не с первой ячейке выдает ошибку и почему я плохо учился в школе..)

Всем привет.  
Помогите пожалуйста написать модуль на языке VBA по заполнению ячеек датами.  
Пример  
 
А1 12.02.2008 – начало диапазона  
А2 шум (текст, числовые не произвольные значения)  
А3 шум (текст, числовые не произвольные значения)  
А4 13.02.2008  
А5 шум (текст, числовые не произвольные значения)  
А6 шум (текст, числовые не произвольные значения)  
А7 14.02.2008    
А8 шум (текст, числовые не произвольные значения)  
А9 ИТОГО –Конец диапазона  
 
За место шума нужно поставить дату, до даты и так до конца диапазона, который заканчивается ключевым словом.    
 
Результат  
 
А1 12.02.2008 – начало диапазона  
А2 12.02.2008  
А3 12.02.2008  
А4 13.02.2008  
А5 13.02.2008  
А6 13.02.2008  
А7 14.02.2008    
А8 14.02.2008  
А9 ИТОГО –Конец диапазона  
 
растояние между датами всегда динамическое, (меняеться) диапазон от начало до конца то же разный..