Thanks for the input. I'd thought of that solution but was unsure how to implement. After more experimentation, it would seem that the filter is overriding the query.
Currently, a value in the combo box Name_ID must be selected before the Subform can be populated. The subform's underlying...
adamroof -
Not to overly demanding - may be too late - but I have one more issue. I am trying to use either (1) two calendars to fill two date fields or (2) one calendar to fill two date fields.
No matter which way I code it, I keep getting an error stating that an object is required. It is...
adamroof - I am having the same issue as logopolis. Should I change every reference to "me.calendar" to your code recommendation [SubForm.SubFormNameHere.FieldOnSubForm = Format(Me.Calendar,"mm/dd/yyyy")]?
Even after making your changes, I still get an error that says "You can't hide a control...
Kevin -
That is exactly what I was looking for. Thanks much.
I also appreciate the reminder about using "Min" and "Max" for my field names.
I have a field called MktCap which stores numbers (i.e. $250.00). What I would like is a way to associate the number with a text field next to it. To do this, I want Access to look at a table and determine if the value in MktCap(i.e. 250.00) falls in a range of numbers. Depending on the...
In case anyone stumbles across this post and needs a solution, I wanted to post my final version.
It integrates my code with Acron's. Much thanks to Acron for his assistance.
Sub CreateSummary()
Dim oWS As Worksheet
Dim Rng As Range
Set Rng = Cells(Rows.Count...
Hadn't heard from Acron or any other Excel gurus lately. Thought I would check in to see if anyone had thoughts on how to address this problem.
I believe that I am very close to the solution, but can't seem to overcome this (hopefully) last obstacle.
Ben
In my efforts to continually tax your patience, I have a problem with the code.
When I run it, nothing is copied from the Array of sheets (Sh1, Sh2) to the Summary. In addition, I get alternating errors - 400 or Run-Time Error '1004'.
I tried copying your code verbatim, but still get the same...
acron, thanks for the follow-up. Even with some slight modification, the code you submitted did not work for me.
Here is the code snippet:
Range([A2], [I2].Offset([A2].CurrentRegion.Rows.Count - 1, 0)).Copy Destination:=[A65336].End(xlUp).Offset(1, 0)
While it does ignore the first column, it...
Fantastic! This is both simple and elegant in its functionality. Thank you very much.
If you feel like it, I do have a follow-up. After running the code, I noticed that I need to append the first row for each sheet (#1-7) and I need to ignore the first column (always A:A.
I believe that I...
I have a spreadsheet that has 10 worksheets (tabs). Seven of these sheets are data repositories that are updated manually. One worksheet will be a summary page that will have all information for these 7 sheets (sans header). As a note, the first two sheets grab certain summary information...
vb5prgrmr -
Thanks for the code snippet. Unfortunately, I cannot seem to get it to work. I initially tried modifiying it to my needs, but when that didn't work, I just cut and pasted your code into my editor and tried running that.
I keep getting a Run-Time Error '5' for the line:
If...
vb5prgrmr - Thanks so much for the lead. Your code idea helped me generate ideas. Although I have gotten closer to a solution, I am still not there.
Please review the code below.
Code snippet:
Sub LastFileSaved()
Dim strLastMod As String
With Application.FileSearch
.LookIn =...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.