Как получить номер ячейки ?

Программирование на Visual Basic for Applications
PVL
Новичок
Новичок
 
Сообщения: 26
Зарегистрирован: 20.10.2003 (Пн) 11:10
Откуда: Россия, Томск

Как получить номер ячейки ?

Сообщение PVL » 28.10.2003 (Вт) 10:00

Если выделена ячейка таблицы Excel, как узнать номер строки . Понимаю что глупый вопрос, но все же..
Последний раз редактировалось PVL 28.10.2003 (Вт) 10:13, всего редактировалось 1 раз.
С уважением, PVL !

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 28.10.2003 (Вт) 10:10

Вопрос действительно глупый :)
Во-первых, какую таблицу ты имеешь в виду?
Во-вторых, слово программно замени на из кода, а то не скажу кто скоро банить начнёт за это слово :)
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

corgi
ToyMan
ToyMan
 
Сообщения: 1367
Зарегистрирован: 01.10.2002 (Вт) 9:59
Откуда: Россия, Москва

Сообщение corgi » 28.10.2003 (Вт) 10:28

activecell.row
Ничто так не ограничивает полёт мысли программиста, как компилятор

PVL
Новичок
Новичок
 
Сообщения: 26
Зарегистрирован: 20.10.2003 (Пн) 11:10
Откуда: Россия, Томск

Сообщение PVL » 28.10.2003 (Вт) 11:10

Спасибо, помогло. Только вознкла новая проблема: при попытке подставить в Range("А"&..) пишет о несовместимости типов, хотя пробовал разные типы задать. :cry:
С уважением, PVL !

corgi
ToyMan
ToyMan
 
Сообщения: 1367
Зарегистрирован: 01.10.2002 (Вт) 9:59
Откуда: Россия, Москва

Сообщение corgi » 28.10.2003 (Вт) 11:27

Range("А"&..) - напиши конкретный пример на что он ругается
зы Range("D4:I18")
Ничто так не ограничивает полёт мысли программиста, как компилятор

PVL
Новичок
Новичок
 
Сообщения: 26
Зарегистрирован: 20.10.2003 (Пн) 11:10
Откуда: Россия, Томск

Сообщение PVL » 28.10.2003 (Вт) 11:32

Dim Dat_Val As Long
Dim Dat_Str As String
..
Dat_Str = ActiveCell.Row
Dat_Val = Range("A" & Dat_Str).Value() 'Пытаюсь задать адрес ячейки
В последней строке выдает: "Type mismatch"
С уважением, PVL !

corgi
ToyMan
ToyMan
 
Сообщения: 1367
Зарегистрирован: 01.10.2002 (Вт) 9:59
Откуда: Россия, Москва

Сообщение corgi » 28.10.2003 (Вт) 11:48

1. у объекта Range не проперти value
2. Cells(ActiveCell.Row,"A").value - попробуй так
Ничто так не ограничивает полёт мысли программиста, как компилятор

RayShade
Scarmarked
Scarmarked
Аватара пользователя
 
Сообщения: 5511
Зарегистрирован: 02.12.2002 (Пн) 17:11
Откуда: Russia, Saint-Petersburg

Сообщение RayShade » 28.10.2003 (Вт) 11:50

У объекта Range есть проперть Value :)

Returns or sets the value of the specified range. Read/write Variant.



expression.Value(RangeValueDataType)



expression Required. An expression that returns a Range object.



RangeValueDataType Optional Variant. The range value data type. Can be a xlRangeValueDataType constant.



xlRangeValueDataType can be one of these xlRangeValueDataType constants.

xlRangeValueDefault default If the specified Range object is empty, returns the value Empty (use the IsEmpty function to test for this case). If the Range object contains more than one cell, returns an array of values (use the IsArray function to test for this case).

xlRangeValueMSPersistXML Returns the recordset representation of the specified Range object in an XML format.

xlRangeValueXMLSpreadsheet Returns the values, formatting, formulas and names of the specified Range object in the XML Spreadsheet format.



Remarks

When setting a range of cells with the contents of an XML spreadsheet file, only values of the first sheet in the workbook are used. You cannot set or get a discontiguous range of cells in the XML spreadsheet format.

PVL
Новичок
Новичок
 
Сообщения: 26
Зарегистрирован: 20.10.2003 (Пн) 11:10
Откуда: Россия, Томск

Сообщение PVL » 28.10.2003 (Вт) 12:26

Разобрался в причине возникновения ошибки: несовместимости типов происходили из-за попытки считать данные одного типа в переменную другого типа. После исправления оба варианта работают! Спасибо за помощь! :)
С уважением, PVL !

corgi
ToyMan
ToyMan
 
Сообщения: 1367
Зарегистрирован: 01.10.2002 (Вт) 9:59
Откуда: Россия, Москва

Сообщение corgi » 28.10.2003 (Вт) 12:54

2RayShade :oops: :oops: не знал :oops:
но получать данные от одной ячейки через range не есть good
Ничто так не ограничивает полёт мысли программиста, как компилятор


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot и гости: 86

    TopList