Search results

Sure.......Within the code for your command button: Me.Controls("optExtentGroup" & Me.optNatureandExtentGroup.Value).BackStyle = 0 'Transparent Me.Controls("optExtentGroup" & Me.optNatureandExtentGroup.Value).ForeColor = vbBlack .

oxicottin, If the controls are all Radio Buttons and they are contained within a Frame control, it doesn't matter how many controls you have. The code will work with them all however, you will need to ensure that the child Label Name for each Radio button is named exactly the same except the...

OR..... Me.MyControlName.Controls(0).Name will also give you the name of the child label associated with the named control when used locally within a Form's Code Module. But... Can sometimes provide some nightmarish results when using this method to reference child Labels of controls within...

In my opinion...the best way to go here since this is basically a typical search Form is to first ensure that the SubForm controls' Link Child Fields and Link Master Fields properties are empty. We want to modify the Record Source property of the SubForm itself by applying the necessary query...

Try this within the AfterUpdate event for whichever Text Box: If Len(Me.MyTextBoxName & "") > 0 Then DoCmd.RunCommand acCmdSpelling Else Exit Sub End If If you want to Spell check several Text Boxes and in any Form you want then it's better to place the code into a Public Function and...

I forgot to mention....to clear the selections within a Frame Control: Me.MyFrameControlName.Value = 0 .

The following procedure, when placed into the OnClick event of a Frame control will change both the Fore-ground and back-ground colors of a radio buttons' label contained within that Frame. First...the procedure changes the Back-Style for child Labels to all Radio Buttons to Transparent and...

I also found the code to work. What exactly is it not doing that you want it to do? I agree with pbaldy as towards hard-coding dates. You will be forced to change the code every year. An alternative perhaps may be to allow the function to accept a optional Year to base from, or pull the Year...

Thank you nIGHTmAYOR for the explanation. Again, this is something I have never encountered but I will definitely keep my eyes open for. Thanks for sharing that tidbit of information. .

This is an interesting procedurenIGHTmAYOR for applying a Form Wide (module) variable. I have never seen this before and I must admit, my curiosity has now gotten the better of me. Perhaps I have been missing something that could save me headaches down the road. Can you please explain why this...

Personally themanof83, I hate the function and basically never use it. I find it clunky and only good until a menu change happens with the application you are using it against. For certain things...fine...for this accessing the menus of another application...I don't care for it. If you check the...

Well....What does it do now when it's selected? What is the underlying code or Macro that is run when the Combo Item is selected? The way I interpret your initial post (and I an probably wrong with this) is this: You have a Main Form and in it there is a Combo Box (let's say it's named...

Dim myArray() is the same as Dim myArray() As Variant Default for Variables in VBA is Variant. I personally have never had an issue with Arrays within Access VBA or any other VBA or VB. There are no references for the Split function just the Version of VBA you are using.

The Split function should work unless you are running a version of Access that does not contain it within the VBA Language. There is an alternative function you can try that was written by Allen Browne. It is named ParseWord. .

What Code are you currently using to open a PDF file now? Obviously, you will need to open two instances of Adobe (or some other PDF file reader) in order to view both files. You can use Windows API functions to size and position each PDF File but.....It's far easier to view both files within...

If fIsLoaded("Mala_dir_para_Grupos") = True Then Me.MyCombo = Me.MyCombo.ItemData(1) ElseIf fIsLoaded("Mail_para_Grupos") = True Then Me.MyCombo = Me.MyCombo.ItemData(0) End If Call MyCombo_Click .

Me.MyComboBoxName.Value I don't see a reference to a ComboBox within your code :confused: .

If you have a string that you know is delimited, which appears to be the case here, then in my opinion the easiest way to pull the individual elements from the string is by using the Split function and place all the string elements into an array. For example: Dim MyArray() as Variant Dim...

If you have created the Calendar yourself and it isn't a Calendar Control from a .ocx or ActiveX of some sort then you can simply use Conditional Formating on the controls for each day within the Calendar. .

In my opinion, this could be a number of things: Memory Access Error, OverFlow, Out Of Stack Space, etc. Without a error number it's difficult to really tell. Ensuring that objects are closed properly and killed after every use will provide a far more reliable result than if they are not...