Variable dans range

J'ai un tableau de 23 lignes et 9 colonnes que je souhaite remplir avec une boucle for. Je souhaite mettre une variable pour la colonne, et une variable pour la ligne. Les deux variables sont de type integer.

J'ai ecrit le code suivant, mais j'ai un message d'erreur "Erreur défini par l'application ou par l'objet"

 for i = 1 to 23
'calcul des variable 1 et 2
For j = 20 To 29
            ligne = j - 19
            colone = j
            Sheets("Feuil3").Range(colone, ligne) = variable1 + variable2
next j
next i

Je ne suis pas très doué mais dans ton énnoncé tu marques que tu as une variable pour la ligne et une variable pour la colonne or dans ton code tu as deux fois J pour la ligne ET pour la colonne.

Maintenant je ne maîtrise vraiment pas ces codes.

Cordialement,

Benjy.

Edit : De plus tu déclares i mais tu ne l'utilises pas par la suite ou bien ?

Edit 2 : ok je sors

Salut,

A quoi correspondent variable1 et variable2 ?

Peux tu donner les coordonnées de ton tableau genre A1:I23...

Merci,

Souri84

Edit2: que souhaites tu faire en fait ?? car je pense que tu as oublié d'insérer une lettre dans ton range.... car c'est ici que ça coince....

Variable 1 et variable 2 se sont d calcul de temps calculé par feuille. Ma variable i est utilisé dans mon calcul de variables. Je ne pense pas qu'il est utilse pour ce que je veux. mon tableau est de "S3" à "AB25"

Bonjour,

Le mieux serait de voir ton fichier.

Tes variables i et j devraient être BYTE et non INTEGER.

Cette ligne :

Sheets("Feuil3").Range(colone, ligne) = variable1 + variable2 

peut être remplacée par:

Sheets("Feuil3").cells(j - 19, i) = variable1 + variable2 

Reste à savoir ce qu'est variable1 et 2 comme le demande Souris84.

Amicalement

Dan

J'ai tester en mettant de type Byte, et en mettant (j, j-19) et j'ai toujours le même message d'erreur.

Mes variable sont des entier, c'est une simpkle addition de deux entier.

juste pour infos, la proposition de Dan fonctionne chez moi sans soucis....

Souri84

re,

Mes variable sont des entier

Si oui, fais ceci :

Sheets("Feuil3").cells(j - 19, j) = 1 + 2

Si cela ne fonctionne pas, cx'est que ton pb vient de "variable1" et/ou "variable2"

Dan

Je vien de me rendre compte qu'en faite c'est ma macro qui n'est pas adapté, autan pour moi

Sheets("Feuil3").cells(j - 19, j) = 1 + 2

cette formule fonctionne en effet, j'avais inversé j-19 avec j

Salut le forum

Petitepo, tu n'oublies pas une formalité ?

• Dès que votre problème est résolu, merci de le marquer en tant que [Résolu]
  grâce à l'utilitaire se trouvant en bas de page, aperçu :

Mytå