[Resolvido]Minimo de todas as colunas

Boa tarde a todos!
Saudações grandes mestres, hoje aqui estou quebrando a cabeça que pode ser algo muito simples para alguns mas muito difícil para mim...

Tenho uma tabela com "Item ,S1, S2, S3, S4" todos como Números simples.
Gostaria que cada linha um eu pega-se o valor minimo de cada S e mostrar em um campo X

Item:1 S1:6 S2:7 S3:2 S4:7 X:=2
Item:2 S1:3 S2:4 S3:3 S4:1 X:=1

Como faço isso? em uma consulta ou sql ou vba... estou quebrando a cabeça...

Desde já agradeço esse fórum maravilhoso!

Boa tarde,

Faltou testar:

X: fMenor([S1]; [S2]; [S3]; [S4])

Código:

Function fMenor(s1, s2, s3, s4)
Dim varMenor

If s1 < s2 Then varMenor = s1 Else varMenor = s2
If s3 < varMenor Then varMenor = s3
If s4 < varMenor Then varMenor = s4
fMenor = varMenor

End Function

Boa tarde!
Cláudio, não tem algo mais simples? pois eu só dei um exemplo, eu tenho S1 até S40 para verificar, o código iria ficar uma monstruosidade se eu fosse fazer a mínima de todos, depois a média, e depois a máxima, e então pegar a mínima de todas as mínimia e média e máxima...

Agradeço pela força já prestada!
Abraços!

Infelizmente, acho que essa é a forma mais simples.
O código poderá até ficar extenso, mas repetitivo.
Certamente existem códigos bem mais longos e complexos, esse não seria um deles.
E o trabalho de codificar é feito apenas uma vez, é óbvio mas é bom lembrar.
Abs