Search results

That works perfectly, thank you very much..

Dear Forum, the Application.FollowHyperlink works well, however I make several png images per day. What should the syntax be like if I want to use a variable for (20). Option Compare Database Option Explicit Private S As String Private X As Integer Private Sub Knop6_Click() X = 1 S =...

Saw this: https://www.access-programmers.co.uk/forums/threads/colour-converter-selector.302041/ what a nice app that is. Have taken the liberty to change it slightly. It seems to me that choosing a certain color is now visually a little easier. Have fun with it, greetings Lampje.

Uncle Gizmo, Pat Hartman, jdraw Thank you very much for your time and contribution to find a solution to this problem. My way of thinking went too far, the solution was simpler than my thought. Now made a Public variable with which a comparison can be made. Greeting, L

Uncle Gizmo, With Mouseover I want to call a module, this is a one-time to read the controls in the subform. When I return, I read the controls of the form again. Greeting, L

Forum, wants to ask with vba if I am in a form or a subform. Not the name, but for example 1(form) or 2(subform) Greeting, L

Thanks arnelgp, but also does not display the correct buttons. Possibly some things can be disturbed by various Functions that determine whether the Buttons are visible / invisible. In the way I indicated, it works properly. Thank you for indicating that it should be at current. Regards L

Best arnelgp a nice routine, unfortunately when I go to the next record it is no longer correct. There should be 4 buttons visible, but I only see 3. Fortunately, I saw the light on and by putting z = z + 284 (in my code) in front of the Else, it now works as desired. In any case, many...

Considered Forum, a number of buttons (Fig 1) can be visible/invisible at will (Fig 2). With the code I get the result in (Fig 3), but I can't get it as (Fig 4). Would you like to help me find the right code? For x = 1 To 8 If Me("B" & x).Visible = True Then Me("B" & x).Move...

Data comes from the Subform see image.

=[Expendaturetbl]! [Totalen]

Is dit wat je wilt,

Thank you very much for the correct syntax. Had already tested the necessary codes for this. Many thanks, greetings Cor.

Forum, you want to help me with the right syntax. Now get an error message that the element is not found.

@Cotswold My excuse me, I had added the wrong database. Gr. L

In the base, use the Line Input Import Text button Gr. L

If a + is always used as a separator and the order is always the same, then you could possibly use the Split function. Private Sub enjoy_DblClick(Cancel As Integer) Dim res() As String res = Split(enjoy, "+") MsgBox res(1) & "-" & res(3) & "-" & res(2) & "-" & Left$(res(4), 7) End Sub Gr. Lampje

Gasman, That's right, that's not necessary either, thanks for the advice. Gr. Lampje