Macro Excel
Résolu/Fermé
A voir également:
- Macro Excel
- Liste déroulante excel - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Formule excel - Guide
- Macro word - Guide
- Si et excel - Guide
6 réponses
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
15 nov. 2010 à 09:26
15 nov. 2010 à 09:26
Bonjour
que veux tu dire par:
si la valeur de la ligne 13.... est vrai ?
que veux tu dire par:
si la valeur de la ligne 13.... est vrai ?
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
Modifié par michel_m le 15/11/2010 à 14:26
Modifié par michel_m le 15/11/2010 à 14:26
VRAI est une valeur logique ou du texte ?
I13 avec I14, J13 avec C14, etc etc
J13 avec C14 ??? t'es sûr ?
etc va jusqu'où ?
I13 avec I14, J13 avec C14, etc etc
J13 avec C14 ??? t'es sûr ?
etc va jusqu'où ?
erf .. J13 avec J14 ^^
c'est possible d'en avoir une centaine ? ( donc de 'I' jusqu'à 'DD') [sinon bah 50 au moins :) ]
ET la valeur de la ligne 13 est obtenue en cochant ou non une case à cocher (ca écrit VRAI quand c'ets cocher et FAUX quand ce ne l'est pas, c'est donc du texte)
c'est possible d'en avoir une centaine ? ( donc de 'I' jusqu'à 'DD') [sinon bah 50 au moins :) ]
ET la valeur de la ligne 13 est obtenue en cochant ou non une case à cocher (ca écrit VRAI quand c'ets cocher et FAUX quand ce ne l'est pas, c'est donc du texte)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
15 nov. 2010 à 16:40
15 nov. 2010 à 16:40
re,
valable sur la ligne 13 quelque soit le nombre de colonnes à partir de la colonne I
remarque: la valeur donnée dans la cellule liée est une valeur logique
valable sur la ligne 13 quelque soit le nombre de colonnes à partir de la colonne I
Sub incrémenter_si_vrai()
dercol = Cells(13, Cells.Columns.Count).End(xlToLeft).Column
Application.ScreenUpdating = False
For col = 9 To dercol
If Cells(13, col) Then Cells(14, col) = Cells(14, col) + 1
Next
End Sub
remarque: la valeur donnée dans la cellule liée est une valeur logique
