Affecter une valeur sur toute une ligne d'un tableau VNA

C

CMoa

XLDnaute Occasionnel

• 7 Juillet 2010

• #2

Re : Affecter une valeur sur toute une ligne d'un tableau VNA

Bonjour downloads
Pourqoui pas par formule?

Code:

=SI(G5<>"";"8";"")

Bonne journée

 

Vote positif 0 Vote négatif

D

downloads

Guest

• 7 Juillet 2010

• #3

Re : Affecter une valeur sur toute une ligne d'un tableau VNA

Merci pour l'aide
J'ai essayé par formule mais ca ne marche pas parce que je voudrais affecter ca à tout mon tableau et je ne sais pas combien de ligne il aura. Je sais juste que toutes les trois lignes il faut affecter la valeur 8 si la case au dessus est remplie.

Une idée ? Moi je n'y arrive vraiment pas

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 7 Juillet 2010

• #4

Re : Affecter une valeur sur toute une ligne d'un tableau VNA

Bonjour downloads, CMoa,
Une proposition:

Code:

Sub Ajout()
Dim i As Integer
For i = 6 To Range("B" & Application.Rows.Count).End(xlUp).Row + 2 Step 3
    For j = 2 To 31
        If Cells(i - 1, j) <> "" Then Cells(i, j).Value = 8
    Next j
Next i
End Sub

La macro rempli les case de la feuille active.
Cordialement

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 7 Juillet 2010

• #5

Re : Affecter une valeur sur toute une ligne d'un tableau VNA

Désolé, je ne peux toujours pas éditer mes messages, il faut supprimer

Code:

Dim i As Integer

qui ne sert pas à grand chose et qui risque en plus de poser problème pour un très grand nombre de lignes.
Cordialement

 

Vote positif 0 Vote négatif

D

downloads

Guest

• 7 Juillet 2010

• #6

Re : Affecter une valeur sur toute une ligne d'un tableau VNA

Merci bcp !!!!!

 

Vote positif 0 Vote négatif

D

downloads

Guest

• 7 Juillet 2010

• #7

Re : Affecter une valeur sur toute une ligne d'un tableau VNA

J'ai essayé la formule et elle ne marche que sur la premiere ligne.

Si je marque des choses sur les lignes d'apres la valeur 8 ne s'affiche pas.
Pourriez vous m'aider ? J'essai de trouver la solution depuis le debut de l'aprem et la je ne sors pas de ce casse tete !

Merci d'avance

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 7 Juillet 2010

• #8

Re : Affecter une valeur sur toute une ligne d'un tableau VNA

Re
Exact, re-désolé 😱:
Changer

Code:

For i = 6 To Range("B" & Application.Rows.Count).End(xlUp).Row + 2 Step 3

par

VB:

For i = 6 To Range("A" & Application.Rows.Count).End(xlUp).Row + 2 Step 3

Cordialement

 

Dernière édition: 26 Janvier 2011

Vote positif 0 Vote négatif

D

downloads

Guest

• 9 Juillet 2010

• #9

Re : Affecter une valeur sur toute une ligne d'un tableau VNA

Merci bien !

 

Vote positif 0 Vote négatif