hvordan med denne medmindre jeg bare ikke fatter hat :-)

Private Sub CommandButton1_Click()
   

     UserForm1.TextBox1.Text = Application.WorksheetFunction.Text(Sheets("Ark1").Range("A2"), "[hh]:mm")


    UserForm1.Label1 = Application.WorksheetFunction.Text(Sheets("Ark1").Range("A2"), "[hh]:mm")


    UserForm1.Show


   
End Sub

Formatet "hh:mm" kan kun vise op til 24 timer.

Derfor søger jeg en formel med formatet "[hh]:mm".

Prøv at lave en simpel sammentælling af to klokkeslæt i to celler.
F.eks. 20:00 + 10:00, = 30:00 timer

I facit bruger du først Brugerdefineret Formatet "tt:mm" (dansk format i cellerne).

Her vil det beregne 06:00 timer, da den først beregner op til 24:00 hvorefter den starter forfra op til 06.00.
24:00 + 06:00 = 30:00.

Næst ændre du formatet i facit til "[tt]:mm". og så vil det beregne rigtigt = 30:00.

Jeg har en Userform med over 200 Labels., der skal vise et facit, når nogle værdier ændres.

Dem vil jeg nødig lave om til Textboxe, som kan håndtere formatet [hh]:mm, men det kan være nødvendigt.

Tak for dit input 

Ib

Denne virker 

UserForm1.Label1 = Sheets("Ark1").Range("A2") UserForm1.Label1 = Application.WorksheetFunction.Text(Sheets("Ark1").Range("A2"), "[hh]:mm")

Tusind tak 

Ib