B
Bill (Unique as my name)
Is there a way to change the text code below into a loop?
I tried the following, but it did not work
dim vso
for vso = 2001 to 2028
[Forms]![Tovavrs]![vso] = [Forms]![Tovavrs]![Text335]
next vso
Thanks in advance1
'values for the default vvmodels for the form tovars
[Forms]![Tovavrs]![2001] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2002] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2003] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2004] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2005] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2006] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2007] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2008] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2009] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2010] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2011] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2012] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2013] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2014] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2015] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2016] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2017] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2018] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2019] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2020] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2021] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2022] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2023] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2024] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2025] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2026] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2027] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2028] = [Forms]![Tovavrs]![Text335]
I tried the following, but it did not work
dim vso
for vso = 2001 to 2028
[Forms]![Tovavrs]![vso] = [Forms]![Tovavrs]![Text335]
next vso
Thanks in advance1
'values for the default vvmodels for the form tovars
[Forms]![Tovavrs]![2001] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2002] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2003] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2004] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2005] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2006] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2007] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2008] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2009] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2010] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2011] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2012] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2013] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2014] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2015] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2016] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2017] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2018] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2019] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2020] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2021] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2022] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2023] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2024] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2025] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2026] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2027] = [Forms]![Tovavrs]![Text335]
[Forms]![Tovavrs]![2028] = [Forms]![Tovavrs]![Text335]