Segítene valaki ezeket lekódolni Visual Basicban (excel - makrók)?

1. Az aktuális kijelölés színét sárgára állítja

Ez világos addig, hogy

Sub feladat1

ActiveCell.Interior.Color = vbYellow

Sub End

2. Az 1.eljárás (elöbbi feladat) induljon el a Ctrl + Shift + Q billentyűkombinációra

3. Az 1. felafatban léterhozott eljárást egészítse ki azzal, hogy az aktuális cella betűtípusa Times New Roman, 16os betűméret és félkövér.

4. Az aktuális cellába beírja az A1:A5 tartományban található cellák értékeinek az összegét, és az eljárás induljon el Ctrl + r billentyűre

5. Az aktuális cellába beírja a felette lévő 3 cella értékének összegét.

Nagyon hálás lennék a segítségért, illetve ha valakinek van kedve, magyarázhat is mellé privátba de ez nem szükséges, ha tudjátok a kódokat én megértem, csak valahogy nem állnak össze a dolgok.