Formule excel pour inverser un montant

Résolu
cesam69 -  
 cesam69 -
Bonjour,

Je souhaiterais inverser un prix:

pour que par une formule je puisse avoir pour 150,50 résultat: 05,051

Merci de Votre aide

9 réponses

ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
ce sont effectivement des macros
pour les integrer
Al-F11 pour passer sous l'editeur VBA
Insertion Module
recopier la maro (copier/coller marche
revenir sur la feuille de calcul
tu disposes maintenant d'une (de deux) nouvelle fonction
que tu peux utiliser comme une fonction excel
ex si tu as 3,14 en A1
en A2 = inverse(A1) devrait donner 41,3
ou avec celle de michel_m
A2 = inverser("FR";A1;PDF) devrait donner FR41,3PDF
si tu veux que la "," soit transformée en "."
tu dis on te fera la modif

bon courage
1
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Function inverser(prefixe, chiffre, suffixe) As String
inverser = Replace(prefixe & StrReverse(chiffre) & suffixe, ",", ".")
End Function
1
Vaucluse Messages postés 26496 Date d'inscription   Statut Contributeur Dernière intervention   6 438
 
Je ne crois pas qu'il y ait de solution.
Pouvez vous nous dire quel est le but pour que l'on puisse chercher un peu plus précisément, et avoir quoi vous voulez faire cela.
Crdlmnt
0
cesam69
 
Bonjour,

oui, le but c'est de cacher un prix dans une référence pour que les visiteurs ne puisse pas lire le prix et uniquement les vendeurs.

Par exemple un prix de 150,50 puisse devenir FR05.051PDF par exemple.
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
essayer la fonction

Function Inverse(ByVal x As String) As String   
  If x = "" Then   
    Exit Function   
  Else   
    Inverse = Right(x, 1) & Inverse(Left(x, Len(x) - 1))   
  End If   
End Function
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
bonjour
peut-^tre plus simple

Function inverser(prefixe, chiffre, suffixe) As String
inverser = prefixe & StrReverse(chiffre) & suffixe
End Function


préfixe: fr
chiffre cellule qui contient le montant
suffixe: pdf

par exeemple montant en B3
inverser("fr",B3,"pdf")
0
cesam69
 
Merci pour vos réponses mais désolé je ne comprends pas c'est des formules macro ? ou excel
0
cesam69
 
C'est extra, merci.

Oui j'aimerai que "," soit transformée en "."

Merci de me dire Comment faire
0
cesam69
 
J'arrive à faire marcher la macro de CCM81 mais pas celle de michel_m

Pourquoi?
0
cesam69
 
Oui c'est bon.

Merci Michel_m et CCM81 de votre précieuse aide
0