conversion numéro de colonne en lettre

Bonjour,
De access je veux convertir un numéro de colonne d'un tableau Excel en lettre (lettre de la colonne)
J'ai essayé cette fonction mais celle ci ne fonctionne pas apparement ca serait mon cells qui échoue
Si quelqu'un peut me dire ce qui ne va pas merci d'avance

Function LettreColonne(colonne As Long) As String

    If colonne > 0 And colonne < 257 Then

        LettreColonne = Split(Cells(1, colonne).Address(1, 0), "$")(0)

    End If

End Function