VBA Excel - Formatowanie wybranego tekstu w komórce

Witam,

Bardzo proszę o pomoc w rozwiązaniu następującego problemu.
Załóżmy, że w komórce A1 mam następujący tekst "Data ważności, Data + jakiś tekst + Data + dodatkowy tekst".
W jaki sposób za pomocą makra można sformatować wszystkie wyrazy "Data" tak aby były one pogrubione.
Jednym słowem chciałbym aby makro analizowało dowolny tekst zawarty w komórce i gdy napotka na słowo "Data" pogrubiało go.

Z góry dziękuję za pomoc.

Formatowanie warunkowe też z tym sobie poradzi.
Przykład w załączniku.

No nie do końca.
Formatowanie warunkowe formatuje cały tekst zawarty w komórce a ja chcę sformatować tylko jeden wyraz tego tekstu.

Przetestuj:

Wielkie dzięki.
To jest to o co mi chodziło.
Do pełni szczęścia brakuje mi tylko tego, aby makro działało również wtedy, gdy tekst w dowolnej komórce kolumny A jest zaciągany z innego arkusza np. w komórce A5 jest wpisana formuła =Sheet2!D1 lub w dowolnej komórce kolumny A aktywnego arkusza wpisana jest np. formuła ="data cos tam"&Sheet2!A1
Da się tak zrobić?