Anzeige
Archiv - Navigation
1240to1244
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Uhrzeit in Text bringen
Dani
Hallo zusammen
Um mir sehr viel Arbeit zu ersparen, wäre ich froh, wenn in einzelnen Spalten (C, E, H und J) die Uhrzeit mittels VBA vom Format Uhrzeit ins Format Text zu bringen. Wichtig ist, dass im Format Text die Uhrzeit mittels Punkt ausgegeben wird.
Beispiel: 12:13 in 12.13 als Text.
Leider kann ich nicht mit Hilfsspalten oder Formeln arbeiten, da die Werte später in eine andere Tabelle kopiert werden.
Danke schon mal für eure Bemühungen
Gruess Dani

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Uhrzeit in Text bringen
29.12.2011 22:11:19
Josef

Hallo Dani,
probier mal.
Sub ZeitZuText()
  Dim rng As Range, rngC As Range
  
  On Error Resume Next
  Set rng = Range("C:C,E:E,H:H,J:J").SpecialCells(xlCellTypeConstants, xlNumbers)
  On Error GoTo 0
  
  If Not rng Is Nothing Then
    rng.NumberFormat = "hh.mm"
    For Each rngC In rng
      rngC = "'" & rngC.Text
    Next
    rng.NumberFormat = "@"
  End If
  
End Sub



« Gruß Sepp »

Anzeige
AW: Uhrzeit in Text bringen
29.12.2011 22:31:40
Dani
Hallo Sepp
Super dein Code nimmt mir gefühlte 3 Wochen Arbeit ab. Hätte sonst alles von Hand eingeben müssen.
Danke vielmals
Gruess vom nun beruhigten
Dani
;-)

302 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige