Bonjour tout le monde,
Après avoir créer des macros pour un fichier Excel, j'essaie maintenant de les mettre dans une barre d'outils permettant de simplifier l'appel de ces macros, voila ma marco Comparaison2
avant elle marchait nikel mais après l'avoir mise comme macro supplémentaire une fois que je click sur le boutton créer pour l'appelé dans ma barre d'outil on me fait une erreur comme quoi l'indice n'appartient pas à la selection à ce niveau
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 Sub Comparaison2() Dim totauxP As Variant Dim totauxA As Variant totauxA = ThisWorkbook.Sheets("2").Range("H58").Value totauxP = ThisWorkbook.Sheets("3").Range("H50").Value Ecart = Abs(Round((totauxA - totauxP), 3)) If Ecart <> 0 Then MsgBox ("Passif : " & totauxP & vbCrLf & "Actif est : " & totauxA & vbCrLf & "Ecart : " & Ecart) Else MsgBox ("Passif : " & totauxP & vbCrLf & "Actif est : " & totauxA & vbCrLf & "le compte est bon") End If End Sub
je comprens pas pourquoi surtout que ça fonctionnait avant
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 totauxA = ThisWorkbook.Sheets("2").Range("H58").Value
Partager