diff --git a/components/board.upload/R/upload_server.R b/components/board.upload/R/upload_server.R
index 1f465d34f..e26839421 100644
--- a/components/board.upload/R/upload_server.R
+++ b/components/board.upload/R/upload_server.R
@@ -631,9 +631,14 @@ UploadBoard <- function(id,
       return(pgx)
     })
 
+    # reset wizard when computation is finished
+    observeEvent(input$reset_wizard, {
+      browser()
+      wizardR::reset("upload_wizard")
+    })
+
     # wizard lock/unlock logic
 
-    
     # lock/unlock wizard for samples.csv
     observeEvent(
       list(uploaded$counts.csv, checked_counts, input$upload_wizard), {
diff --git a/components/board.upload/R/upload_ui.R b/components/board.upload/R/upload_ui.R
index e039f7ae0..2e553c67a 100644
--- a/components/board.upload/R/upload_ui.R
+++ b/components/board.upload/R/upload_ui.R
@@ -16,6 +16,7 @@ UploadUI <- function(id) {
   
   samples_ui <- wizardR::wizard_step(
     step_title = "Samples",
+    shiny::actionButton(ns("reset_wizard"), "Reset", icon = icon("refresh")),
     upload_table_preview_samples_ui(
       ns("samples_preview")
     )