VBA Excel : Erreur 1004 lors de l'utilisation d'un tableau

  • Initiateur de la discussion Initiateur de la discussion Clement76
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Clement76

XLDnaute Nouveau
Bonjour à tous,
J'ai un problème récurrent lorsque je souhaite exécuter mon macro.
Ce dernier recherche dans une colonne (h6:h11) s'il y a une cellule qui est différente de zero. Si c'est le cas le resutat de la fonction est la multiplication de deux cellules de la meme ligne.
Pour effectuer ma recherche j'ai crée un tableau contenant les cellules en question à savoir (F6:h11) appartenant à la page "Parametres ".
L’erreur se situe au niveau de cette commande :
tableau = Range("Parametres!f6:h11")
Je ne comprend pas ou se situe mon erreur malgré mes tentatives de débogage et lecture de différentes discussions.

Merci d'avance pour vos proposition.

NB : je ne suis pas sur également d’être dans la bonne partie du forum pour poster cette question.

Sub test()
'Function calcul_kp() As Double

Dim i As Integer
Dim result As Double
Dim tableau As Variant

resultat = 0

tableau = Range("Parametres!f6:h11")

For i = 0 To 5
If tableau(i, 3) <> 0 Then
resultat = tableau(i, 3) * tableau(i, 1)
End If

' If Range("h" & (i + 5)) <> 0 Then
' resultat = Range("h" & (i + 5)).Value * Range("f" & (i + 5)).Value
' End If
Next

'calcul_kp = resultat
MsgBox resultat

End Sub
 
Re : VBA Excel : Erreur 1004 lors de l'utilisation d'un tableau

Bonsour®
essaie plutôt :
tableau = sheets("parametres").Range("f6:h11")

Msgbox tableau créera également une erreur
il faut distinguer chaque élément séparément
 
Dernière édition:
Re : VBA Excel : Erreur 1004 lors de l'utilisation d'un tableau

Merci pour la réponse, j'ai testé :

"tableau = Sheets("parametres").Range("f6:h11").Value"

Maintenant, j'ai erreur d’exécution '9': indice n'appartient pas à la sélection. Pourtant j'ai déclaré le tableau en Variant.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
5
Affichages
244
Réponses
2
Affichages
203
  • Question Question
Microsoft 365 worksheet_change
Réponses
29
Affichages
483
Réponses
5
Affichages
233
Retour