Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Как определить столбец активной ячейки и переместится вверх - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Как определить столбец активной ячейки и переместится вверх
damask_86ru Дата: Понедельник, 14.09.2015, 13:14 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 60
Репутация: 0 ±
Замечаний: 40% ±

Excel 2010
Привет Всем!
Как определить столбец активной ячейки и активировать ячейку в седьмой строке (к примеру) этого же столбца.
 
Ответить
СообщениеПривет Всем!
Как определить столбец активной ячейки и активировать ячейку в седьмой строке (к примеру) этого же столбца.

Автор - damask_86ru
Дата добавления - 14.09.2015 в 13:14
Саня Дата: Понедельник, 14.09.2015, 13:54 | Сообщение № 2
Группа: Друзья
Ранг: Ветеран
Сообщений: 1068
Репутация: 560 ±
Замечаний: 0% ±

XL 2016
[vba]
Код
dim iCol as integer

iCol=activecell.column
msgbox iCol

cells(7,iCol).activate
[/vba]
 
Ответить
Сообщение[vba]
Код
dim iCol as integer

iCol=activecell.column
msgbox iCol

cells(7,iCol).activate
[/vba]

Автор - Саня
Дата добавления - 14.09.2015 в 13:54
damask_86ru Дата: Понедельник, 14.09.2015, 23:16 | Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 60
Репутация: 0 ±
Замечаний: 40% ±

Excel 2010
Саня, спасибо!
А возможно как то дописать код, теперь чтобы в активную ячейку седьмой строки занести значение из ячейки А1?
 
Ответить
СообщениеСаня, спасибо!
А возможно как то дописать код, теперь чтобы в активную ячейку седьмой строки занести значение из ячейки А1?

Автор - damask_86ru
Дата добавления - 14.09.2015 в 23:16
damask_86ru Дата: Понедельник, 14.09.2015, 23:21 | Сообщение № 4
Группа: Пользователи
Ранг: Участник
Сообщений: 60
Репутация: 0 ±
Замечаний: 40% ±

Excel 2010
Все, вопрос закрыт разобрался! Еще раз спасибо!
[vba]
Код
Dim iCol As Integer
             iCol = ActiveCell.Column
             Cells(7, iCol).Value = Range("A1").Value
[/vba]
 
Ответить
СообщениеВсе, вопрос закрыт разобрался! Еще раз спасибо!
[vba]
Код
Dim iCol As Integer
             iCol = ActiveCell.Column
             Cells(7, iCol).Value = Range("A1").Value
[/vba]

Автор - damask_86ru
Дата добавления - 14.09.2015 в 23:21
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!