VBA code to determine 'show' state of SearchBar

Status
Not open for further replies.

JackPollack

Senior Member
Outlook version
Email Account
Exchange Server
Trying to write a small VBA macro for OL2003 that always opens the SearchBar when in a contact folder. I am putting my code in the FolderSwitch event.

I am able to find the ID of the SearchBar in the menu, but cant find a property to tell if it is already showing (.visible always returns true, even if not showing). Is there a way to figure out the view state as my code is toggling the state.
Set objCBCtl = Application.ActiveExplorer.CommandBars.FindControl(ID:=5592)
objCBCtl.Execute

Also as I side question, a client asked my and I couldn't answer, when the SearchBar is showing and you type in some text why soemtimes do you have to hit enter once to start the search and other times hit it 2 or 3 times? I have had the same problem, but cant figure out if it is a focus issue or something else.
 

Cathy Rhone

Senior Member
Outlook version
Outlook 2013 32 bit
Email Account
Exchange Server 2010
On the second question, it shouldn't work like that. I'm not sure if its a focus thing or just that the enter key is not registering. It has happened to me too.

Diane is on vacation this week and she (or someone else) will need to the other question.
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
I'm only half back from vacation this week. I was hoping to 4 hours of work in this morning but was lucky to get 2 hours in.

Have you seen this? To show the Find pane when you switch to a Contacts folder in Microsoft Outlook

This is supposed to work but its not working for me. I tried all variations of testing the state - <>, buttondown...

Code:
With objCBCtl 
 
If objCBCtl.State = msoButtonUp Then 
 
> Execute 
 
End If 
 
End With
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
from reading the links at the outlook code url, it looks like something changed in 2003 and the button state isn't detected.
 

JackPollack

Senior Member
Outlook version
Email Account
Exchange Server
it does work! Thanks

Private Sub OutlookApp_FolderSwitch()
Dim objCBCtl As CommandBarControl
Set objCBCtl = Application.ActiveExplorer.CommandBars.FindControl(ID:=5592)
If objCBCtl.State <> -1 Then objCBCtl.Execute

Set objCBCtl = Nothing
Set objFolder = Nothing
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
Ah. I never thought to test it that way. Thanks for the update.
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
F VBA code to dock Styles whenever I write or edit an email Outlook VBA and Custom Forms 0
S Skype for business meeting vba code Outlook VBA and Custom Forms 1
R Expand VBA Permanent Delete Code Outlook VBA and Custom Forms 6
B Outlook Business Contact Manager with SQL to Excel, User Defined Fields in BCM don't sync in SQL. Can I use VBA code to copy 1 field to another? BCM (Business Contact Manager) 0
A VBA Code in Outlook disappears after first use Outlook VBA and Custom Forms 1
F VBA to ensure a code is entered in Subject title Outlook VBA and Custom Forms 1
N Open & Save VBAProject.Otm using VBA Code Outlook VBA and Custom Forms 1
R VBA Code to permanently delete selected email Outlook VBA and Custom Forms 10
C Need VBA code to automatically save message outside outlook and add date Outlook VBA and Custom Forms 1
S VBA Code to move mail items from search folder to inbox subfolder Outlook VBA and Custom Forms 4
B VBA Code to create appointment from email Outlook VBA and Custom Forms 1
D VBA Code to strip Subject Line when replying or forwarding Using Outlook 3
M VBA Code to Restart Outlook on error Outlook VBA and Custom Forms 3
Z Default VBA code for extracting data from email (Outlook) to Excel? Outlook VBA and Custom Forms 1
T VBA to Sort Rules [A-Z] - code provided Outlook VBA and Custom Forms 9
M VBA Auto-Reply code for Two Mailboxes on one Outlook Session. Outlook VBA and Custom Forms 4
Z Protecting VBA code - anything new? Outlook VBA and Custom Forms 2
G VBA code to enable a rule based on time of day for a IMAP mail account Outlook VBA and Custom Forms 14
S VBA code to rename a task (flagged message) Outlook VBA and Custom Forms 1
M VBA code to save email attachments (PDF) as email subject line Outlook VBA and Custom Forms 1
F VBA Code to change subject Like Outlook VBA and Custom Forms 3
Diane Poremsky Pasting VBA code (and other editing) Outlook VBA and Custom Forms 4
C Required VBA code to complete task when replied to Outlook VBA and Custom Forms 2
Kelli VBA code for Outlook Using Outlook 1
S Requried a VBA Code to export Calander details to excel... Outlook VBA and Custom Forms 4
M VBA Code to extract data from an Outlook Form Using Outlook 0
M VBA code needed to move from Outlook 2010 subfolder to Symantec Vault subfolde Using Outlook 0
C In need of VBA code to read / parse HTML - Outlook emails Using Outlook 0
R [VBA] complicated(?) outlook events - need help with code Using Outlook 15
R how to get Outlook VBA code to work on the current folder Using Outlook 3
J VBA code can't be completely executed in outlook 2013 Using Outlook 0
D VBA: Send-From Code for Template Shortcut? Using Outlook 0
P VBA Code being completely ignored by Outlook Using Outlook 7
M Updating VBA code from outlook 2007 to outlook 2010 Using Outlook 1
D VBA code running on Server? Shared mailbox email routing Using Outlook 3
L Send E-mail with VBA code from [E-mail Distribution Group] if I have “Send as” Using Outlook 6
S Outllok 2007 VBA code to send mail automatically from drafts folder Using Outlook 1
S ThisOutlookSession in VBA not there anymore and code is gone Using Outlook 2
F No Attachment Warning - VBA Code HELP Outlook VBA and Custom Forms 1
J VBA code (rules) won't work after reboot Outlook VBA and Custom Forms 2
N VBA code to show today's date + a sequencial number in subject lin Outlook VBA and Custom Forms 1
A Accessing .pst folder in outlook using VBA Code Outlook VBA and Custom Forms 4
C Beginner Needs VBA Help in Modifying Code Outlook VBA and Custom Forms 2
P 'Trusted' VBA code in Outlook 2003? Outlook VBA and Custom Forms 2
F Recovery of VBA code Outlook VBA and Custom Forms 2
B convert VBA code to Add-in Outlook VBA and Custom Forms 1
B how/what dialog boxes can I display from VBA code Outlook VBA and Custom Forms 1
S Excel VBA and shared calendar issue Outlook VBA and Custom Forms 4
L Macro/VBA to Reply All, with the original attachments Outlook VBA and Custom Forms 2
L VBA unknown character Outlook VBA and Custom Forms 2

Similar threads

Top