ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Деление
6 сообщений из 6, страница 1 из 1
Деление
    #34300271
REDS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
REDS
Гость
просьба помочь написать формулу для макроса:
Есть формула "=A2/A3"
Нужно написать с помощью Сells
ЧТО ТО вроде этого
Worksheets("Лист2").Range (A1)= Worksheets("Лист2").Range (Cells(1,2) / Worksheets("Лист2").Range (Cells(1,3)), но это не работает , наверное , что то упустил
...
Рейтинг: 0 / 0
01.02.2007, 18:58:12
| Ответить | Цитировать | Написать  
Деление
    #34300465
lena_####
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lena_####
Участник
REDS
можно так:
Код: plaintext
Worksheets("Лист2").Range("A1") = Worksheets("Лист2").Range("A2") / Worksheets("Лист2").Range("A3")
или так:
Код: plaintext
Worksheets("Лист2").Cells( 1 ,  1 ) = Worksheets("Лист2").Cells( 2 ,  1 ) / Worksheets("Лист2").Cells( 3 ,  1 )
...
Рейтинг: 0 / 0
01.02.2007, 21:11:37
| Ответить | Цитировать | Написать  
Деление
    #34301154
REDS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
REDS
Гость
Понятненько, а можно сделать так что бы в яйчейку вставить эту формулу, а не чтобы макрос считал
...
Рейтинг: 0 / 0
02.02.2007, 10:18:47
| Ответить | Цитировать | Написать  
Деление
    #34301232
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vkodor
Участник
Код: plaintext
    Cells( 1 ,  1 ).FormulaR1C1 = "=R[1]C/R[2]C"
...
Рейтинг: 0 / 0
02.02.2007, 10:40:25
| Ответить | Цитировать | Написать  
Деление
    #34301519
REDS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
REDS
Гость
а как это сделать с помощью CELLS
...
Рейтинг: 0 / 0
02.02.2007, 11:34:40
| Ответить | Цитировать | Написать  
Деление
    #34303716
KL (XL)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
KL (XL)
Участник
REDSа как это сделать с помощью CELLS

With Worksheets("Лист2")
.Cells(1, 1) = "=" & .Cells(2, 1).Address(0,0) & "/" & .Cells(3, 1).Address(0,0)
End With

KL
[MVP - Microsoft Excel]
...
Рейтинг: 0 / 0
02.02.2007, 22:13:51
| Ответить | Цитировать | Написать  
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Деление
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=34303716&tid=2183511]:
 0ms
get settings:
 7ms
get forum list:
 11ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 59ms
get topic data:
 9ms
get forum data:
 3ms
get page messages:
 33ms
get tp. blocked users:
 1ms
others: 225ms
total:  352ms
созд. / загр.: 352ms
x
x
Закрыть


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