Discussion :

[Prekestolen]

Bonjour

Je suis un novice avec Excel (mais je suis pas pire en Access). Voici mon problème: J'ai trois colonne A,B,C. Dans la cellule D1 de la colonne D je copie l'intégralité de la cellule C1 (nombre de 16 chiffres. Ex.:6280669498114586) pour ce faire j'utilise le code suivant dans ma macro:

Code :

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

Range("D" & nbcell).Value = "=RC[-1]"

cela fonctionne très bien.
Dans la Cellule E1, je veux faire la somme de la cellule C1 (que j'ai copié dans D1) et de B1, Et là que ca marche pas. J'ai esayé plein de formule (mais peut-être qu'elle n'était pas bonne). Je reprends du code d'une personne parti, donc difficile de comprendre. Quelqu'un peut-il m'aider

[ouisansdoute]

Bonjour,
Il me semble que le code

Code :

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

Range("E1").Value = "=RC[-2]+RC[-3]"

devrait fonctionner.

Si ça ne marche pas, utilise l'enregistrement automatique de macro (Menu Outils/Macro/Nouvelle macro) et fais les opérations que tu veux obtenir (mets toi en E1 et additionne C1 et B1. Puis arrête l'enregistrement (Outils/Macro/Arrêter l'enregistrement) et va voir le contenu de la macro crée.

[Prekestolen]

Merci, mais j'avais déja essayer et ca fonctionne pas.

[Prekestolen]

Avec l'enregistrement de macro ca donne

Code :

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

1
2
Range("E5").Select
    ActiveCell.FormulaR1C1 = "=RC[-2]+RC[-3]"

ca fonctionne bien mais c'est pas complet.
Puis-je me permettre de poser une autre question qui solutionnera mon probl<eme. Comment fait -on en VBA pour formatter les colonnes en Nombre au lieu qu'elle soit Standard? Car la réponse que ca donne présentement c'est
6.28067E+15

[ouisansdoute]

je crois que ça marche :

Code :

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

Selection.NumberFormat = "#,##0.00"

[Prekestolen]

Le code, je le place ou?

[Prekestolen]

Ca arrondi au dernier chiffre, je doit avoir le nombre de 16 chiffres intégral.

[Prekestolen]

J'ai modifier le code pour

Code :

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

Selection.NumberFormat = "#,###"

et ca arrondi aussi

[aalex_38]

Bonjour,

D'après l'enregistreur de macro (format cellule nombre sans virgule) :

Code :

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

Range("E1").NumberFormat = "0"

Tu dis si c'est ok !

Edit : c'est bon que pour les 15 premiers digit

[Prekestolen]

Ca marche pas et c'est ça mon probleme: j'ai 16 chiffres.
Tu dis que c'est bon pour les 15 premiers, est-ce qu'il y a une facon pour l'extentionner à 16?

Je vais essayer de couper mon nombre pour voir si ca peut marcher d'une autre facon

[aalex_38]

J'ai cherché et pas trouvé comment gérer 16 chiffres.
Tout ce que j'ai vu consiste à définir les cellules comme du texte et de
le gérer comme tu dis.

Si quelqu'un peut apporter une solution

[Prekestolen]

finalement en diminuant mon nombre à 12 chiffres ca fonctionne.
Merci à tous.