Access form/subform-default subform to new record : Microsoft, Office- Access, 2003

May 9, 2008 09:50am pdt

1. LSMConsu... 239,189
2. capricorn1 210,211
3. DatabaseMX 157,210
4. boag2000 151,492
5. peter57r 125,408
6. harfang 111,951
7. wiswalld 75,816
8. TextReport 75,673
9. ldunscombe 56,236
10. jimhorn 54,836
11. jefftwilley 52,798
12. JezWalters 42,325
13. eghtebas 41,527
14. mbizup 40,472
15. frankytee 36,800

1. capricorn1 698,453
2. DatabaseMX 507,923
3. LSMConsu... 416,557
4. peter57r 342,377
5. jefftwilley 337,865
6. harfang 254,472
7. mbizup 243,089
8. boag2000 200,582
9. jimhorn 158,383
10. frankytee 145,041
11. stevbe 131,872
12. wiswalld 116,030
13. LPurvis 113,420
14. GRayL 100,584
15. MikeToole 94,268

03.27.2008 at 11:55AM PDT, ID: 23275189

	[x] Attachment Details

[x]

The Solution Rating System

With so many solutions, how can you tell which solutions are most likely to help you and which ones are not? To provide you with a tool to use, we rate our solutions based on various elements that most accurately determine if a solution is a quality solution. To explain what factors affect the solution rating, here are the elements we take into consideration when formulating our solution rating.

The Grade of the Solution
The Zone Rank of the Expert Providing the Solution
The Number of Author and Expert Comments
The Number of Experts Contributing
The Feedback of the Community

Your Input Matters
Because of the way the system is set up, the most important variable in this equation is you. As a member of Experts Exchange, you are able to cast your vote on the quality of the solutions in regard to how complete, accurate, helpful and easy to understand each solution is. When you provide your feedback, each rating is adjusted accordingly. So, if you see a solution that has a poor rating that you think is a good solution, let us know by rating it. As you do, the rating will be adjusted and will become more accurate for other members of our site.

If you have any suggestions that you would like to make for our rating system, please ask a question in the Suggestions Zone of Community Support.

Thank you!

9.6

Access form/subform-default subform to new record

Zones: Access Forms, Databases Miscellaneous, Access Coding/Macros

Tags: Microsoft, Office- Access, 2003

I have a form/subform linked by Organization_ID. The subform populates the Donation table. The filter is working fine but I would like it to default to a new record in the subform when the correct Organization_ID on the main screen is chosen. Currently I have a button in the subform to go to the new record.
I have attached a screen shot.

The best case scenario is to default to a new record but also restrict scrolling through the previous records so that data is not changed after the fact accidentally.

Attachments:

Doc1.doc (104 KB) (File Type Details)

screen shot of form/subform

Start your free trial to view this solution

Question Stats

Zone: Microsoft

Question Asked By: kgregar

Solution Provided By: harfang

Participating Experts: 2

Solution Grade: A

Translate:

Loading Advertisement...

Microsoft

Internet Protocols
Applications

Development
OS

Hardware
Windows Security

Apple

Operating Systems
Hardware

Programming
Networking

Software

Internet

Search Engines
File Sharing
WebTrends / Stats
Spy / Ad Blockers

Web Browsers
New Net Users
Web Development
Chat / IM

Anti Spam
Web Servers
Anti-Virus
Email Clients

Gamers

Tips
Online / MMORPG
Puzzle
Emulators

Action / Adventure
Role Playing
Consoles
Game Programming

Strategy
Sports
Misc
Computer Games

Digital Living

Hardware
New Net Users
New Users

Software
Digital Music
Gaming World

Home Security
Apple
Networking Hardware

Virus & Spyware

Vulnerabilities
IDS
Encryption
Anti-Virus

Operating Systems Security
Software Firewalls
WebApplications
Cell Phones

Operating Systems
Internet
Hardware Firewalls

Hardware

Handhelds / PDAs
Displays / Monitors
Components
Networking Hardware

Peripherals
Laptops/Notebooks
Storage
Servers

Desktops
New Users
Misc
Apple

Software

System Utilities
Industry Specific
Network Management
Photos / Graphics
Page Layout
VMWare
Misc
Web Development

OS
CYGWIN
Voice Recognition
Message Queue
Quality Assurance
Security
Firewalls
MultiMedia Applications

Development
Database
Office / Productivity
Business Management
OS/2 Apps
Server Software
Internet / Email

ITPro

OS
Storage
Encryption
Operating Systems Security
Apple Hardware
Laptops & Notebooks
Servers
Networking Hardware
Peripherals

Devices
Displays / Monitors
WebTrends / Stats
Search Engines
Firewalls
WebApplications
IDS
Vulnerabilities
Email Clients

File Sharing
Spy / Ad Blockers
Web Browsers
Web Servers
Networking
Anti-Virus
Chat / IM
Anti Spam

Developer

Web Servers
Web Browsers
Game Programming
Dev Tools
Industry Specific
Office / Productivity

Database
CYGWIN
Web Development
Search Engines
File Sharing
WebTrends / Stats

Programming
Content Management
Application Servers
Protocols

Storage

Removable Backup Media
Storage Technology
Servers

Grid
Remote Access
Backup / Restore

Misc
Hard Drives

Miscellaneous
Security
Development
Linux
VMWare

MainFrame OS
Unix
Apple
OS / 2
AS / 400

BeOS
Microsoft
VMS / OpenVMS

Database

Oracle
Miscellaneous
MySQL
Software
Sybase
Contact Management
PostgreSQL
Data Manipulation
Clarion
InterSystems Cache

