Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Обозначить текущую строку
 
#1
05.05.2013 17:32:01
Здравствуйте!
Помогите пожалуйста:
У меня курсор в какой-то активной ячейке. Я пишу макрос, добавляющий строку. Далее встаю в новую строку.
Дальше хочу в каждую ячейку новой добавленной i-ой строки прописать формулу.

Как мне обозначить, что текущая активная строка "i" ? - чтобы я потом в каждой строке (i,1) ; (i,2) спокойно прописывал формулы?

Set CurrentRow = "i" ?
Rock'n'roller!
 
 
 
#2
05.05.2013 17:43:14
Код
dim currow as range
цикл
set currow = cells(i,c)
Киса, я хочу Вас спросить, как художник — художника: Вы рисовать умеете?
 
 
 
#3
05.05.2013 18:32:40
а зачем цикл? и зачем "c"?
Rock'n'roller!
 
 
 
#4
05.05.2013 19:30:10
Если не нужна ячейка, тогда просто без set
Dim currow&
Currow = i
Киса, я хочу Вас спросить, как художник — художника: Вы рисовать умеете?
 
 
 
#5
06.05.2013 10:16:06
Хочу чтобы макрос смещал вниз одну строку и в первой и второй ячейки новой строки добавлял значения a и b
выдает ошибку
почему подскажите пожалуйста

Sub Macro1()
   Dim i As Integer
   ActiveCell.Offset(1, 0).Select
   ActiveCell.EntireRow.Select
   Selection.Insert Shift:=xlDown
   Range(Selection, Selection.End(xlToLeft)).Select
   Currentraw = i
   ActiveSheet.Cell(i, 1) = "a"
   ActiveSheet.Cell(i, 2) = "b"
End Sub
Rock'n'roller!
 
 
 
#6
06.05.2013 10:21:37
Код
Sub Macro2()
i = ActiveCell.Row
Rows(i + 1).EntireRow.Insert Shift:=xlDown
Cells(i + 1, 1) = "a"
Cells(i + 1, 2) = "b"
End Sub
 
 
 
#7
06.05.2013 10:29:53
Спасибо!
Почему если пишешь i = ActiveCell.Row - все ок
но если пишешь activecell.row = i то не работает...
Изменено: Denis Grigoriev - 06.05.2013 10:30:44
Rock'n'roller!
 
 
 
#8
06.05.2013 11:20:33
В первом случае переменной присваивается значение - номер активной строки. А во втором случае написана фигня: выделена некая ячейка и УЖЕ известен номер её строки, а Вы пытаетесь присвоить ей номер)))
А вот так сработает - будет выделена строка с тем номером, номер которой равен значению переменной (i)
Код
i = 3
Rows(i).Activate
 
 
 
#9
06.05.2013 12:16:06
Спасибо Юрий!
Rock'n'roller!
 
 
 
Страницы: 1
Читают тему
Наверх