Comment récupérer un formule et la mettre a jour?
Résolu
jack dalton
Messages postés
11
Date d'inscription
mercredi 14 janvier 2004
Statut
Membre
Dernière intervention
21 mai 2007
-
16 mai 2007 à 08:56
jack dalton Messages postés 11 Date d'inscription mercredi 14 janvier 2004 Statut Membre Dernière intervention 21 mai 2007 - 16 mai 2007 à 13:26
jack dalton Messages postés 11 Date d'inscription mercredi 14 janvier 2004 Statut Membre Dernière intervention 21 mai 2007 - 16 mai 2007 à 13:26
A voir également:
- Comment récupérer un formule et la mettre a jour?
- Récupérer données json (javascript) - Conseils pratiques -Javascript
- Impressions jour suivant - Forum Visual Basic 6
- Formule excel pourcentage en degré ✓ - Forum VBA Office (Excel, Word ...)
- Formule vpm - Forum PHP
- Sql recuperer dernier enregistrement - Forum SQL
4 réponses
jack dalton
Messages postés
11
Date d'inscription
mercredi 14 janvier 2004
Statut
Membre
Dernière intervention
21 mai 2007
16 mai 2007 à 13:26
16 mai 2007 à 13:26
merci d'avoir pris le temps de me répondre Nicko11
en fait, je fait un test pour savoir si le contenu est bien une formule (merci Molenn)
If Left(Worksheets("mon_onglet").Range("k3").Formula, 1) = "=" Then
puis je stocke la formule de la cellule correspondante à l'ancienne ligne n°2
ancienne_cellule = Worksheets("mon_onglet").Range("k2").Formula
puis j'insère une ligne en 2ème position
Worksheets("mon_onglet").Rows().Insert
j'affecte la nouvelle valeur de la cellule par l'ancienne
Worksheets("mon_onglet").Range("k2").Formula = ancienne_cellule
puis je supprime la ligne 4 (3 + 1) ou ce trouvait la ligne à insérer
Worksheets("mon_onglet").Rows(4).Delete
End If
Merci aussi à tous ceux qui ont lu mon sujet.
Bonne journée a vous !
en fait, je fait un test pour savoir si le contenu est bien une formule (merci Molenn)
If Left(Worksheets("mon_onglet").Range("k3").Formula, 1) = "=" Then
puis je stocke la formule de la cellule correspondante à l'ancienne ligne n°2
ancienne_cellule = Worksheets("mon_onglet").Range("k2").Formula
puis j'insère une ligne en 2ème position
Worksheets("mon_onglet").Rows().Insert
j'affecte la nouvelle valeur de la cellule par l'ancienne
Worksheets("mon_onglet").Range("k2").Formula = ancienne_cellule
puis je supprime la ligne 4 (3 + 1) ou ce trouvait la ligne à insérer
Worksheets("mon_onglet").Rows(4).Delete
End If
Merci aussi à tous ceux qui ont lu mon sujet.
Bonne journée a vous !
cs_moustachu
Messages postés
1079
Date d'inscription
jeudi 14 novembre 2002
Statut
Membre
Dernière intervention
1 janvier 2012
16 mai 2007 à 10:00
16 mai 2007 à 10:00
Pas trop clair Jack, non...
Tu dis que tu insères mais on dirais que tu inverses des lignes...
++
Moustachu
Tu dis que tu insères mais on dirais que tu inverses des lignes...
++
Moustachu
jack dalton
Messages postés
11
Date d'inscription
mercredi 14 janvier 2004
Statut
Membre
Dernière intervention
21 mai 2007
16 mai 2007 à 11:21
16 mai 2007 à 11:21
ok je tente de ré-expliquer:
ce que j'ai au départ :
1 | 2 | =A2+B2 | ....
2 | 8 | =A3+B3 | ....
8 | 4 | =A4+B4 | ....
...................................
5 | 6 | =A10+B10 | ....
0 | 3 | =A11+B11 | ....
ce que je veut :
5 | 6 | =A2+B2 | ....
1 | 2 | =A3+B3 | ....
2 | 8 | =A4+B4 | ....
8 | 4 | =A5+B5 | ....
...................................
0 | 3 | =A11+B11| ....
je que ça me fait actuellement :
5 | 6 | =A10+B10 | ....
1 | 2 | =A3+B3 | ....
2 | 8 | =A4+B4 | ....
8 | 4 | =A5+B5 | ....
...................................
0 | 3 | =A11+B11| ....
ce que j'ai au départ :
1 | 2 | =A2+B2 | ....
2 | 8 | =A3+B3 | ....
8 | 4 | =A4+B4 | ....
...................................
5 | 6 | =A10+B10 | ....
0 | 3 | =A11+B11 | ....
ce que je veut :
5 | 6 | =A2+B2 | ....
1 | 2 | =A3+B3 | ....
2 | 8 | =A4+B4 | ....
8 | 4 | =A5+B5 | ....
...................................
0 | 3 | =A11+B11| ....
je que ça me fait actuellement :
5 | 6 | =A10+B10 | ....
1 | 2 | =A3+B3 | ....
2 | 8 | =A4+B4 | ....
8 | 4 | =A5+B5 | ....
...................................
0 | 3 | =A11+B11| ....
cs_Nicko11
Messages postés
1141
Date d'inscription
mercredi 7 mars 2007
Statut
Membre
Dernière intervention
19 septembre 2007
3
16 mai 2007 à 11:55
16 mai 2007 à 11:55
Salut,
je viens de voir cela sur l'aide de Excel
Worksheets("Sheet1").Range("A1").Formula
je viens de voir cela sur l'aide de Excel
Worksheets("Sheet1").Range("A1").Formula
