Discussion :

[LogaR]

Bonjour,
Tout d'abord désolé pour le titre, je n'arrive pas à trouver plus explicite.


En me basant sur une cellule de base, que j'ai appelée "sr0", il faut que je remplisse un tableau ayant pour nombre de lignes le nombre situé dans une cellule, mettons "A1", dans lequel je dois remplir le numéro de la ligne (commençant par 0) dans la première colonne, et diverses infos dans les autres.

Je ne désire pas le code complet (faut bien bosser un peu quand même ^^), mais je ne me rappelle plus de comment expliquer à mon cher programme que je voudrais qu'il modifie la valeur d'une cellule par rapport à ma cellule "sr0".

Je ne désire pas utiliser les tableaux.

Merci d'avance !

[casefayere]

Bonjour,
Le plus explicite serait d'envoyer un exemple en brut,

j'aimerais comprendre

...il faut que je remplisse un tableau ....

par rapport à

Je ne désire pas utiliser les tableaux.

Bonne journée

[LogaR]

c'est vrai que c'est un peu paradoxal. je veux remplir mon tableau sans utiliser la méthode des tableaux de vba, simplement en faisant une boucle qui va, pour chaque ligne, me donner les infos que je veux.

Plutôt que de joindre un fichier, je vais faire un petit schema :

Sr0 | sr0+1 colonne | ...

sr0 +1 ligne | sr0 + 1 ligne + 1 colonne |....

... | .............. |...

Comment faire, par exemple, pour afficher 1 dans la cellule "sr0 + 1 ligne" ? C'est tout bête mais je ne me rappelle plus de la syntaxe, ça ressemble à quelque chose du genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("sr0").cells(1,0).value = 1

[casefayere]

Si j'ai compris, admettons,
que sr0 soit dans, au hasard, P1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
dim x as integer
for x = 1 to 'ce que tu veux
range("a" & x) = left([p1],2)&x 
next x

c'est un début, non, dis-moi quoi

je viens de relire, si la valeur est en a1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
dim x as integer
 
for x = 0 to range("a1").value
range("a" & x+2) = left([p1],2) & x 
next x

[LogaR]

C'est presque ça, mais ce qui me chiffonne, c'est cette ligne là :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
range("a" & x+1) = left([p1],2) & x

Plutôt que le "a", j'aimerais pouvoir me déplacer grâce au numéro de ligne relatif à une cellule que j'ai nommée.


Merci pour ton aide.

[casefayere]

essayes come ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
dim x as integer
 
for x = 0 to range("a1").value
cells(x+2,1) = left(range("p1"),2) & x 
next x