Здравствуйте, помогите, пожалуйста, добавить еще одно условие перед отправкой электронного письма =) существующее условие: если колонки 21/25/29/33 равны 31/34/36/18/99, нужно добавить еще одно условие перед существующим. Вот это: если сумма колонок 21+27+31+35 равна колонке 20
Здравствуйте, помогите, пожалуйста, добавить еще одно условие перед отправкой электронного письма =) существующее условие: если колонки 21/25/29/33 равны 31/34/36/18/99, нужно добавить еще одно условие перед существующим. Вот это: если сумма колонок 21+27+31+35 равна колонке 20Kassandra
For I = LBound(TablNoemptyColumns) To UBound(TablNoemptyColumns)
If Not IsEmpty(Target.Parent.Cells(Target.Row, TablNoemptyColumns(I)).Value) And _ Target.Parent.Cells(Target.Row, TablNoemptyColumns(I) - 2).Value <> "99A" Then
OneOfValues = False For Each c In TablCode
If c = Target.Parent.Cells(Target.Row, TablTargetColumns(I)).Value Then sumtrue = (Cells(Target.Row, 21).Value + Cells(Target.Row, 27).Value + Cells(Target.Row, 31).Value _ + Cells(Target.Row, 35).Value) = Cells(Target.Row, 20).Value
If notEmpty And sumtrue Then
OneOfValues = True Exit For End If Next c If OneOfValues Then notEmpty = True Exit For End If End If Next
For I = LBound(TablNoemptyColumns) To UBound(TablNoemptyColumns)
If Not IsEmpty(Target.Parent.Cells(Target.Row, TablNoemptyColumns(I)).Value) And _ Target.Parent.Cells(Target.Row, TablNoemptyColumns(I) - 2).Value <> "99A" Then
OneOfValues = False For Each c In TablCode
If c = Target.Parent.Cells(Target.Row, TablTargetColumns(I)).Value Then sumtrue = (Cells(Target.Row, 21).Value + Cells(Target.Row, 27).Value + Cells(Target.Row, 31).Value _ + Cells(Target.Row, 35).Value) = Cells(Target.Row, 20).Value
If notEmpty And sumtrue Then
OneOfValues = True Exit For End If Next c If OneOfValues Then notEmpty = True Exit For End If End If Next
KSV, перевожу сообщение выше: я обновил файл, но сейчас он не работает, письмо отправляется, только тогда, когда я сам заполняю колонку 20, но когда она рассчитывается автомотически, письмо не отправляется ( а надо!), Вы можете решить эту проблему? =)
KSV, перевожу сообщение выше: я обновил файл, но сейчас он не работает, письмо отправляется, только тогда, когда я сам заполняю колонку 20, но когда она рассчитывается автомотически, письмо не отправляется ( а надо!), Вы можете решить эту проблему? =)Kassandra
KSV, Проблема в следующем: в столбце R заносится время по расписанию, в стобце S человек вручную пишет фактитческое время, в столбце T прописывается автоматически разница, в стобцах 21/25/29/33 прописывается код причины опоздания, в столбцах 23/27/31/35 прописывается время опоздания каждой причины. так вот изначально письмо отправлялось каждый раз по каждой причины и поэтому писем приходило очень много. Решено было сделать так, что бы даже если пропысывается несколько важных причин задержки, приходило только одно письмо, и поэтому понадобилась формула что бы письмо отправлялось только после того. как суммна столбцов 23/27/31/35 (то есть время) было равно стобцу T (20), т.е. если опоздание составило, например, 20 мин. челолвек может расписать либо одну причину и поставить в столбец 23 20 мин, либо 4 причины. расписывая каждую причину по 5 мин.
Сейчас проблема состоит в том, что если столбец T(20) рассчитывается автоматически по формуле. то письмо не отправляется, а если прописать вручную, то оправляется, нужно что бы автоматически по формуле рассчитывалось и отправлялось =)
KSV, Проблема в следующем: в столбце R заносится время по расписанию, в стобце S человек вручную пишет фактитческое время, в столбце T прописывается автоматически разница, в стобцах 21/25/29/33 прописывается код причины опоздания, в столбцах 23/27/31/35 прописывается время опоздания каждой причины. так вот изначально письмо отправлялось каждый раз по каждой причины и поэтому писем приходило очень много. Решено было сделать так, что бы даже если пропысывается несколько важных причин задержки, приходило только одно письмо, и поэтому понадобилась формула что бы письмо отправлялось только после того. как суммна столбцов 23/27/31/35 (то есть время) было равно стобцу T (20), т.е. если опоздание составило, например, 20 мин. челолвек может расписать либо одну причину и поставить в столбец 23 20 мин, либо 4 причины. расписывая каждую причину по 5 мин.
Сейчас проблема состоит в том, что если столбец T(20) рассчитывается автоматически по формуле. то письмо не отправляется, а если прописать вручную, то оправляется, нужно что бы автоматически по формуле рассчитывалось и отправлялось =)Kassandra
NICoPOF, Наконец он работает в два раза, из-за колонны Т. столбец имеет автоматическую формулу, автоматически рассчитывает время задержки. Макрос работает, если я иду себе даже время задержки, но не тогда, когда он начинает automatiqeumetn в колонке Т.
NICoPOF, Наконец он работает в два раза, из-за колонны Т. столбец имеет автоматическую формулу, автоматически рассчитывает время задержки. Макрос работает, если я иду себе даже время задержки, но не тогда, когда он начинает automatiqeumetn в колонке Т.NICoPOF
KSV, Перевожу, написанное выше NICoPOF (он француз, переводил гугл транслейтором ) =) В конечном счете. работает только на половину из-за колонки Т. Эта колонка имеет формулу, которая автоматически просчитывает время задержки. Макро работает только тогда, когда вручную прописать время. но не тогда когда оно просчитывается автоматически в колонке Т
KSV, Перевожу, написанное выше NICoPOF (он француз, переводил гугл транслейтором ) =) В конечном счете. работает только на половину из-за колонки Т. Эта колонка имеет формулу, которая автоматически просчитывает время задержки. Макро работает только тогда, когда вручную прописать время. но не тогда когда оно просчитывается автоматически в колонке ТKassandra