Recherche de la première cellule vide

Bonjour,

Début dans les macros, j'aimerais qu'il me recherche la première cellule vide dans une colonne d'une autre feuille et lui faire inscrire une formule.

Mon problème, c'est que je fais ma macro en utilisant ctrl+flèche vers le bas +1.
cela fonction la prèmière fois mais il garde en mémoire une cellule bien définie.
Du coup quand je réutilise cette macro il me prend la même cellule et non pas la cellule première cellule vide
Sub test()
'
' test Macro
'
' Keyboard Shortcut: Ctrl+w
'
Sheets("sheets1").Select
Range("B2").Select
Selection.End(xlDown).Select
Range("B23").Select
ActiveCell.FormulaR1C1 = "=+'sheets3!R[-14]C[1]"

End Sub

Merci pour votre aide