Managed to get my code working
I'd like to share how I did this
Be mindful that x was a varying number of fields from 3 to 6.
x was stated as number of samples on my form.
"x = Forms![Density Test]![No of Test]"
So had to be able to calculate from whatever number of fields was required...
Managed to get my code working
I'd like to share how I did this
Be mindful that x was a varying number of fields from 3 to 6.
x was stated as number of samples on my form.
"x = Forms![Density Test]![No of Test]"
So had to be able to calculate from whatever number of fields was required...
Managed to get my code working
I'd like to share how I did this
Be mindful that x was a varying number of fields from 3 to 6.
x was stated as number of samples on my form.
"x = Forms![Density Test]![No of Test]"
So had to be able to calculate from whatever number of fields was required...
I'd like to share how I did this
'Average Density Ratio
For q = 1 To x
Dat4 = Choose(q, Forms![Density Test]!DR1, Forms![Density Test]!DR2, Forms![Density Test]!DR3, Forms![Density Test]!DR4, Forms![Density Test]!DR5, Forms![Density Test]!DR6)
S4 = S4 + Dat4
Next
Forms![Density Test]!MDR = S4 /...
x = Forms![Density Test]![No of Test]
For n = 1 To x
Dat = Choose(n, Forms![Density Test]!DENS1, Forms![Density Test]!DENS2, Forms![Density Test]!DENS3, Forms![Density Test]!DENS4, Forms![Density Test]!DENS5, Forms![Density Test]!DENS5, Forms![Density Test]!DENS6, Forms![Density Test]!DENS7...
In an Access module I'm using this code
x = Forms![Density Test]![No of Test]
For n = 1 To x
Dat = Choose(n, Forms![Density Test]!DENS1, Forms![Density Test]!DENS2, Forms![Density Test]!DENS3, Forms![Density Test]!DENS4, Forms![Density Test]!DENS5, Forms![Density Test]!DENS5, Forms![Density...
Awesome!
Thanks Combo.
Got the VBA to run and close on click
However now using the script
x = Forms![Density Test]![No of Test]
For n = 1 To x
Dat = Choose(n, Forms![Density Test]!DENS1, Forms![Density Test]!DENS2, Forms![Density Test]!DENS3, Forms![Density Test]!DENS4, Forms![Density...
So I tried this and now I still get a compile error
Exit sub not allowed in Function or Property
This was converted from a Macro
'------------------------------------------------------------
' INSITUDENS1
'
'------------------------------------------------------------
Function INSITUDENS1()
On...
OK What am I doing wrong here!
It keeps throwing a sub end/exit error
INSITUDENS1
'
'------------------------------------------------------------
Function INSITUDENS1()
On Error GoTo INSITUDENS1_Err
Forms![Density Test]![Result 1] = Forms![Density Test]!DENS1
Forms![Density...
thread702-1136748
Like the above thread I need to get a std deviataion of a data set on a form.
However, my issue is that my data set could be between 3 and 10 of the circled items.
The remaining 7, 6, 5, 4 fields could be blank.
How do I write this in the macro so it does't throw an error...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.