Екцел - Аутоматизујте унос података на основу одређеног датума
Питање
Имам Екцел датотеку у којој сам сваки дан попунио нове информације о одговарајућем датуму у ступцу Б. Имам и 3 ступца Ц, Д и Е: годину, мјесец, тједан број који одговара том датуму. Желео бих да, док ручно уносим датум у колону Б, 3 колоне Ц, Д и Е се аутоматски ажурирају.
Решење
Коришћење ВБА:
Привате Суб Ворксхеет_Цханге (БиВал Таргет Ас Ранге) Ако Таргет.Цолумн 1 ор Таргет.Ров = 1 Затим Екит Суб Таргет.Оффсет (0, 1) = Година (Таргет) Таргет.Оффсет (0, 2) = Месец (Таргет) Таргет .Оффсет (0, 3) = ДатеПарт ("вв", Таргет, вбМондаи, вбФирстФоурДаис) Енд Суб
- Пример датотеке: овде.
- Захваљујући ерииицу за овај тип.