Recent content by GeekinGlasses

Moving controls is relatively simple, by using the .left property of a control in vba. The problem I have is that I want to move option group and it's option boxes without having to code in the .left property for each of the 15 option boxes. I've tried to using .left property of the option...

DOH!!!! Your right Wildhare. And the funny part is, I've used the same code in your example so many times that I should have known.

I've found most of my problems with these are caused by an insidious virus known as "Microsoft". The only way to seem to get rid of this virus is to change over to Linux, or purchase a Mac.

More than likely your running a program such as Dr. Watson. It overrides the normal error message and creates a log file. I originally had the same problem when Excel creating stack errors. You can view the log file with notepad, and look for the section that has the time/date stamp of your...

Without fully knowing what changes you have made over past few days, it's hard to give you specific details. Yes, a tab control is just that, a control. Everything in every tab control will be loaded when the form is loaded. Also, the code in a module loads when the Access database is...

the function you want is DATEDIFF. DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]]) code would be: Dim NumOfDays; NumOfDays=DateDiff("d",ButTheDateFromRecordHere,Now()) Then do an if then comparasion to check if NumOfDays is greater than 90.

The Easiest way I found (and I'm sure there is a better way in VBA code) is to create an unbound form. Then on the ON TIMER event run your macro (ie macro2), then set the TIMER INTERVAL to 900,000. (1000 = 1 second)

jhall, Oh, I re-read your posts and your right. I've just always found it best to code in the date to equal a value when the control is unbound. I've had problems with access assigning the current date with older versions of the calendar control.

jhall, I agree that if the control is bound to the data, then tabing through the controls will change the data. But your way does the same thing, does it not?

Most of Sybex Access 97 books are worth the money. Another FREE resizer I've seen is Fusion ResizeForm you can get it at: http://www.fusiondataservices.co.uk/downloads.htm

ok, leave the control source blank, do not set it to '=Date()'.... better yet... My best advice here is to delete the calendar control and then add a new calendar control in it's place, so that everything is set to it's default (just to make sure nothing was changed) Once you have the new...

oops... Err_Form_Activate should have a : after it

The Follow Err Check is added to your code. If print isn't finished, it waits 3 seconds before it trys to close form again. Private Sub Form_Activate() on error goto Err_Form_Activate Dim Start DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.PrintOut acSelection Close_Form...

wabeg, Without testing it myself, try placeing extra spaces in the line : BuildWordInfo = "C:\Program Files\Microsoft Office\Office10\WinWord.exe" & DocName & MacroName I think it should be: BuildWordInfo = "C:\Program Files\Microsoft Office\Office10\WinWord.exe " &...

You really shouldn't be using an incremental counter for this. You should read the field form the table and increment it by one for the first formw's box, then set the control source on the second forms box equal to the first form's box plus one.