diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,5 +1,9 @@
 # Changelog for simple-media-timestamp-formatting
 
+## v0.1.1.0
+
+* Add `rangeaf` formatter.
+
 ## v0.1.0.0
 
 * Add formatters for ffmpeg's timestamp format and srt's timestamp format.
diff --git a/simple-media-timestamp-formatting.cabal b/simple-media-timestamp-formatting.cabal
--- a/simple-media-timestamp-formatting.cabal
+++ b/simple-media-timestamp-formatting.cabal
@@ -5,7 +5,7 @@
 -- see: https://github.com/sol/hpack
 
 name:           simple-media-timestamp-formatting
-version:        0.1.0.0
+version:        0.1.1.0
 synopsis:       Formatting for simple-media-timestamp
 description:    Please see the README on GitHub at <https://github.com/githubuser/simple-media-timestamp-formatting#readme>
 category:       Media
diff --git a/src/Media/Timestamp/Formatting.hs b/src/Media/Timestamp/Formatting.hs
--- a/src/Media/Timestamp/Formatting.hs
+++ b/src/Media/Timestamp/Formatting.hs
@@ -9,6 +9,7 @@
 module Media.Timestamp.Formatting
   ( timef,
     timecf,
+    rangeaf,
   )
 where
 
@@ -26,3 +27,10 @@
 -- @since 0.1.0.0
 timecf :: Format r (Time -> r)
 timecf = accessed hour int % ":" <> accessed minute int % ":" <> accessed second int % "," <> accessed millisecond int
+
+-- | Formats a `Range` as "X --> Y", Formatter for SRT format will
+-- therefore be rangeaf timecf.
+--
+-- @since 0.1.1.0
+rangeaf :: Format r (Time -> r) -> Format r (Range -> r)
+rangeaf x = accessed from x % " --> " <> accessed to x