Résolu Microsoft 365 Au secours ! Erreur 1004

Gégé-45550

XLDnaute Occasionnel
Bonjour les amis, bonjour le forum
Je dois avoir les neurones complètement confinés.
Dans une boucle toute simple, j'obtiens une erreur 1004 à l’exécution et je n'arrive pas à comprendre pourquoi !
En ce jour de 8 mai, j'aimerais bien gagner cette "guerre". Merci d'avance à ceux qui voudront bien m'éclairer.
VB:
Dim ws As Worksheet
Set ws=ThisWorkBook.Sheets("test")
For i=1 to 2
   For j = 5 To fin
       valDate = Range(ws.Cells(0, 7).Offset(j, i)).Value          '<= erreur 1004 à l'exécution
       valLibelle = Range(ws.Cells(0, 8).Offset(j, i)).Value       '<= erreur 1004 à l'exécution
       valMontant = Range(ws.Cells(0, 9).Offset(j, i)).Value       '<= erreur 1004 à l'exécution
   Next j
Next i
 
Ce fil a été résolu! Aller à la solution…

Gégé-45550

XLDnaute Occasionnel
Bonjour @_Thierry et merci pour ta réponse rapide.
Entre-temps, j'avais vu mon erreur.
En plus, il est débile d'écrire Range(ws.Cells(0, 7).Offset(j, i)) quand Range(ws.Cells(j,7+i)) suffit largement.
Merci beaucoup et bonne après-midi.
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas