Discussion :

[melodyyy]

voila je voudrais lui dire en VBA:

si j'ai un 0 dans la première ligne (variable première ligne), alors tire la formule de cette cellule jusqu'a la dernière ligne (variable dernière ligne).
Sachant que je n'ai pas un 0 dans toutes les cellules...

le reste, avec le compteur tout ça nikel c'est juste ça que j'arrive pas à lui dire...

[ouskel'n'or]

voila je voudrais lui dire en VBA:
si j'ai un 0 dans la première ligne (variable première ligne), alors tire la formule de cette cellule jusqu'a la dernière ligne (variable dernière ligne).

A qui tu parles ?
Si j'ai bien compris, tu veux recopier vers le bas ("jusqu'a la dernière ligne") la formule située dans une cellule dont la cellule suivante est vide, ou = 0
Mais tu dis aussi

"Sachant que je n'ai pas un 0 dans toutes les cellules..."

D'où la question : Veux-tu aussi remplacer les valeurs des cellules non vides ? Je pense que non, donc la copie devra se faire uniquement sur les cellules ayant un 0.
Là, tu as plusieurs solutions mais dis déjà ce qu'il en est
Question subsidiaire : Si tu recopies vers le bas, est-ce toujours la valeur de la dernière cellule renseignée ou mets-tu dans toutes les cellules "=0" la même valeur ou formule ?

[megapacman]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
 
dim i as integer  'numero ligne
dim fin as integer ' numero derniere ligne
 
for i=1 to fin
 
if (cells(i,numcolonne).value=0) then
 
cells(i,numcolonne).value=formule
 
end if
 
next i

un truc du style

[ouskel'n'or]

Oui, ou un truc dans le genre

Code :

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

1
2
3
4
5
6
7
dim i as integer  'numero ligne
dim fin as integer ' numero derniere ligne 
for i=1 to fin
     if (cells(i,numcolonne).value=0) then
          cells(i,numcolonne).value=cells(i-1,numcolonne).value
     end if
next i

[melodyyy]

je veux juste la formule, , le 0 m'interesse pas excel adaptera je le sais, juste un F9 et hop tout est recalculé

Si tu veux les cellules ayant un 0 sont en ligne: et je veux tirer la formule en colonne, donc pas de modification des autres cellules en lignes

[melodyyy]

y'a un truc qui me choc, ton numcolonne tu lui met la 1ere ou la dernière colonne ? parce que j'a plusieurs colonnes

[Invité]

Si je peux me permettre, "NumColonne" est le numéro de la colonne dans laquelle se trouve la formule à recopier vers le bas !

Cordialement.

[melodyyy]

ok super a la différence que la ça ca pas ça me colle juste le

moi je voudrais la formulz parce que ça donnera pas partout

mais nikel ça m'aide vachement

[Invité]

ouskel'n'or parle de value,
hors comme son nom l'indique on recopie des valeurs et non des formules !

Il y'a beaucoup plus pratique et rapide

Code :

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

1
2
Range("C1:C26").Select
    Selection.FillDown

Et là le contenu de la cellule C1 est reportée dans les autres, que ce soit une valeur ou une formule !

Voilà