Bonjour
Je suis étudiant en Licence Pro et je dois créer une macro dans laquelle je souhaite intégrer des fonctions excel. Une fois la fonction "Conversion" appelée, excel me renvoie une erreur du type #VALEUR, mais VBA ne semble pas détecter d'erreur.
Voici le code de la macro :
Function Conversion(T As Single) As Single
If WorksheetFunction.IsNumber(T) Then
WorksheetFunction.Bin2Dec (WorksheetFunction.Left(WorksheetFunction.Dec2Bin(T), WorksheetFunction.Len(WorksheetFunction.Dec2Bin(T)) - 4)) & "," & WorksheetFunction.Bin2Dec(WorksheetFunction.Right(WorksheetFunction.Dec2Bin(T), 4))
Else
T = 0
End If
Conversion = T
End Function
Merci d'avance
Je suis étudiant en Licence Pro et je dois créer une macro dans laquelle je souhaite intégrer des fonctions excel. Une fois la fonction "Conversion" appelée, excel me renvoie une erreur du type #VALEUR, mais VBA ne semble pas détecter d'erreur.
Voici le code de la macro :
Function Conversion(T As Single) As Single
If WorksheetFunction.IsNumber(T) Then
WorksheetFunction.Bin2Dec (WorksheetFunction.Left(WorksheetFunction.Dec2Bin(T), WorksheetFunction.Len(WorksheetFunction.Dec2Bin(T)) - 4)) & "," & WorksheetFunction.Bin2Dec(WorksheetFunction.Right(WorksheetFunction.Dec2Bin(T), 4))
Else
T = 0
End If
Conversion = T
End Function
Merci d'avance