diff --git a/R/dataFormatting.R b/R/dataFormatting.R
index a43bc8b..bb672a1 100644
--- a/R/dataFormatting.R
+++ b/R/dataFormatting.R
@@ -273,6 +273,10 @@
     ) 
   )
 
+  if(ncol(message_table) == 0) {
+    return(NULL)
+  }
+  
   for(i in ncol(message_table)) {
     attributes(message_table[[i]]) <- list(units = units[i])
   }