Recent content by knownote

I usually save to notepad or Access, but Tweets require Word to see gray hyperlinks, which must be separately selected between double quotes from within Hyperlink tag. (Not a Programmer nor write code.) Instead of extracting only links in wrong order to a new doc .. Below code (I changed)...

What is updated export types formats for Excel, Word, and text, from Office 97 to current? Here is portion of old code. With lstResult .ColumnCount = 4 .ColumnWidths = "0,0,0" .RowSourceType = "Value List" .RowSource = "-1,-1,-1,Export Type," _ &...

I'm not a programmer, but I've used this for several fields. In any module, add this: Public Function CapitalizeFirst(Str) ' Make first letter in field uppercase; leave other ' letters as typed. Dim strTemp As String strTemp = Trim(Str) CapitalizeFirst =...

Thanks for your help, since I'm not a programmer. I'll close this thread now, since this line is only run if the user didn't type anything in the search criteria. If I recognized that, I wouldn't have started this thread.

I do want to allow for any number of characters before and after the text criteria string. Now, both enclosed asterisks are needed to display text or memo field match results. This works fine as is, just trying to simplify using db for others only if it's simple enough to be worth the effort...

How do you change having to enclose search string in asterisks *search string* ... Else strWhere = strWhere & strJoinType & "[" & Me("cbxFld" & i) & "] like '*'" End If ... to not having to enclose search string? 2 unrelated examples: parameter query Like "*"...

What above code can be changed to type search string without enclosing it in asterisks? I'm not sure how to edit syntax for whichever of these lines with an asterisk and/or Like operator will correct. 1. strSQL = "Select * " 2. "Select * from [" & Me.lstTables.Column(0) & "]...

Hello All, An unbound search form searches up to 5 separate criteria for selected table or query by using criteria enclosed in asterisks - *criteria* How can code be changed so criteria can be entered without being enclosed in asterisks? From sections below, not sure how to edit syntax for...

Thanks, Remou, that's easier to follow.

Thanks, Remou. This works, but is extra "(" needed before (([MsysObjects].[Type])=1 Or

Nevermind, I reversed approach to 3 items to be included. I usually start a thread for a syntax error, not being a programmer, but I guessed right (a first and probably last). SELECT MsysObjects.Name AS ObjectName, IIf([type]=1 Or [type]=6,"Table","Query") AS ObjectType FROM MsysObjects...

Function isn't available in expressions in query expression ... error occurs for MsysObjects WHERE section. Below code used to work in Access 97 (before reinstalling Access 97 and 2000). It now only works without Where clause, specifically "left$". Is there a missing reference for "left$"...

Thanks, but still same result of one (wrong) record.

The below code works fine in the main form (frmClients) to send the current record to Excel. But in the subform (frmContacts), it will only send the first record even if a second or third record is current. This is the only line I changed from the main form. Set rs = db.OpenRecordset("Select...

Thanks for both responses, traingamer and lameid (form timer interval; sleep function). I finally synchronized the initial Timer Interval, lblScroll_DblClick, and Form_Timer. ----Code Timer Interval = 0 (properties) Private Sub lblScroll_DblClick(Cancel As Integer) If Me.TimerInterval = 0...