Hi Bob,
The text that does not return is that suggested by Domenico:
Sub cls()
Application.VBE.Windows.Item("Immediate").SetFocus
SendKeys "^a"
SendKeys "{Del}"
End Sub
I inserted the Application.VBE.ActiveCodePane.Show line just ahead of the End Sub line. When executed, it takes me to the code window for the module containing the cls sub but appears to delete the contents of the module. Execution halts at that point.
Steve
Steve,
I created a simple form with a command button, and that ran the code after this clearing code. Can you show the code that doesn't return, I am intrigued?
Have you also tried adding
Application.VBE.ActiveCodePane.Show
Afterwards?
From: MS_Access_Professionals@yahoogroups.com [mailto:MS_Access_Professionals@yahoogroups.com]
Sent: 11 April 2016 23:06
To: MS_Access_Professionals@yahoogroups.com
Subject: Re: [MS_AccessPros] How to clear the debug window?
Thanks Domenico. If I put this at the beginning of my click event procedure, it clears the immediate window. However, focus remains with the immediate window and the rest of the click event procedure does not run. How does one return to the calling procedure and continue its execution?
SteveOn 4/11/2016 2:31 AM, Domenico Cozzolino domcoz@gmail.com [MS_Access_Professionals] wrote:
I used this
Sub cls()
Application.VBE.Windows.Item("Immediata").SetFocus
SendKeys "^a"
SendKeys "{Del}"
End Sub
found with google search
2016-04-11 0:04 GMT+02:00 Steve5 thaw5@suddenlink.net [MS_Access_Professionals] <MS_Access_Professionals@yahoogroups.com>:
Got it that time. Now to learn how to use it. Thank you.
On 4/10/2016 4:26 PM, 'Bill Mosca' wrmosca@comcast.net [MS_Access_Professionals] wrote:
Steve try this one that takes you to the page. From there, you can find the file to download.:
https://groups.yahoo.com/neo/groups/MS_Access_Professionals/files/0_Utilities%20and%20Add-ins/
Regards,
Bill
From: MS_Access_Professionals@yahoogroups.com [mailto:MS_Access_Professionals@yahoogroups.com]
Sent: Sunday, April 10, 2016 10:12 AM
To: MS_Access_Professionals@yahoogroups.com
Subject: Re: [MS_AccessPros] How to clear the debug window?
Thank you Duane. I didn't find that in the Links section. Sadly, when I try it, the browser displays "Error occurred while downloading the file. Please click here to try again."
SteveOn 4/9/2016 10:15 PM, Duane Hookom duanehookom@hotmail.com [MS_Access_Professionals] wrote:
I think Bill sent you to our group's files Utilities and Add-Ins
Duane Hookom, MVPMS Access
To: MS_Access_Professionals@yahoogroups.com
From: MS_Access_Professionals@yahoogroups.com
Date: Sat, 9 Apr 2016 21:49:42 -0400
Subject: Re: [MS_AccessPros] How to clear the debug window?
Hi Bill,
I did. The link takes me to this web page which offers a download of MZ-Tools 8.0 for $80, discounted to $60. Maybe I'm missing something?
SteveOn 4/9/2016 8:04 PM, Bill Mosca wrmosca@comcast.net [MS_Access_Professionals] wrote:
Steve
The older version is free. That's why I said to check out file folder.
Regards,
Bill Mosca
"Steve thaw5 thaw5@suddenlink.net [MS_Access_Professionals]" <MS_Access_Professionals@yahoogroups.com> wrote:
Thanks Bill. Found the link. For the moment I think I'll stick to the select/control-A/delete method rather than spend the money :-)
SteveOn 4/8/2016 10:46 PM, Bill Mosca wrmosca@comcast.net [MS_Access_Professionals] wrote:
Yes, use mztools add-in. URL in our links folder
Regards,
Bill Mosca
"Steve thaw5 thaw5@suddenlink.net [MS_Access_Professionals]" <MS_Access_Professionals@yahoogroups.com> wrote:
Is there a way to programmatically delete all the lines in the debug
window? I'd like a clean debug window each time I run the code I am
working on. Right now I clear the debug window manually by clicking in
it, then control-A and the delete key. Is there an alternative?
Thanks, Steve
Posted by: Steve <thaw5@suddenlink.net>
| Reply via web post | • | Reply to sender | • | Reply to group | • | Start a New Topic | • | Messages in this topic (15) |
Tidak ada komentar:
Posting Komentar