Format heure dans un textbox

  • Initiateur de la discussion Munchkin
  • Date de début
M

Munchkin

Guest
Bonjour tout le monde

Le problème c'est que qd j'ouvre le userform, je perds le format Heure de la cellule (de laquelle je récupère la valeur)

meme avec visual basic j'ai pas réussi
Comment faire?

Munchkin
 
A

Arnaud

Guest
salut,

écris plutot un truc du style :

Private Sub UserForm_Activate()
nConfig.Value = ActiveCell.Value
ActiveCell.Offset(0, 1).Select

TempsActu.Value = Format(ActiveCell.Value, "hh:mm")


ActiveCell.Offset(0, -1).Select

Dim dernieremplacement As String
dernieremplacement = Range("b1").End(xlDown).Address
ComparerConfig.TempsPassage.RowSource = "'CONFIG'!b1: " & dernieremplacement & ""


dernieremplacement = Range("a1").End(xlDown).Address
ComparerConfig.ListeConfig.RowSource = "'CONFIG'!a1: " & dernieremplacement & ""


End Sub
 
H

herve

Guest
Bonjour, Munchkin...,

bonjour le forum,

sans chercher a comprendre, j'ai juste modifié la place de ta ligne de format du textbox cela devient :

Private Sub UserForm_Activate()

nConfig.Value = ActiveCell.Value
ActiveCell.Offset(0, 1).Select

TempsActu.Value = ActiveCell.Value
TempsActu.Value = Format(Date, "hh:mm")

ActiveCell.Offset(0, -1).Select

etc...
etc...

End Sub

le textbos affiche alors 00:00, ce qui semble etre le format demande. reste a lui donner une valeur et voir ce que cela donne...

esperant t'avoir aidé,

@+ Hervé
 
M

Munchkin

Guest
Salut Arnaud, je pense que tu n'as rien changé dans le code, c'est le meme que j'avais, mais bon il marche, je pense qu'il y avait un petit bug, le problème venait d'ailleurs

Merci quand meme

Munchkin
 
H

herve

Guest
re
Si SI arnaud a change quelque chose :

TempsActu.Value = Format(ActiveCell.Value, "hh:mm")

cela met la valeur au format sans probleme...

et donc plus de souci.

pour ma soluce, oublie la elle donne rien de plus.

@+ hervé
 

Discussions similaires

Réponses
9
Affichages
481
Réponses
15
Affichages
584

Statistiques des forums

Discussions
312 500
Messages
2 089 004
Membres
104 003
dernier inscrit
adyady__