Bonjour,
Je suis en train de faire un programme où j'ai besoin de récupèrer indépendement les chiffre d'un nombre contenu dans une cellule.
Pour y ariver j'utilise la fonction Mid. Mais quand je compile, une erreur me dis :"Erreur de compilation. Un appel de fonction dans la partie gauche de l'affectation doit renvoyer Variant ou Objet".
Je ne vois vraiment pas comment faire alors
Voici à quoi ressemble mon programme:
S = Len(Sheets("Feuil1").Cells(a, 3))
b = Sheets("Feuil1").Cells(3, 3)
For j = S - 1 To 0 Step -1
Val = Mid(b, S - j, 1)
Sheets("Feuil2").Cells(S - j, 1)=Val
Next
Petite précision: mon chiifre est un binaire. Pour pouvoir concerver l'intégralité des zeros du chiffre binaire, la cellule est en format texte.
Merci d'avance de votre aide
Configuration: Windows XP Internet Explorer 8.0