ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBA Excel
13 сообщений из 13, страница 1 из 1
VBA Excel
    #32807284
Namik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Namik
Гость
Доброго Вам времени суток
Уважаемые господа

при наличии времени прошу Вас помочь

на листе Excel возьмем два столбца

один - строка 6 столбец 8 - получает значение например 12

второй - строка 6 столбец 9 - получает значение 12*10

посредством формулы

строка 6 столбец 9 = строка 6 столбец 8*10 это очень легко, я знаю

но мне нужно реализовать это програмно,
с учетом того чтобы эта формула
работала в указанном мною диапазоне

т.е. вот так

строка 6 столбец 9= строка 6 столбец 8*10
строка 7 столбец 9= строка 7 столбец 8*10
строка 8 столбец 9= строка 8 столбец 8*10 и т.д.

/ я буду под Ваш пример подстовлять другую операцию /

С Уважением и Благодарностью
Намик
...
Рейтинг: 0 / 0
01.12.2004, 11:58:34
| Ответить | Цитировать | Написать  
VBA Excel
    #32807332
Lenivec
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Lenivec
Участник
а макрорекордером воспользоваться что сложнее чем писать на форум
...
Рейтинг: 0 / 0
01.12.2004, 12:15:54
| Ответить | Цитировать | Написать  
VBA Excel
    #32807368
Namik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Namik
Гость
Простите

1 макрорекордер я тоже знаю

вот его код

ActiveCell.FormulaR1C1 = "=RC[-2]*RC[-1]"
Range("F8").Select

как мне здесь указать

что этаже команда
должна действовать в случае
с нижней следующей и т.д.

2 мне не нужен макрос который бы я сам запускал

мне нужен
постоянный модуль который контролировал бы
оперцаю на листе

3 я так же сообщил что у меня другая формула,
которая не должна быть в виде формулы в ячейке

С Уважением
Намик
...
Рейтинг: 0 / 0
01.12.2004, 12:29:22
| Ответить | Цитировать | Написать  
VBA Excel
    #32807378
Namik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Namik
Гость
еще раз извиняюсь

а каким местом Вы пострадали Уважаемый

прочитав мое - пусть даже не проффесиональное письмо

С Уважением
Намик
...
Рейтинг: 0 / 0
01.12.2004, 12:32:12
| Ответить | Цитировать | Написать  
VBA Excel
    #32807398
Lenivec
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Lenivec
Участник
гм, ну не воспринемайте уж так близко к сердцу мое замечание, просто тогда не совсем понятно что вы хотите получить и каким образом

...
Код: plaintext
1.
2.
3.
Range("A2") = Range("A1")* 10 
Range("B2") = Range("B1")* 10 
Range("C2") = Range("C1")* 10
...
...
Рейтинг: 0 / 0
01.12.2004, 12:39:51
| Ответить | Цитировать | Написать  
VBA Excel
    #32807426
Lenivec
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Lenivec
Участник
как мне здесь указать
что этаже команда
должна действовать в случае
с нижней следующей и т.д.

опятьже запустить макротекордер и посмотреть что он сделает


мне не нужен макрос который бы я сам запускал
мне нужен
постоянный модуль который контролировал бы
оперцаю на листе

а чем макос отличается от VBA кода?


я так же сообщил что у меня другая формула,
которая не должна быть в виде формулы в ячейке

по этому поводу смотри предыдущее сообщение
...
Рейтинг: 0 / 0
01.12.2004, 12:46:58
| Ответить | Цитировать | Написать  
VBA Excel
    #32807466
Namik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Namik
Гость
да, не прав,
тоже погаричился

как Вы

вставите вот эту операцию

строка 6 столбец 9= ((Hour(строка 6 столбец 8)*60)+ Minute((строка 6 столбец 8))

С Уважением и Благодарностью
Намик
...
Рейтинг: 0 / 0
01.12.2004, 12:56:10
| Ответить | Цитировать | Написать  
VBA Excel
    #32807555
Lenivec
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Lenivec
Участник
Range("I6").Formula = "=HOUR($H$6)*60+MINUTE($H$6)"
...
Рейтинг: 0 / 0
01.12.2004, 13:24:39
| Ответить | Цитировать | Написать  
VBA Excel
    #32807568
Lenivec
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Lenivec
Участник
ну или так:
Range("I6") = Hour(Range("H6")) * 60 + Minute(Range("H6"))
...
Рейтинг: 0 / 0
01.12.2004, 13:32:18
| Ответить | Цитировать | Написать  
VBA Excel
    #32807830
Namik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Namik
Гость
Большое Вам спасибо

макрос работает


если Вам не трудно

подскажите пожалуйста
как реализовать выполнение этого кода

не командой Run macros

а при изменении ячейки в которую я ввожу время

я пробовал через Change.Sheet1
но файл после этого почему то виснит

ещё раз спасибо

С Уважением и Благодарностью
Намик
...
Рейтинг: 0 / 0
01.12.2004, 15:22:35
| Ответить | Цитировать | Написать  
VBA Excel
    #32807963
Lenivec
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Lenivec
Участник
на событие вешаешь свой обработчик

Код: plaintext
1.
2.
3.
4.
5.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
...
код обработки события
...
End Sub
...
Рейтинг: 0 / 0
01.12.2004, 16:26:02
| Ответить | Цитировать | Написать  
VBA Excel
    #32807967
Lenivec
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Lenivec
Участник
соответственно данный обработчик должен быть вставлен в код того листа, который обрабатываем
...
Рейтинг: 0 / 0
01.12.2004, 16:27:20
| Ответить | Цитировать | Написать  
VBA Excel
    #32808178
Namik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Namik
Гость
Большое спасибо

То что я и хотел

С Уважением и Благодарностью
Намик
...
Рейтинг: 0 / 0
01.12.2004, 17:35:09
| Ответить | Цитировать | Написать  
13 сообщений из 13, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBA Excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=32807555&tid=2168518]:
 0ms
get settings:
 7ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 49ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 32ms
get tp. blocked users:
 1ms
others: 196ms
total:  308ms
созд. / загр.: 308ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]