Recent content by ClaraBarton

upon further research I discovered a function at BTAB Development called Send2Excel. I changed Send2Excel(frm As Form, Optional strSheetName As String) to (strSql As String, Optional strSheetName As String) and then used my listbox rowsource as Sql and opened the recordset with the Sql. the...

Well, to be perfectly honest, most things I don't understand. I just go with the flow. Sometimes I get the feeling that the code gets tired of dealing with me and just starts working.

Well, yeah. but I wanted to give it no name so I wouldn't have to delete it every time. How would that work?

Figured it out! Give the Querydef a name as follows: strSql = Me.lstUsage.RowSource Set qdfTemp = CurrentDb.CreateQueryDef("qryTemp", strSql) filePath = "D:\Documents\Access\Mine\Finances\ExportedData.xlsx" DoCmd.OutputTo acOutputQuery, "qryTemp", acFormatXLSX, filePath, True...

I want to export the data from a listbox to Excel. I pretty much followed the Microsoft Help to come up with the following: strSql = Me.lstUsage.RowSource Set qdfTemp = CurrentDb.CreateQueryDef("", strSql) filePath = "D:\Documents\Access\Mine\Finances\ExportedData.xlsx"...

Oh Rats! You guys! now it works!:sneaky: :rolleyes: I'm going shopping.

click on an item. (brown). it immediately goes to If IsNull(subFrmItem.ItemID) Then and stops. It is not null. It just stops. It cannot have a null ID. Does not have a null idea. Just thinks it does.

I'm sorry. I thought I did! :rolleyes:

Well that works.... but it stalls on the first line and I have to push it on. Would you like to look at it? Click Detail and then select an item

I thought I could have the flow go both ways. The Location subform has all the locations as a recordset and the Detail subform has a recordset of records under the selected location. Mostly it works but the tree loses it's connection on the above situation. So I got this brilliant idea: Public...

I put both do Events and Set Focus and it seems to be working. If I put only set focus it says you can't go to the specified record. Thank you very much for your time.

AAARRRGGGHHHH! I Knew That! But wait... I screamed too soon On open of the main form I have: Set subFrmItem = Me!ItemDetail.Form Most of the time it actually does work. But jumping to make the form visible seems to show no valid ID. It immediately works after it complains

@MajP

On a treeview click I use this for matching the subform to the clickednode: Public Sub MatchNode() Dim strKey As String Dim ID As Long Dim Children As Integer Children = DCount("*", "tblItems", "flocID = " & Me.txtLocID & " And InUse = True") If...

Gotcha! Thanks