Search results

Not sure. If txtSearch is EMPTY (which is when I load the form or clear the txtSearch control for new search) and I type "? Len(Forms!frmFind!txtSearch)" in Immediate window I get "answer" Null. So ...

Sorry, HAPPY TOO SOON. At the end I finished with this part of code: (after getting error "invalide" us of Null) If IsNull(Len(txtSearch)) Then txtSearch.SelStart = 0 Else txtSearch.SelStart = Len(txtSearch) End If BUT (I think there is always BUT) --> BUT while I'm...

I know. But as my names are not English based I only wanted to make code easy to read/understand for others. Clearly mistake. Sorry. Nex time I will try to follow your advice. Sorry again

THanks. You nailed it. I've modified a code just a litle bit. Something like: Inserted new first line: txtSearch.selstart = 0 and added 2 lines before End Sub line like: Me.txtSearch.SetFocus txtSearch.SelStart = Len(txtSearch) WORKING GREAT. THANKS AGAIN

It's not as you may think rs1 and db1 dimmed ad rs and db. Read RED text

Sorry.Typing error while entering code to thread. In real code only db1 and rs1, also dimmed.

Hi. I have following Sub for On Change event: Private Sub txtSearch_Change() Me.txtDummy = Me.txtSearch.Text Dim db As Database Dim rs As Recordset Dim sql As String sql = "SELECT tblProducts.* " & _ "FROM tblProducts " & _ "WHERE...

set RS = me.forms Don't understand this. What you had in mind. I can understand it as "recordset is defined with entries in the me.forms". 🤔

That's exactly what I need (among other controls for which recordsource established with another RS. Anyway, thanks for your reminder. 😉

Worked as nothing. Great help. I was really only missing the correct syntax for Forms(formName).Controls("Text0").ControlSource = "=" & rs.Fields(0).Value. All the rest I already did. I wrote only shorter version of the thread. Sorry not mentioned. But you immeddiatelly knew what I need. ;)

Hi. I have an unboud text box Text0 on a continuous form. I would like to "define" control source for this control after the form is opened - - - > DoCmd.OpenForm("formName", acNormal) like Me.Text0.controlsource = rs(0) where rs.recordcount = 1 Is this anyway possible? Thx in advance

At the end, peace of cake. As always. I found icons I need, will make with with CASE ... is .xls ... Thanks a lot

Thanks moke123. I'm not looking for instructions of how open files on dblClickEvent In my continuous form (recordsource is CHILD table with full path filenames) I'd like to have a control with icons for appropriate file. If, for example, on the form are listed 3 files...

Hi theDBguy. 1. I wanted that attached file is opened on double clicking on file name In .FileName "field" I wasn't able to get full path name with LoadFromFile method - only the name of the file 2. Then I found out (some tutorials) that attachment fields are big "memory consumers" 3. For...

Hi everybody. I was working with attachment field. Noticed that attachment field in reality consists of (lets say the field name is "Attach") - Attach.FileData - Attach.FileName - Attach.FileType In attachment field I have attached different files, with their names. In the form I had...

Dim Forma As String Dim Kontrola As Control Dim ImeKontrole As String ImeKontrole = "" Forma = "" Forma = Forma + Forms!frmDBox!cboImena.Value DoCmd.OpenForm Forma, acDesign For Each Kontrola In Forms(Forma).Controls If Left(Kontrola.Name, 5) <> "Label" Then ImeKontrole =...

... continue I don't know how to: 1. Open form with DoCmd.Openform ValueOfTheComboBox2 , acDesign 2. make loop with Forms!ValueOfTheComboBox2.Controls Any suggestion???

Clicked Post replay to fast ...

Hi. Ad1. I think making a loop will not be a problem (hope). Ad2. The real problem for me is: FOR EACH Control IN Forms!ValueOfTheComboBox2.Controls Let's say the value in second combo box is selected name of the form frmMyForm I don't know how to: put the value of second...

You have propably noticed typing mistake: WRONG: For Each c In Forms!s.Controls CORRECT: For Each c In Forms!f.Controls