Mã VBA Ngày hiện tại cộng với số sê-ri hai chữ số

tôi muốn tạo mã vba khi nhấp đúp vào ô (A2: A9999) ngày hiện tại và số sê-ri có hai chữ số (01 đến 99) sẽ tự động điền (20171031-01).

Ví dụ

Nhấp đúp vào ô A2
-20171031-01

Nhấp đúp vào ô A3
-20171031-02

Nhấp đúp vào ô A4 (2 ngày sau)
-20171102-01

Tôi chưa quen với điều này và dường như tôi không thể làm cho nó hoạt động được