Rajouter une valeur juste avant la dernière parenthèse.

Fermé

Maxime - 23 févr. 2021 à 15:01
yg_be Messages postés 23476 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 20 février 2025 - 23 févr. 2021 à 17:57

Bonjour,

J'ai une formule du type:

=Data( ($AV244 ); ( $H244) )

J'aimerais pouvoir, à chaque fois que j'ai une cellule qui contient "Data((cellule1);(cellule2))" rajouter à la fin de la de la cellule 2 : -1,5
Ce qui donnerait : "Data((cellule1);(cellule2); -1,5)

J'imagine que cela doit être possible avec :

Selection.Replace What:=sAvant, Replacement:=sApres, LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False

Mais je ne vois pas bien comment m'y prendre.

Merci d'avance pour votre aide.

Configuration: Windows / Edge 18.17763

A voir également:

Rajouter une valeur juste avant la dernière parenthèse.
Dernière version ccleaner gratuit français - Télécharger - Nettoyage
Supprimer dernière page word - Guide
Dernière version chrome - Accueil - Applications & Logiciels
Retrouver mon compte copains d'avant - Forum Réseaux sociaux
Copains d'avant qui a visité mon profil ✓ - Forum Réseaux sociaux

2 réponses

Réponse 1 / 2

yg_be Messages postés 23476 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 20 février 2025 Ambassadeur 1 568
23 févr. 2021 à 15:13

bonjour,
ne devrais-tu pas commencer par faire une boucle pour parcourir toutes les cellules?

Réponse 2 / 2

Maxime
23 févr. 2021 à 15:33

Bonjour,

J'ai testé ceci, pour parcourir les cellules et effectuer la modification.
Je ne vois juste pas comment rajouter la valeur sur la dernière parenthèse.

Cells.Select
With ActiveCell
 
sAvant = "'=Data( ("
sApres = "" ' je ne vois pas comment rajouter la valeur à la fin. 


Selection.Replace What:=sAvant, Replacement:=sApres, LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False

End With

yg_be Messages postés 23476 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 20 février 2025 1 568
23 févr. 2021 à 16:42

ne suffit-il pas de tester si cela commence par

=data(

, et, si oui, remplacer le dernier caractère par

-1,5)

Maxime > yg_be Messages postés 23476 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 20 février 2025
23 févr. 2021 à 17:10

Ca semble être la meilleur idée aussi, mais je ne vois pas comment lui demander de se baser sur le dernier caractère et d'appliquer derrière -1.5.

Si tu peux m'aguiller ?

Merci d'avance,

yg_be Messages postés 23476 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 20 février 2025 1 568 > Maxime
23 févr. 2021 à 17:57

connais-tu les instructions de manipulation de chaines de caractère en VBA?

Discussions similaires

Problème de restrictions

Faire un crochet sur le clavier

parenthese crochet

document html

je voudrais accéder à mon compte copains d'avant