diff --git a/valid_variables_script2.R b/valid_variables_script2.R
index 22771bc38852b7368fdbe4127ec1ec76300e3648..1b2221db2a9c0662ab0f11a9dd07e9d85b3ad6b4 100644
--- a/valid_variables_script2.R
+++ b/valid_variables_script2.R
@@ -137,8 +137,12 @@ check_values_format <- function(valid_columns, codebook_param){
     current_column <- valid_columns[[1]][[i]]
     print(current_column)
     variable_type <- codebook_param$Variable.type[codebook$Harmonised.variable.name == current_column]
+    
+    if (is.na(variable_type)){
+      next
+    }
    
-    if(!is.na(variable_type) && variable_type == "Continuous"){
+    if(variable_type == "Continuous"){
       
       ################## ESTO PODRÍA IR EN UNA FUNC DIFERENTE #############
       
@@ -185,7 +189,7 @@ check_values_format <- function(valid_columns, codebook_param){
       )
       ################## FIN ESTO PODRÍA IR EN UNA FUNC DIFERENTE #############
       
-    }else if (!is.na(variable_type) && (variable_type == "Categorical" || variable_type == "Binary")){
+    }else if (variable_type == "Categorical" || variable_type == "Binary"){
       contingency_table <- ds.table(paste("data$",current_column))
       counts <- contingency_table[[1]][[3]]
     }