Страницы: 1
RSS
ПОМОГИТЕ СРОЧНО!
 
Необходима срочная помощь.  
Есть два значения А1 и А2. Необходимо при изменении А2, предыдущее значение скидывать в А1.  
Пример:  
А1=5  
А2=10  
после того как меняем А2=15, выглядеть должно так:  
А1=10  
А2=15
 
вот весь код:  
 
Private Sub Worksheet_Change(ByVal Target As Range)  
   If Target.Address = [b1].Address Then [a1] = [iv1]: [iv1] = [b1]
End Sub  
 
 
А вот и файл с примером: http://excelvba.ru/XL_Files/Sample__14-09-2009__1-12-58.zip
 
Немного ошибся - перепутал ячейки b1 и a2.  
 
Вот нужный вам вариант:  
http://excelvba.ru/XL_Files/Sample__14-09-2009__1-14-33.zip
 
{quote}{login=EducatedFool}{date=13.09.2009 11:16}{thema=}{post}Немного ошибся - перепутал ячейки b1 и a2.  
 
Вот нужный вам вариант:  
http://excelvba.ru/XL_Files/Sample__14-09-2009__1-14-33.zip{/post}{/quote}  
Огромное спасибо за столь точный и своевременный ответ.
 
{quote}{login=EducatedFool}{date=13.09.2009 11:16}{thema=}{post}Немного ошибся - перепутал ячейки b1 и a2.  
 
Вот нужный вам вариант:  
http://excelvba.ru/XL_Files/Sample__14-09-2009__1-14-33.zip{/post}{/quote}  
А как быть если необходимо считать не только по столбцу А но еще и по остальным b c d и так далее.
 
> А как быть если необходимо считать не только по столбцу А но еще и по остальным b c d и так далее  
 
Тогда так:  
 
Private Sub Worksheet_Change(ByVal Target As Range)  
   If Target.Cells.Count > 1 Then Exit Sub  
   If Target.Row = 2 Then Target(0) = Target(1000): Target(1000) = Target  
End Sub  
 
Данные хранятся в 1000-й строке (можно сделать её скрытой)  
 
Пример файла: http://excelvba.ru/XL_Files/Sample__14-09-2009__1-40-45.zip
 
А почему бы вам не выкладывать файлы пря сюда?... под прямые ссылки?    
Так не удобно копировать, вствлять, и.тд.
 
Вариант с итерациями (Сервис-Параметры-Вычисления-Итерации-2).
 
Есть еще одна загвоздочка.  
Есть необходимость сделать следуюющее:  
есть к примеру 50 строк  
каждые из которых повторяются  
 
 
Объект №1  
договор         10  
получено        10  
отгружено       3  
 
 
Объект №2  
договор         10  
получено        10  
отгружено       5  
 
на складе       12  
 
 
Так вот как только что то отгружается на складе наименование должно уменьшаться, а как только получено и отгруженно станет равным на складе товара должно остаться 0  
Каким образом это сделать так чтобы мы на складе могли бы еще и пополнять товар(пришел от поставщик, в ручную забили в графу на складе)
 
ВСЕМ СПАСИБО. ТЕМА ЗАКРЫТА
Страницы: 1
Читают тему
Наверх