User Profile
GustavBrock
MVP
Joined 9 years ago
User Widgets
Recent Discussions
Re: add year month and week using just date field
For year and month you can use the native functions Year and Month. For week you may get away with DatePart("ww", [Posting Date]). However, if you wish the ISO 8601 weeknumber, a custom function is needed like my function Week found in module DateCore in my repository at GitHub: VBA.Date. As noted, don't update a table; create and run a select query.42Views0likes0CommentsRe: FindFirst not working
Maxine14062 You can filter the recordset directly: Dim rst As DAO.Recordset Dim SQL As String SQL = "Select * From SchedFieldTable Where [Width] + [Left] > 10.5 * 1440" Set rst = CurrentDb.OpenRecordset(SQL) If rst.RecordCount > 0 Then ' List the found FIDs. rst.MoveFirst While Not rst.EOF Debug.Print rst!FID.Value, rst!Width.Value, rst!Left.Value rst.MoveNext Wend End If rst.Close284Views0likes1CommentRe: Problem Creating a usable zip file using VBA. Does anyone have an alternative?
RBStewart I could replicate your issue, and modified my zip function to handle it: VBA.Compress The method used is simply to create the zip file in the temp folder and, when done, copy it to the removable drive.8KViews0likes0CommentsRe: Minutes and Seconds Field
Jqws13_ That is correct. Even worse, on a new record, 00:00 will be displayed, but - even worse - if you enter, say, 48:37, Access will report "Invalid date", as the entry will be parsed as hh:nn. Your best option is probably to use two juxtaposed textboxes holding minutes and seconds respectively, and assemble these with TimeValue(0, n, s) to build the time in the BeforeUpdate event of the form, and use Minute([TimeField]) and Second([TimeField]) to display the time using the OnCurrent event of the form. Ultimately, create a form using Inputmask and custom code similar to what I did here: Entering 24-hour time with input mask and full validation in Microsoft Access4.8KViews0likes7CommentsRe: Plötzlich Symbole statt echter Bilder (Bitmap) in Access-Formularen (Office 365 und Win11)
wgoetz This is a known issue: Pasting an Image into a MS Access Image (OLE Object) Control Doesn't Work in Windows 11 The cure is to import the missing entries in the Registry. The two files are attached as a zip file in this post.2.6KViews0likes1CommentRe: Database no longer shareable
caseyg1760 It doesn't matter wether you use an UNC path or a mapped drive. What matters is, if the UNC path used (for the mapped drive) is a virtual DFS path. If so, change the path used from the DFS path to a path having one of the member servers of the DFS name space. If you prefer to roll back to a previous version not hit by this issue, I've found it to be this (or earlier): Version 2102 (Build 13801.21050 Click and run) semi-annual enterprise13KViews0likes1CommentRe: How to get a Weighted Average instead of an average of averages.
slohombre : Like this: SELECT Week, Yield, Acres, [Yield]/[Acres] AS YieldPerAcre, (Select Sum(Acres) From Crop) AS TotalAcres, (Select Sum(Yield) From Crop) AS TotalWeight, [TotalWeight]/[TotalAcres] AS WeightedAverage FROM Crop; Output:1.4KViews0likes3Comments
Recent Blog Articles
No content to show