diff --git a/R/plot-grid.R b/R/plot-grid.R
index 7e26b9f8..ccea790c 100644
--- a/R/plot-grid.R
+++ b/R/plot-grid.R
@@ -140,7 +140,7 @@ plotGrid <- function(plotGridConfiguration) {
 PlotGridConfiguration <- R6::R6Class(
   "PlotGridConfiguration",
   public = list(
-    plotList = NULL,
+    plotList = list(),
     title = NULL,
     subtitle = NULL,
     caption = NULL,
@@ -164,6 +164,52 @@ PlotGridConfiguration <- R6::R6Class(
     #' @return A `PlotGridConfiguration` object.
     initialize = function(plotList = NULL) {
       self$plotList <- plotList
+    },
+
+    #' @description Add a plot object.
+    #'
+    #' @param plots A single or a list containing `ggplot` object(s).
+    #'
+    #' @examples
+    #'
+    #' library(ggplot2)
+    #'
+    #' myPlotGrid <- PlotGridConfiguration$new()
+    #'
+    #' # You can add a single ggplot object
+    #' p <- ggplot(mtcars, aes(wt, mpg)) + geom_point()
+    #' myPlotGrid$addPlots(p)
+    #'
+    #' # Or you can also pass a list
+    #' myPlotGrid$addPlots(list("p1" = ggplot(), "p2" = ggplot()))
+    #'
+    #' # Since we added three plots, the `plotList` field should
+    #' # now be a list of length `3`
+    #' length(myPlotGrid$plotList)
+    #'
+    #' @return `PlotGridConfiguration` object with `$plotList` field updated to
+    #'   store entered plots.
+    addPlots = function(plots = NULL) {
+      if (!is.null(plots)) {
+        validateIsOfType(plots, "ggplot")
+
+        # When only single instance of `ggplot` object is entered:
+        # `addPlots = ggplot()`
+        if (objectCount(plots) == 1L) {
+          # This single object needs to be converted to a list *only if* it
+          # already hasn't been entered in a list: `addPlots = list(ggplot())`.
+          #
+          # `ggplot` objects themselves are lists, but they will always have a
+          # length greater than 1. That's how we can distinguish between
+          # `ggplot` object itself as a list and the same object stored in a
+          # list.
+          if (is.list(plots) && length(plots) > 1L) {
+            plots <- list(plots)
+          }
+        }
+
+        self$plotList <- append(self$plotList, plots)
+      }
     }
   )
 )
diff --git a/man/PlotGridConfiguration.Rd b/man/PlotGridConfiguration.Rd
index 1ab4b58b..e9ac8522 100644
--- a/man/PlotGridConfiguration.Rd
+++ b/man/PlotGridConfiguration.Rd
@@ -10,6 +10,29 @@ A \code{PlotGridConfiguration} object.
 R6 class defining the configuration for \code{{patchwork}} plot grid used to
 create a grid of plots from \code{{tlf}}. It holds values for all relevant
 plot properties.
+}
+\examples{
+
+## ------------------------------------------------
+## Method `PlotGridConfiguration$addPlots`
+## ------------------------------------------------
+
+
+library(ggplot2)
+
+myPlotGrid <- PlotGridConfiguration$new()
+
+# You can add a single ggplot object
+p <- ggplot(mtcars, aes(wt, mpg)) + geom_point()
+myPlotGrid$addPlots(p)
+
+# Or you can also pass a list
+myPlotGrid$addPlots(list("p1" = ggplot(), "p2" = ggplot()))
+
+# Since we added three plots, the `plotList` field should
+# now be a list of length `3`
+length(myPlotGrid$plotList)
+
 }
 \section{Public fields}{
 \if{html}{\out{<div class="r6-fields">}}
@@ -82,6 +105,7 @@ in the grid. Will get repeated to match the dimensions of the grid.}
 \subsection{Public methods}{
 \itemize{
 \item \href{#method-new}{\code{PlotGridConfiguration$new()}}
+\item \href{#method-addPlots}{\code{PlotGridConfiguration$addPlots()}}
 \item \href{#method-clone}{\code{PlotGridConfiguration$clone()}}
 }
 }
@@ -104,6 +128,50 @@ Create an instance of \code{PlotGridConfiguration} class.
 \subsection{Returns}{
 A \code{PlotGridConfiguration} object.
 }
+}
+\if{html}{\out{<hr>}}
+\if{html}{\out{<a id="method-addPlots"></a>}}
+\if{latex}{\out{\hypertarget{method-addPlots}{}}}
+\subsection{Method \code{addPlots()}}{
+Add a plot object.
+\subsection{Usage}{
+\if{html}{\out{<div class="r">}}\preformatted{PlotGridConfiguration$addPlots(plots = NULL)}\if{html}{\out{</div>}}
+}
+
+\subsection{Arguments}{
+\if{html}{\out{<div class="arguments">}}
+\describe{
+\item{\code{plots}}{A single or a list containing \code{ggplot} object(s).}
+}
+\if{html}{\out{</div>}}
+}
+\subsection{Returns}{
+\code{PlotGridConfiguration} object with \verb{$plotList} field updated to
+store entered plots.
+}
+\subsection{Examples}{
+\if{html}{\out{<div class="r example copy">}}
+\preformatted{
+library(ggplot2)
+
+myPlotGrid <- PlotGridConfiguration$new()
+
+# You can add a single ggplot object
+p <- ggplot(mtcars, aes(wt, mpg)) + geom_point()
+myPlotGrid$addPlots(p)
+
+# Or you can also pass a list
+myPlotGrid$addPlots(list("p1" = ggplot(), "p2" = ggplot()))
+
+# Since we added three plots, the `plotList` field should
+# now be a list of length `3`
+length(myPlotGrid$plotList)
+
+}
+\if{html}{\out{</div>}}
+
+}
+
 }
 \if{html}{\out{<hr>}}
 \if{html}{\out{<a id="method-clone"></a>}}
diff --git a/tests/testthat/test-plot-grid.R b/tests/testthat/test-plot-grid.R
index a3d762b5..38da0b88 100644
--- a/tests/testthat/test-plot-grid.R
+++ b/tests/testthat/test-plot-grid.R
@@ -43,3 +43,24 @@ test_that("plots grid is rendered correctly", {
   #   fig = plotGrid(plotGridObj)
   # )
 })
+
+test_that("adding plots works with plots grid configuration", {
+  myPlotGrid <- PlotGridConfiguration$new()
+
+  # adding single plot works
+  myPlotGrid$addPlots(ggplot())
+
+  expect_equal(length(myPlotGrid$plotList), 1L)
+
+  # adding a list of plot works
+  myPlotGrid$addPlots(list("p1" = ggplot(), "p2" = ggplot()))
+
+  expect_equal(length(myPlotGrid$plotList), 3L)
+
+  # adding a list of a single plot also works
+  myPlotGrid$addPlots(list("p3" = ggplot()))
+
+  expect_equal(length(myPlotGrid$plotList), 4L)
+
+  expect_equal(names(myPlotGrid$plotList), c("", "p1", "p2", "p3"))
+})