VBA Excel Array inside an Array 1

[remeng]

Hi,

Is there a way to create an array inside an array? Apparently there is a limit to the number of values that can be passed from one sub to another sub. Here is what I am trying to do.

final result - seems to have a character limit:

call test(
current_data_record,  current_narrative_split_value,  current_veneer_material_grade_row,  current_veneer_part_path_series_row,  current_veneer_mach_dest_row, current_veneer_non_p_plan_length_table_row,  current_veneer_p_grade_suite_plan_length_table_row, current_veneer_p_grade_non_suite_plan_length_table_row, data_material_index, data_narrative_index, data_part_path_index, data_quantity_each_index, data_Model_Number_index, data_Model_Number_index, veneer_rule_material_grade_exception_grade_index, veneer_rule_part_path_series_index, veneer_rule_part_planning_req_index, veneer_rule_grade_index, veneer_rule_grade_ID_index, veneer_rule_species_index, veneer_rule_species_ID_index, veneer_rule_machine_species_index, veneer_rule_machine_ID_index, veneer_rule_non_p_min_index, veneer_rule_non_p_max_index, veneer_rule_non_p_dim_index, veneer_rule_p_suite_grade_index, veneer_rule_p_suite_mach_dest_index, veneer_rule_p_suite_mach_dest_index, veneer_rule_p_non_suite_grade_index, veneer_rule_p_non_suite_min_index, veneer_rule_p_non_suite_max_index, veneer_rule_p_non_suite_dim_index, total_data_record_count, veneer_rule_material_grade_count, veneer_rule_part_path_count, veneer_material_grade_path_count, veneer_material_species_count, veneer_machine_count, veneer_non_p_count, veneer_p_suite_count, veneer_p_non_suite_count)

sub test(
current_data_record,  current_narrative_split_value,  current_veneer_material_grade_row,  current_veneer_part_path_series_row,  current_veneer_mach_dest_row, current_veneer_non_p_plan_length_table_row,  current_veneer_p_grade_suite_plan_length_table_row, current_veneer_p_grade_non_suite_plan_length_table_row, data_material_index, data_narrative_index, data_part_path_index, data_quantity_each_index, data_Model_Number_index, data_Model_Number_index, veneer_rule_material_grade_exception_grade_index, veneer_rule_part_path_series_index, veneer_rule_part_planning_req_index, veneer_rule_grade_index, veneer_rule_grade_ID_index, veneer_rule_species_index, veneer_rule_species_ID_index, veneer_rule_machine_species_index, veneer_rule_machine_ID_index, veneer_rule_non_p_min_index, veneer_rule_non_p_max_index, veneer_rule_non_p_dim_index, veneer_rule_p_suite_grade_index, veneer_rule_p_suite_mach_dest_index, veneer_rule_p_suite_mach_dest_index, veneer_rule_p_non_suite_grade_index, veneer_rule_p_non_suite_min_index, veneer_rule_p_non_suite_max_index, veneer_rule_p_non_suite_dim_index, total_data_record_count, veneer_rule_material_grade_count, veneer_rule_part_path_count, veneer_material_grade_path_count, veneer_material_species_count, veneer_machine_count, veneer_non_p_count, veneer_p_suite_count, veneer_p_non_suite_count)

'do a lot of stuff with these variables

end sub

possible work around using nested arrays // array inside array:

one = array_one(current_data_record,  current_narrative_split_value,  current_veneer_material_grade_row,  current_veneer_part_path_series_row,  current_veneer_mach_dest_row, current_veneer_non_p_plan_length_table_row)

two = array_two(current_veneer_p_grade_suite_plan_length_table_row, current_veneer_p_grade_non_suite_plan_length_table_row, data_material_index, data_narrative_index, data_part_path_index, data_quantity_each_index)

three = array_three(data_Model_Number_index, data_Model_Number_index, veneer_rule_material_grade_exception_grade_index, veneer_rule_part_path_series_index, veneer_rule_part_planning_req_index, veneer_rule_grade_index)

etc....

call test(array(one),array(two),array(three), etc..)

any ideas?

Mike

 

[SkipVought]

Basically it was Management driven.

I'm SHOCKED!

"Oh the humanity!"

"Say it ain't so, Joe!"

And Now for Something Completely Different:

No, Constance has no constants. She's fickle.



Skip,
[sub]
Just traded in my OLD subtlety...
for a NUance![/sub]
"The most incomprehensible thing about the universe is that it is comprehensible" A. Einstein