Tranfert complexe format heure et €

B

Blandine

Guest
Je tourne en rond et je vous sollicite pour m'aider car j'ai

un ListBox qui affiche 2 colonnes via la Feuil1, colone A formatée en Heure du type 00:00:00 et la colone B formatée monaitaire du type 0,00 €

A la sélection du ListBox un index de la colone 3 doit

remplir un TextBox avec la celulle B1 de la Feuil1, dedans, un chiffre ex. 70

Ce TextBox doit afficher le format 70,00 € ,je précise avec une virgule et un espace avant €.

et lors de la validation d'un bouton "OK"

écriture dans la celulle A1 de la Feuil2 qui sera formatée en VBA avec le format monétaire
(afin de pouvoir plus tard être pris en compte pour des caluculs de somme)

et écriture via le ListBox du contenu de celulle A1 de la Feuil1 vers la celulle A2 de la Feuil2 formaté en VBA au format heure 00:00 afin de faire des totaux sur les celulles qui seront des heures.


MERCI pour vos suggestions...
Blandine
 
S

STéphane

Guest
bonjour



j'ai pas tout compris mais à tout hasard.

For i = 1 To 2
ival = Format(i, "0.00 €")
ActiveSheet.ListBox1.AddItem ival
Next i

dans ta macro qui lit les valeurs, tu devrais ôter les deux derniers caractères.
 
B

Blandine

Guest
Le format "0.00 €" ne va pas il faut une virgule pour somme de plusieur valeur...

ci-joint fichier plus détaillé de l'exemple a obtenir d'après un premier début

MERCI
BLandine
 

Pièces jointes

  • FormatHeure.zip
    22.7 KB · Affichages: 34
  • FormatHeure.zip
    22.7 KB · Affichages: 36
  • FormatHeure.zip
    22.7 KB · Affichages: 35

Discussions similaires

Réponses
12
Affichages
282
Réponses
8
Affichages
669
Réponses
7
Affichages
1 K

Statistiques des forums

Discussions
311 725
Messages
2 081 940
Membres
101 845
dernier inscrit
annesof