diff --git a/R/pre_test_power.R b/R/pre_test_power.R
index d3f1a195..3fe76cc8 100644
--- a/R/pre_test_power.R
+++ b/R/pre_test_power.R
@@ -1990,8 +1990,7 @@ GeoLiftMarketSelection <- function(data,
   if (nrow(resultsM) > 0) {
     resultsM$ID <- 1:nrow(resultsM)
   } else {
-    message("\nWarning: No markets meet the criteria you provided. Consider modifying
-          the input parameters")
+    stop("\nNo markets meet the criteria you provided. Consider modifying the input parameters")
   }
 
   # Re-order columns