Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.12.2010, 14:18   #11
Jana 001
Пользователь
 
Регистрация: 30.11.2010
Сообщений: 15
По умолчанию

Цитата:
Сообщение от Hugo121 Посмотреть сообщение
Если в общем модуле - смотрите, чьи cells обрабатываете.
Т.е. нужно указать лист.
Ага, точно.Я изменила только диапазон

For Each cc In [a2:a100].Cells
Set x = Cells.Find(What:=cc.Offset(-1, 0).Value, After:=cc, LookIn:=xlFormulas, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False)
If x.Row > cc.Row Then cc.Value = cc.Offset(-1, 0).Value
Next

затупила, потому что эти значения у меня в столбце В. теперь изменила работает. счас проверю еще пару раз. спсб %))

Последний раз редактировалось Jana 001; 09.12.2010 в 12:59.
Jana 001 вне форума Ответить с цитированием
Старый 08.12.2010, 14:22   #12
Jana 001
Пользователь
 
Регистрация: 30.11.2010
Сообщений: 15
По умолчанию

Цитата:
Сообщение от VictorM Посмотреть сообщение
перейдите в Расширенный режим редактирования сообщения
там внизу - Управление вложениями
да, я в расширенном режиме не могла у меня блокированы были всплывающие окна, спсб)
Jana 001 вне форума Ответить с цитированием
Старый 08.12.2010, 14:26   #13
Jana 001
Пользователь
 
Регистрация: 30.11.2010
Сообщений: 15
По умолчанию

1234567890

Последний раз редактировалось Jana 001; 09.12.2010 в 12:58.
Jana 001 вне форума Ответить с цитированием
Старый 08.12.2010, 14:28   #14
Jana 001
Пользователь
 
Регистрация: 30.11.2010
Сообщений: 15
По умолчанию

1234567890

Последний раз редактировалось Jana 001; 09.12.2010 в 12:57.
Jana 001 вне форума Ответить с цитированием
Старый 08.12.2010, 14:38   #15
Jana 001
Пользователь
 
Регистрация: 30.11.2010
Сообщений: 15
По умолчанию

Цитата:
Сообщение от EducatedFool Посмотреть сообщение
И не экономьте слова... некоторые пункты непонятны:
2)заменить содержимое определенной ячейки, присвоить ей значение текст или формулу туда вставить;

Есть строка , где (B1) = "Capital" (C1)="Capital"

В С
1 Capital Capital,

и требуется заменить в (С1) "Capital" на "Total":
В С
1 Capital Total


И есть другая строка, где В3 = "Сapital", c3= "Total", D3 = число

Вместо просто цифры(числа) в D3 вставить формулу (суммы сумм определенных диапазонов ячеек)
В С D
3 Assets Total 'число'





Цитата:
Сообщение от EducatedFool Посмотреть сообщение
другие замены будут?
или только одно слово на другое?
только эта замена. пока, по крайней мере %)


Цитата:
Сообщение от EducatedFool Посмотреть сообщение
Суммы чего? какой диапазон суммировать?
в этой задаче это будет сумма сумм столбцов, как я поняла. А вот такие формулы нужно по 3м тоталам сделать(вставить 3 формулы в 3 разных определенных ячейки).

Последний раз редактировалось Jana 001; 09.12.2010 в 13:51.
Jana 001 вне форума Ответить с цитированием
Старый 08.12.2010, 14:50   #16
Jana 001
Пользователь
 
Регистрация: 30.11.2010
Сообщений: 15
По умолчанию

1234567890

Последний раз редактировалось Jana 001; 09.12.2010 в 12:57. Причина: удалить
Jana 001 вне форума Ответить с цитированием
Старый 08.12.2010, 20:19   #17
Jana 001
Пользователь
 
Регистрация: 30.11.2010
Сообщений: 15
По умолчанию

1234567890

Последний раз редактировалось Jana 001; 09.12.2010 в 12:57.
Jana 001 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
макрос в Excel Zcomp Microsoft Office Excel 2 15.09.2010 00:49
Макрос в excel sergantikus Microsoft Office Excel 14 03.07.2010 00:05
Макрос из Excel в Access kipish_lp Microsoft Office Access 3 23.04.2010 21:05
Выполнить код через макрос vbs segail Microsoft Office Excel 0 04.04.2010 19:25
Макрос в Excel Dartchuwak Microsoft Office Excel 1 11.01.2009 21:50