Search results

Thank you for the suggestion. I'm still learning as I thought my hobby would be a great Segway into access and vba, you learn quicker if it holds your interest and I'm in the early stages experimentation. A year from now this will be a far cry from what it is now (hopefully) thanks to each...

Looks like our replies crossed, thank you. I forgot about enclosing the 6 in single quotes as the drop down list populates the number in text on the table. It was saving the value, as you rightly pointed out.

It works! Encased the 6 in single quotes being a text value not a numeric. Private Sub OwnStatus_Click() If DCount("*", "tbl_Smithsonian3", "[Own]='6'") >= 10 Then MsgBox "Ten most wanted already assigned" End If End Sub Now, can you limit the check to only execute if you select item 6...

Private Sub OwnStatus_Click() If DCount("*", "tbl_Smithsonian", "[Own]=6") >= 10 Then MsgBox "Ten most wanted already assigned" End If End Sub Gives this error now.

It was suggested in the example I was given, I take it that it isn't needed? Just [Own]?

I was thinking about >= 10 but I can't get the code to work. Table is smithsonian (tbl_smithsonian) and the column is called own, check to see if there are ten or more in the own column of item 6 (set as text not a number) of the smithsonian table: Private Sub OwnStatus_Click() If DCount("*"...

Yes the 6 are. When I add an item that I already have or have seen and select the status of 1 through 6 depending upon availability/want. I was thinking about the code as a click event on the own drop down list to query the total count, is this not the way to do it? Yes, I'm still learning...

Thank you for the reply. I'm trying to teach myself VBA so interrogate the own field for ten or fewer of item 6 then either disable or display a message that ten have already been selected.

As per my previous post: 1943462 Quick summary, I have a database of steelbooks and have incorporated a most wanted tick box into a drop down menu added as the last item. As suggested by a member, the check box was obsolete and should be incorporated into the list: tbl_own ID Own? 1...

Good morning Pat and George, Yes thank you both for the comments. As I stated, I'm still learning and insights like this are invaluable. The advice is very much appreciated. Thank you.

Yes and this works perfectly! Thank you for your help. Changed owned to no and clicked the wanted box, changed owned to yes and it clears the wanted box and prevent it from being selected. Can the wanted box be greyed out or is that not possible? Sorry if I'm being a pain. Thank you again for...

Interestingly enough, this locks the check box: Private Sub ownedl_Click() Me!Top10.Locked = (Me.[ownedl].Value = "1") End Sub I have a table with the options "Yes", "No", "On Order", "Yet to be released" and "Never seen for sale" with Yes being 1 etc. So if No is selected for owned and the...

This is true or get damaged, in which case I would try to find a replacement. I thought it best to concentrate and catalogue what I wanted as opposed to everything I come across, some of which I have no intention of owning. The standard blu rays in the amaray cases are two a penny but one that...

Thank you, that explains this!

Found a problem and corrected it: Most wanted changed to Top10 Me!Top10.disabled = (Me.[ownedl].Value = "Yes") So this should disable the check box in the form if Yes is selected from the ownedl drop down, but it doesn't.

Hello George, Thank you for the comments. Regarding the items of interest, I'm only including items I would like then once owned, update the status accordingly. I don't sell items and if it wasn't of interest, I wouldn't include it in the table as it would be redundant and taking up space for...

Hello Doc, thank you for the reply. The main table is a list of all the items that I am aware of, ordered by film appearance. If I own it or not, the respective option is selected. I run a query for films I have yet to own. This form is the only form for the smithsonian table, selected fields...

Thank you, I'm not too familiar with the syntax and wildcards, I'll amend this once I get the code working. Relationships as requested, see attached and thank you.

The control source for the dropdown is [Own?]

Hello, I'm new to the forum and as my name suggests, I'm creating an access database (Access 2019) to track all my blu rays. Complete novice to VBA but have a history in C++ years ago so the construct is familiar but trying my best every day and making baby step progress. My problem is, I...