Search results

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

Thanks guys! On to my next problem... The smallest things can bring everything to a screaming halt! 😜 Actually, now that I check more carefully, it looks as though the item is always a selected node so I may go that route.

Although I didn't know there was a difference... You guys harp and harp DEBUG DEBUG DEBUG. I would not attempt a question here without DEBUGGING! :rolleyes:

still returns Joint account papers

IT and LO are my identifiers. So it seems like the string should be "IT57" but instead nodes returns the text name "Joint account papers". I was very confused by this but decided it was a Nodes value. So Set ItemNode = tvw.Nodes("IT" & Me.ItemID) the ("IT" & Me.ItemID) returns IT57 but...

@MajP I'm sorry but I can only work on this a little at a time so it's dragging out... Item details (add, edit, remove, etc) are on a subform and the treeview is on the mainform. I don't delete items as such but only clear fields so that the DocNo stays and is used as items new are added or...