Выделить Диапозон - Microsoft Office Excel

Rom1k06 · 01.09.2008, 20:41

j = 1
Do While Sheets("Лист1").Cells(j, 1) <> ""
j = j + 1
Loop
Sheets("Лист1").Cells(7,1:строка, j).Select
подскажите как этот диапозон прописать анологичный
Range("C6:C24").Select
не пойму где правильно ставить скобки или кавычки...

valerij · 01.09.2008, 21:04

Цитата:

Сообщение от Rom1k06

Sheets("Лист1").Cells(7,1:строка, j).Select

А что это за выражение, де вы, ЭТО, взяли?

Rom1k06 · 01.09.2008, 21:26

мне необхлдимо прописать дипозон с помощью этой функции Cells(7,1:строка, j) аналогичный этому Range("C6:C24").Select

valerij · 01.09.2008, 21:38

Вот, диапазон Range("B3:B40"), Лист8, при i=3, записывается, так:
Sheets(8).Range(Sheets(8).Cells(i, "B"), Sheets(8).Cells(i + 37, "B")) = 0

VictorM · 01.09.2008, 22:18

Цитата:

мне необхлдимо прописать дипозон с помощью этой функции Cells(7,1:строка, j) аналогичный этому Range("C6:C24").Select

Код:

With Sheets("Лист1")
        Range(.Cells(6, 3), .Cells(24, 3)).Select 'это Range("C6:C24").Select
 End With

01.09.2008, 20:41	#1
Rom1k06 Форумчанин Регистрация: 30.07.2008 Сообщений: 125	Выделить Диапозон j = 1 Do While Sheets("Лист1").Cells(j, 1) <> "" j = j + 1 Loop Sheets("Лист1").Cells(7,1:строка, j).Select подскажите как этот диапозон прописать анологичный Range("C6:C24").Select не пойму где правильно ставить скобки или кавычки...

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
выделить строку в DBGrid	All517	БД в Delphi	5	24.08.2012 12:43
Выделить выходные	gavrylyuk	Microsoft Office Excel	5	01.08.2008 13:28
Выделить страницу	StasSv	Microsoft Office Excel	7	28.02.2008 10:34
выделить строки	Romuald	Microsoft Office Excel	7	22.02.2008 04:58
Выделить все	Михаил Юрьевич	Общие вопросы Delphi	1	21.02.2008 23:12

01.09.2008, 21:26	#3
Rom1k06 Форумчанин Регистрация: 30.07.2008 Сообщений: 125	мне необхлдимо прописать дипозон с помощью этой функции Cells(7,1:строка, j) аналогичный этому Range("C6:C24").Select

01.09.2008, 21:38	#4
valerij Старожил Регистрация: 12.05.2007 Сообщений: 2,339	Вот, диапазон Range("B3:B40"), Лист8, при i=3, записывается, так: Sheets(8).Range(Sheets(8).Cells(i, "B"), Sheets(8).Cells(i + 37, "B")) = 0