Siebel
MUMPS
OLAP
SQLBase
SAS
GIS & GPS
4GL
Berkeley DB
DB2
Informix

Interbase / Firebird
FoxPro
Reporting
LDAP
Filemaker Pro
MS SQL Server
dBase
MS Access

Security

Misc
Web Browsers
Software Firewalls
Operating Systems Security
File Sharing

Spy / Ad Blockers
Vulnerabilities
WebApplications
IDS
Anti-Virus

Encryption
Anti Spam
Email Clients
VPN
Chat / IM

Programming

Editors IDEs
Installation
Handhelds / PDAs
Multimedia Programming
System / Kernel

Algorithms
Game
Signal Processing
Project Management
Open Source

Database
Misc
Languages
Processor Platforms
Theory

Web Development

Scripting
Blogs
Web Servers
Software
Search Engines
Web Graphics
Images

Internet Marketing
Images and Photos
Components
Document Imaging
Web Languages/Standards
Illustration
WebApplications

Fonts
WebTrends / Stats
Authoring
Digital Camera Software
Miscellaneous

Networking

Protocols
Apple Networking
Network Management
Message Queue
Application Servers
Content Management
File Servers
Email Servers
Misc
Java Editors & IDEs

Wireless
Networking Hardware
Backup / Restore
System Utilities
ISPs & Hosting
Web Servers
Storage Technology
Removable Backup Media
Servers
Broadband

Grid
OS / 2
Novell Netware
Unix Networking
Windows Networking
Security
Telecommunications
Operating Systems
Linux Networking

Other

Community Advisor
Lounge
Community Support
New Net Users

Philosophy / Religion
Math / Science
Miscellaneous
URLs

Expert Lounge
Politics
Puzzles / Riddles

Community Support

Suggestions
New to EE
New Topics
Community Advisor

CleanUp
Announcements
General

Feedback
Input
EE Bugs

03.27.2008 at 05:18PM PDT, ID: 21227001

Rank: Wizard

harfang:

If you set your subform to:

Data Entry: yes

... it will always display a blank record, and not show any existing records. You can also have a button to toggle between "view donations" and "add donations" by using something like the snippet below. It's meant for a toggle button called tglView with Default Value: False.

I hope this helps
(°v°)

         
             Private Sub tglView_Click()
    With subDonationsSubform.Form
        .AllowEdits = Not tglView
        .AllowAdditions = Not tglView
        .DataEntry = Not tglView
    End With
End Sub

Open in New Window

Accepted Solution

03.27.2008 at 05:22PM PDT, ID: 21227013

Rank: Sage

LSMConsulting:

Please post images as JPG or PNG pictures ... we look at hundreds of postings a day, and it's kind of a pain to download the image and fire off Word each time.

What do you mean by "filter? Are you filtering the Main or subForm, or are you referring to the Master/Child links between the Main and Subform?

You can force the subform to a New Record when you move to a different ID, but it's not as simple as it sounds. First, add this to the form you're using as a Subform:

Function GoToNewRecord() As Boolean
DoCmd.RunCommand acCmdRecordsGoToNew
End Function

Now, in your Main form, do this in the current event of your Form:

'/in the Main Form
Sub Form_Current()
Me.NameOfYourSubformCONTROL.Form.GoToNewRecord
End Sub

This would add a new record to the Subform EVERY TIME YOU MOVED TO A NEW RECORD IN THE MAINFORM!! If this isn't what you want, then please go into a bit more detail of the exact scenario/steps needed.

Note the NameOfYourSubformCONTROL ... this is the name of the Control you're using on the Main form, and may or may NOT be the name of the form you're using as the SourceObject ... open your mainform in design view, highlight the subform control (i.e. click it ONCE) and see what your Properties dialog reports ... this is the value you use for NameOfYourSubformControl.

03.28.2008 at 09:33AM PDT, ID: 21231877

kgregar:

harfang, that was super easy to set the data entry to yes! worked perfectly. I am not able to get the toggle button to work though? I changed the name of the form to my name and added the button called tglView but it is showing the error on the first toggle line.
thanks so much!

03.28.2008 at 09:53AM PDT, ID: 21232060

Rank: Wizard

harfang:

In the line:

With subDonationsSubform.Form

"subDonationsSubform" is the name of the control, i.e. the subform/subreport control, not the name of the form you display therein. It might be something like "Child42" for example.

When you get an error, it's useful to give the error message also. I'm guessing it's a compile error (if you have Option Explicit), or that the object does not exist at run time.

(°v°)

03.28.2008 at 10:24AM PDT, ID: 21232400

kgregar:

I am very dense today.... Does the toggle button go on the main form or on the subform? How do I find the control name for this subform (no eye rolling, please :)).

I am getting Runtime Error 438
Object doesn't support this property or method.

         
             Private Sub TglView_Click()
  
  With Donation_Sub.Form
       .AllowEdits = Not TglView
       .AllowAdditions = Not TglView
       .DataEntry = Not TglView
       .AllowEdits = True
  
    End With
End Sub

Open in New Window

harfang

03.29.2008 at 01:29AM PDT, ID: 21235912

The toggle button is meant for the main form. To find the name of the subform/subreport object, open your main form in design view and click *once* on the subform. The property sheet displays the name of the control. The second click lets you edit the subform itself.

If you want, here is the version for a toggle button on the subform.

Better luck this time!
(°v°)

         
             Private Sub TglView_Click()
  
   Me.AllowEdits = Not TglView
   Me.AllowAdditions = Not TglView
   Me.DataEntry = Not TglView
   Me.AllowEdits = True
  
End Sub

Open in New Window

20080206-EE-VQP-25 / EE_QW_2_20070628