Cancel that. Process Description <> necessarily = an object's .Application.
There's GOT to be a way to automate this.
tetsuo2030
Last Activity: May 12 '16, 04:23 PM
Joined: Apr 6 '10
Location:
-
As a follow up, I can go to Windows Task Manager, view the file's task n Applications tab, Right Click-->Go To Process, and it takes me to the Process where I can see Image Name, Description. Process Description LOOKS like object's .Application.
Maybe I can udpate my .ExecQuery with a [WHERE Description = '" & my app &"'"]?Leave a comment:
-
VB Script to Find a Random File's process
Hey all,
I have a folder with a file in it. That file is open via some process. Using a .vbs script, I can find that file, using:
to close said file. But this leaves the process running that file open in the task manager. I can doCode:set myclose = GetObject(filepathname) myclose.close
to get the application running that file. I can useCode:myapp = myclose.Application
...Code:.ExecQuery
-
How to change the font size of a subform: datasheet view.
greetings.
I have a form with a subform set to datasheet view, but i'm running out of real estate, so I just want to shrink the font. I've scoured boards and nothing seems to be working. I've tried:
1.) Access Ribbon-->Access Options-->Datasheet This changes all font sizes of my tables and queries, but not my forms set to datasheet view.
2.) I've opened the subform as its own form, selected Layout... -
VBA to run custom spell checker and log errors in table?
Greetings all.
I've stolen/used this code as a spell checker on forms.
...Code:Dim strSpell strSpell = myField.Value If IsNull(Len(strSpell)) Or Len(strSpell) = 0 Then Exit Sub End If With myField .SetFocus .SelStart = 0 .SelLength = Len(strSpell) End With DoCmd.SetWarnings False -
How do I display a calculated negative number with a minus sign?
Greetings all:
I have a query like:
WasCost and IsCost are both set to Currency in myTable. If the myDifference comes out negative, it looks like ($100.00). User requests that it display as -$100.00 instead.Code:"Select myTable.WasCost , myTable.IsCost , [WasCost]-[IsCost] AS myDifference FROM myTable;"
I believe one can change the currency formatting... -
How far does arrow key move form object (in design view)?
Noticed something with my design view lately. In form design view, if I highlight an object and move it using the arrow key, it used to move the object in the smallest increment--not sure of the amount. Then, one day, it started moving the object considerably more:
Left Start: 1.0625
Arrow Right
Left End: 1.0938
One arrow key press moves object .0313.
I can go into the object's properties,... -
I think I'm following: rather than coding a new Select case statement / SQL into the module, store it and the dropdown value in a table, set my combobox to the table, and maybe run a DLookup against the associated SQL statement? That'd be accessible from...everywhe re.Leave a comment:
-
Thanks, NeoPa; as always, your advice is enlightening. Tell me more about "...you won't be able to use it in an MDE or ACCDE project". I've redefined the SQL behind queries in this way before and made them .accde files.
I imagine there isn't necessarily a "need" for the QueryDef object, but with my limited knowledge, I find something that works and just sort of stick to it. Having only a handful of actual "temp"...Leave a comment:
-
Error '3270', Property not found, when setting Properties!ColumnWidth
Greetings.
I have VBA code running from a combobox's AfterUpdate event which sets a querydef to a particular SQL statement based on the selection. Reason: rather than saving a bunch of queries, I just have one called "qry_reporting_ all" and simply change the QueryDef through VBA. Works like a charm.
Now, for aesthetic reasons, I wanted to set the query's columns for each field to 2 inches (2880 twips) wide--per... -
Okay. I changed a little, but the premise is the same, and the behavior is the same. Instead of a bunch of command buttons, I just used a Combo Box (pre-populated value list; values represent the desired dataset i.e. SQL); on the After_Update event of that combobox, I put this code:
...Code:Dim strSQL As String Dim mySite As String Dim myReport As String If IsNull(Me!cmb_desired_report.Value)Leave a comment:
-
Rabbit is correct: I'm selecting different fields than the ones originally in the form. And I think NeoPa might be onto something with "...Access is not responsive enough to check for such changes and assumes it's safe to carry on with the original fields."
The OnClick event of each button has code that changes the SQL behind qry_reporting_a ll's querydef. A generic version of my SQL statements would be as follows.
...Leave a comment:
-
Why aren't the fields in my datasheet subform refreshing?
Greetings.
I've read a lot about this, but nothing seems to be solving my problem. I have an unbound main frm_reporting with a subform (child_reportin g) whose sourceobject is Query.qry_repor ting_all. There are three text boxes in the header of frm_reporting, all unbound, and a few buttons. Each button has an SQL statement assigned to it. The idea is for the user to enter data into the boxes (date ranges) then click the button of... -
Can I push from Access to MS Project (with error checking)?
They've asked me to push some data from an Access database directly into MS Project (to cut down on user transcription follies). I've managed to export to an Excel spreadsheet then call MS Project to open this spreadsheet. I've created and saved a map of the fields using MS Project's Import Wizard--using the merge file method with a key on a unique ID of my choosing. When I perform the import (with VBA or manually) it:
1.) Does... -
How to Save Query's Pivot View (MS 2007)?
Greetings all,
Can't figure this out. I have a table with three fields: [User], [Month], [TextValues]. I want to show this data as a pivot table with Users on the Y-Axis, Months on the X-axis, and TextValues in the grid. It's easy in the the query's design view (just go to PivotTable View). But can I turn this into a MakeTable query? Having it stored as a table is the ideal state because I'd then like to join it to other tables... -
This is close!! I figured it out:
Code:"INSESRT INTO tbl_errors ([fld1], [fld2], ..., [Error Type]) SELECT tbl_source.[fld1], tbl_source.[fld2],..., 'qry_append_1' AS [Error Type] FROM tbl_source WHERE...;"
Leave a comment:
-
How to append data with selected data plus values?
Greetings,
This is probably an easy thing to do, but I can't seem to figure it out. My main data set is a massive table with 15 columns and thousands of rows. The data entry form forces certain consistencies in the data (if column A = "bluejay", column B = "bird"). However, I've agreed to upload archived data from a previous source where these consistencies were not enforced. So, I wrote 10 or so queries looking... -
Wow...you're right. I had it stuck in my head to look for "DROP QUERY" and couldn't find anything; should have looked for CreateQueryDef
Thanks!!Leave a comment:
-
How to create/delete queries with VBA like you can with tables?
Greetings all,
(Access 2003)
The bosses want me to take an old version of a database designed with a single-user-at-a-time mentality and update it to allow multiple, simultaneous users. The biggest trouble is that, based on its current design, simultaneous users could be potentially overwriting each other's data. I do have a work-around: I'll set up new temp-tables by capturing their in-house network usernames (JOHNSMITH)... -
I LOVE this stuff!Leave a comment:
No activity results to display
Leave a comment: