Macro Excel 2007
Résolu/Fermé
evevdll
m@rina
- Messages postés
- 81
- Date d'inscription
- vendredi 9 novembre 2007
- Statut
- Membre
- Dernière intervention
- 13 décembre 2009
m@rina
- Messages postés
- 17432
- Date d'inscription
- mardi 12 juin 2007
- Statut
- Contributeur
- Dernière intervention
- 21 avril 2022
3 réponses
m@rina
13 juin 2009 à 01:09
- Messages postés
- 17432
- Date d'inscription
- mardi 12 juin 2007
- Statut
- Contributeur
- Dernière intervention
- 21 avril 2022
13 juin 2009 à 01:09
Bonjour,
Quelque chose comme ça :
Si tu tiens à obtenir une formule, tu remplaces la ligne
m@rina
Quelque chose comme ça :
Sub toto() For Each c In Range("A1:A5000") If c.Value <> "" And IsNumeric(c.Value) Then c.Offset(0, 7).Value = Round(c.Value) End If Next End Sub
Si tu tiens à obtenir une formule, tu remplaces la ligne
c.offset...par ta formule :
c.Offset(0, 7).FormulaR1C1 = "=ROUND(RC[-7],0)"
m@rina
evevdll
13 juin 2009 à 15:46
- Messages postés
- 81
- Date d'inscription
- vendredi 9 novembre 2007
- Statut
- Membre
- Dernière intervention
- 13 décembre 2009
13 juin 2009 à 15:46
Bonjour Marina,
Je te remercie beaucoup pour tes lignes de code. J'ai passé des heures dessus avant de me décider de poser la question. Il semblerait que pour toi ce ne soit pas vraiment un problème. Je me débrouille habituellement en récupérant des lignes sur d'autres mais je n'avais pas trouvé celles ci. Je vais pouvoir avancer dans mon travail.
Merci beaucoup
Evelyne
Je te remercie beaucoup pour tes lignes de code. J'ai passé des heures dessus avant de me décider de poser la question. Il semblerait que pour toi ce ne soit pas vraiment un problème. Je me débrouille habituellement en récupérant des lignes sur d'autres mais je n'avais pas trouvé celles ci. Je vais pouvoir avancer dans mon travail.
Merci beaucoup
Evelyne
m@rina
13 juin 2009 à 22:26
- Messages postés
- 17432
- Date d'inscription
- mardi 12 juin 2007
- Statut
- Contributeur
- Dernière intervention
- 21 avril 2022
13 juin 2009 à 22:26
Bonsoir Evelyne,
Dans l'avenir, ne perds pas des heures !! ;)) Viens nous voir plus tôt ! ;)
m@rna
Dans l'avenir, ne perds pas des heures !! ;)) Viens nous voir plus tôt ! ;)
m@rna