Bonjour.
J'ai un grand nombre de cellules contenant par ex. "29.92 pouce / 1013 hPa".
Les valeures varient d'une cellule à l'autre. Je voudrais faire une macros
qui m'en efface les 14 premiers caractères (dans ce cas, "29.92 pouce / ").
Si je fait une macros par enregistrement des touches, au lieu de
m'enregistrer l'action "Delete" elle me fait " ActiveCell.FormulaR1C1 = "
1013 hPa" ". A la cellule suivante elle recopiera " 1013 hPa" au lieu de
laisser la valeur de cette nouvelle cellule.
J'utilise Excel 2002 SP3
Merci de votre aide et bonnes salutations
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Elliac
Bonjour,
For Each c In Selection c.Value = Mid(c.Value, 15, 999) Next
Camille
"villard" wrote:
Bonjour. J'ai un grand nombre de cellules contenant par ex. "29.92 pouce / 1013 hPa". Les valeures varient d'une cellule à l'autre. Je voudrais faire une macros qui m'en efface les 14 premiers caractères (dans ce cas, "29.92 pouce / "). Si je fait une macros par enregistrement des touches, au lieu de m'enregistrer l'action "Delete" elle me fait " ActiveCell.FormulaR1C1 = " 1013 hPa" ". A la cellule suivante elle recopiera " 1013 hPa" au lieu de laisser la valeur de cette nouvelle cellule.
J'utilise Excel 2002 SP3 Merci de votre aide et bonnes salutations
-- jdg
Bonjour,
For Each c In Selection
c.Value = Mid(c.Value, 15, 999)
Next
Camille
"villard" wrote:
Bonjour.
J'ai un grand nombre de cellules contenant par ex. "29.92 pouce / 1013 hPa".
Les valeures varient d'une cellule à l'autre. Je voudrais faire une macros
qui m'en efface les 14 premiers caractères (dans ce cas, "29.92 pouce / ").
Si je fait une macros par enregistrement des touches, au lieu de
m'enregistrer l'action "Delete" elle me fait " ActiveCell.FormulaR1C1 = "
1013 hPa" ". A la cellule suivante elle recopiera " 1013 hPa" au lieu de
laisser la valeur de cette nouvelle cellule.
J'utilise Excel 2002 SP3
Merci de votre aide et bonnes salutations
For Each c In Selection c.Value = Mid(c.Value, 15, 999) Next
Camille
"villard" wrote:
Bonjour. J'ai un grand nombre de cellules contenant par ex. "29.92 pouce / 1013 hPa". Les valeures varient d'une cellule à l'autre. Je voudrais faire une macros qui m'en efface les 14 premiers caractères (dans ce cas, "29.92 pouce / "). Si je fait une macros par enregistrement des touches, au lieu de m'enregistrer l'action "Delete" elle me fait " ActiveCell.FormulaR1C1 = " 1013 hPa" ". A la cellule suivante elle recopiera " 1013 hPa" au lieu de laisser la valeur de cette nouvelle cellule.
J'utilise Excel 2002 SP3 Merci de votre aide et bonnes salutations
-- jdg
villard
Bonjour. Parfait. Merci pour la rapidité. -- jdg
Bonjour,
For Each c In Selection c.Value = Mid(c.Value, 15, 999) Next
Camille
"villard" wrote:
Bonjour. J'ai un grand nombre de cellules contenant par ex. "29.92 pouce / 1013 hPa". Les valeures varient d'une cellule à l'autre. Je voudrais faire une macros qui m'en efface les 14 premiers caractères (dans ce cas, "29.92 pouce / "). Si je fait une macros par enregistrement des touches, au lieu de m'enregistrer l'action "Delete" elle me fait " ActiveCell.FormulaR1C1 = " 1013 hPa" ". A la cellule suivante elle recopiera " 1013 hPa" au lieu de laisser la valeur de cette nouvelle cellule.
J'utilise Excel 2002 SP3 Merci de votre aide et bonnes salutations
-- jdg
Bonjour.
Parfait.
Merci pour la rapidité.
--
jdg
Bonjour,
For Each c In Selection
c.Value = Mid(c.Value, 15, 999)
Next
Camille
"villard" wrote:
Bonjour.
J'ai un grand nombre de cellules contenant par ex. "29.92 pouce / 1013 hPa".
Les valeures varient d'une cellule à l'autre. Je voudrais faire une macros
qui m'en efface les 14 premiers caractères (dans ce cas, "29.92 pouce / ").
Si je fait une macros par enregistrement des touches, au lieu de
m'enregistrer l'action "Delete" elle me fait " ActiveCell.FormulaR1C1 = "
1013 hPa" ". A la cellule suivante elle recopiera " 1013 hPa" au lieu de
laisser la valeur de cette nouvelle cellule.
J'utilise Excel 2002 SP3
Merci de votre aide et bonnes salutations
For Each c In Selection c.Value = Mid(c.Value, 15, 999) Next
Camille
"villard" wrote:
Bonjour. J'ai un grand nombre de cellules contenant par ex. "29.92 pouce / 1013 hPa". Les valeures varient d'une cellule à l'autre. Je voudrais faire une macros qui m'en efface les 14 premiers caractères (dans ce cas, "29.92 pouce / "). Si je fait une macros par enregistrement des touches, au lieu de m'enregistrer l'action "Delete" elle me fait " ActiveCell.FormulaR1C1 = " 1013 hPa" ". A la cellule suivante elle recopiera " 1013 hPa" au lieu de laisser la valeur de cette nouvelle cellule.
J'utilise Excel 2002 SP3 Merci de votre aide et bonnes salutations
