Publish your project for free and start receiving offers from freelance contractors in serveral minutes after publication!
50 ₴

доделать макрос для екселя

project complete


есть макрос:

Private Sub Worksheet_Change(ByVal Target As Range)
For Each cell In Target
If Not Intersect(cell, Range("C2:O1000") Is Nothing Then
With Range("B" & cell.Row)
.Value = Date
End With
End If
Next cell
End Sub


который автоматом вставляет дату в соответсвтующую строку столбца "B" при вводе любого значения в ячейку из диапазона C2:O1000

нужно доделать\передать его так, чтобы при удалении данных или или повторном вводе данных дата не вставлялась снова, т.е. макрос не должен реагировать на удаление и если дата уже была вставлена, то макрос не перезатирал ее новой.

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

Client's feedback about the contractor Игоре М.

Quality
Professionalism
Price
Availability
Terms

Проект выполнен. Сотрудничеством доволен. Исполнитель на связи, все что было в ТЗ реализовал довольно быстро.
Я доволен, спасибо.

Алексей Т. Алексей Тттт


Make a proposal!

The client doesn't want to make prepayment? Offer him to make a payment via Safe to avoid possible fraud.

  1.  freelancer isn't working in the service any longer
  2. 1 day50 ₴Winning proposal
    Игорь Машков
     477   19   0

    Готов сделать.

    Ukraine Odessa | 5 November 2015 |
  3. 1 day50 ₴
    Юлия Zet
     156   1   0

    Готова выполнить! Есть опыт работы с макросами. Выполню быстро и качественно! Обращайтесь! [email protected]

    Ukraine Zaporozhe | 6 November 2015 |
  1. 1 day10 $
    Антон Скричевский
     181 

    Занимался подобным совсем недавно.

    Ukraine Herson | 6 November 2015 |

Client
Алексей Тттт
Ukraine Ukraine  47   0
Project published
5 November 2015
254 views
Payment methods
Share