Search results

Fails regardless where i put the code:right after the openreport command or on the open event of the report: command not available

unfortunately it does not work, it keeps the same status.

Hi, I have a button to bring up a report in a pop up mode (acDialog). However i need always need to click on the report itself to zoom in. Is there a way to do it via VBA i.e upon opening it zooms itself? thank you

yes sure and used several times. it is only i am trying to find out why the ubound function fails

Actually everything works fine, it is only ubound value that fails

also 0

Public Sub HorseSelectionForInvoice() Dim hl As Recordset Dim strHL As String On Error Resume Next Dim rc As Long strHL = "SELECT HorseID FROM tbHorse WHERE Mark=-1;" Set hl = CurrentDb.OpenRecordset(strHL) hl.MoveLast hl.MoveFirst HLforInvoice = hl.GetRows(hl.RecordCount) rc = hl.RecordCount...

Hi, I have a modul that creates a dynamic array which is made public. The array works, contains the appropriate values. However if i want to check ubound function it gives a result of 0. The array is not empty. Just curious why. thank you

it is indeed a continous form

Conditional formatting does not allow the hyperlink display to set. Yes that is correct it is not a real URL it should just look one. If the field shows 500 i want to click on it to perform another action and i would like to have the hand cursor over it.

I did correct it. Still does not work. Private Sub Packing_GotFocus() Dim ctlCurrentControl As control Dim strControlName As String Dim strcontrolvalue As Long Dim strControlcolor As Variant Set ctlCurrentControl = Screen.ActiveControl strControlName = ctlCurrentControl.Name strcontrolvalue =...

this is what i am trying to get working. If the filed contains 500 then it should display itself as hyperlink. Private Sub Packing_GotFocus() Dim ctlCurrentControl As control Dim strControlName As String Set ctlCurrentControl = Screen.ActiveControl strControlName = ctlCurrentControl.Name...

If that certain control has the focus i.e. the active control i would like to have it display as hypertext and have different backcolor. Only in case of controls that have a certain text string value. I have tried to google the use of active control but did not find the description i was...

Hi, I would like to know how to use this Dim ctlCurrentControl As Control Set ctlCurrentControl = Screen.ActiveControl If ctlCurrentControl.Name = "txtCustomerID" Then . . ' Do something here. . ElseIf ctlCurrentControl.Name = "btnCustomerDetails" Then . . ' Do something here. . End If...

Thank for all the inputs. I got confused because the VBA editor did not offer those parameters. I am used to use the editor with idea that only those parameters are allowed that show up after typing a dot. Following the recommendations, i got it worked. Thanks for all of you.

Code library might be the real problem. Controltype or typename is not offered when i type ctr and dot.

Yes i did. I do not see of the option ctr.TypeName. It gives an error.

did that, does not work

I am the only one using that DB. But i am testing your solutions. Thank you so much!

Hi, I can not figure out how to loop through the controls in a form. The tutorials seems not working with MS Access 365. Dim ctr As Controls For Each ctr in me.controls if ctr.TypeName=acTextBox then msgbox ctr.name end if next ctr This is just the testing example...