A Microsoft Outlook email forum. Outlook Banter

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » Outlook Banter forum » Microsoft Outlook Email Newsgroups » Outlook - General Queries
Site Map Home Register Authors List Search Today's Posts Mark Forums Read Web Partners

Visible Question



 
 
Thread Tools Search this Thread Display Modes
  #1  
Old February 10th 08, 10:26 PM posted to microsoft.public.outlook
Bob V[_2_]
external usenet poster
 
Posts: 5
Default Visible Question

I want to make a control to become Visible if in the third Column of my list
box[lstModify] shows an "e" ,when I select a row I want the control to be
visible
The Control now is set no Visible/No

Me.cmdEmail.Visible = IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(3), 0)) _
And IsEmailOn, True, False)


Case Else
Me.cmdEmail.Visible = False
-------------------------------------
I have already a togggle button to email or not:
Private Sub cmdSendMail_Click()
If cmdSendMail.value = True Then
cmdSendMail.Caption = "Send Email"
Else
cmdSendMail.Caption = "Do Not Send Email"
End If
CurrentDb.Execute "update tblAdminSetup set MailFlag = " & cmdSendMail.value
End Sub


Ads
  #2  
Old February 11th 08, 04:19 AM posted to microsoft.public.outlook
Bob V[_2_]
external usenet poster
 
Posts: 5
Default Visible Question

OOps Sorry wrong group!!!!


"Bob V" wrote in message
...
I want to make a control to become Visible if in the third Column of my
list box[lstModify] shows an "e" ,when I select a row I want the control to
be visible
The Control now is set no Visible/No

Me.cmdEmail.Visible = IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(3), 0))
_
And IsEmailOn, True, False)


Case Else
Me.cmdEmail.Visible = False
-------------------------------------
I have already a togggle button to email or not:
Private Sub cmdSendMail_Click()
If cmdSendMail.value = True Then
cmdSendMail.Caption = "Send Email"
Else
cmdSendMail.Caption = "Do Not Send Email"
End If
CurrentDb.Execute "update tblAdminSetup set MailFlag = " &
cmdSendMail.value
End Sub



 




Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Not enough appointments are visible Ken W Outlook - Calandaring 3 February 5th 08 02:52 PM
Sent Appointment - not visible Maurice Outlook and VBA 2 October 8th 07 04:53 PM
Last row visible TomThumb Outlook and VBA 4 June 2nd 07 09:20 PM
Entries not visible in Outlook, are visible via OWA Sean C Outlook - Calandaring 2 July 25th 06 07:40 PM
Visible posts? Bruce Garlock Outlook Express 2 June 26th 06 03:36 AM


All times are GMT +1. The time now is 01:58 PM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.Search Engine Friendly URLs by vBSEO 2.4.0
Copyright ©2004-2025 Outlook Banter.
The comments are property of their posters.