Personnellement je ferais une fonction personnalisée (dans un module du classeur) :
Public Function valeurAE(Plage As range) As String
Dim I As Long
For I = 1 To 4
If Plage(1, I).Value <> "" Then
valeurAE = Plage(1, I).Value
Exit Function
End If
Next I
End Function
Ensuite, il suffit de taper la fonction =valeurAE(B1:E1) pour la 1ère ligne dans la cellule A1.
C'est certainement possible avec une formule, mais la fonction personnalisée est plus propre et beaucoup plus simple.