Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Erreur 1004

Gégé-45550

XLDnaute Accro
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
 

Gégé-45550

XLDnaute Accro
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.
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…