Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel,microsoft.public.excel.programming
external usenet poster
 
Posts: 3,885
Default can it be done without notice

Hi
see your other post

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
The below code (which was given in this NG + With some minor
alterations by me) intends to check if anything is changed on column
J then email that changed info to a spesific email address without
the notice of the workbook user...
But it has two problems:
1. If Outlook Express is not opened beforehand, starting of OE is
visible and the user recognizes that something without his/her
control is going on.
2. If Outlook Express is active before the execution of the macro,
yet again a small instance of mail being produced is visible on the
screen.

Can anyone suggest solutions for the 2 problems?
Thanks


'------------------------------------
Dim oldvalue As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
Application.DisplayAlerts=False
If Target.Column = 10 Then
Recipient = "
Subj = Target(1, -6) & " -- written " & oldvalue & " -- " &
Target.Value & ""
msg = "Hey... workbook's been changed"
HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & msg
ActiveWorkbook.FollowHyperlink (HLink)
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%s", True
End If
Application.DisplayAlerts=True
End Sub

Private Sub worksheet_SelectionChange(ByVal Target As Range)
oldvalue = Target.Value
End Sub

  #2   Report Post  
Posted to microsoft.public.excel,microsoft.public.excel.programming
external usenet poster
 
Posts: 3,885
Default can it be done without notice

Hi
you posted the same question in this group some hours ago and already
received aqnswers from Rob and Don :-)

-----------------------------
Try adding
application.screenupdating=false
code
reset to =true
---------------------------------

Hi Cheker

You will always see it

Maybe you can use CDO
See the link on my SendMail page
http://www.rondebruin.nl/sendmail.htm


You send me a private mail about CC and BCC
For OE see this page
http://www.rondebruin.nl/mail/oebody.htm
But it is not possible in OE to send text in the body and a files

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
Which post Frank?

"Frank Kabel" wrote in message
...
Hi
see your other post

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
The below code (which was given in this NG + With some minor
alterations by me) intends to check if anything is changed on

column
J then email that changed info to a spesific email address without
the notice of the workbook user...
But it has two problems:
1. If Outlook Express is not opened beforehand, starting of OE is
visible and the user recognizes that something without his/her
control is going on.
2. If Outlook Express is active before the execution of the macro,
yet again a small instance of mail being produced is visible on the
screen.

Can anyone suggest solutions for the 2 problems?
Thanks


'------------------------------------
Dim oldvalue As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
Application.DisplayAlerts=False
If Target.Column = 10 Then
Recipient = "
Subj = Target(1, -6) & " -- written " & oldvalue & " -- " &
Target.Value & ""
msg = "Hey... workbook's been changed"
HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & msg
ActiveWorkbook.FollowHyperlink (HLink)
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%s", True
End If
Application.DisplayAlerts=True
End Sub

Private Sub worksheet_SelectionChange(ByVal Target As Range)
oldvalue = Target.Value
End Sub


  #3   Report Post  
Posted to microsoft.public.excel,microsoft.public.excel.programming
external usenet poster
 
Posts: 11,123
Default short visibility--no visibility

Maybe the Wait command
used in the macro can be eliminated to prevent that


No

Use CDO is the only way Cheker
http://www.rondebruin.nl/cdo.htm
I will make a example this evening and upload it to my website.


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Cheker" wrote in message ...
Unfortunately the OE window is visible in front of Excel for a "very short"
period and the email writing process is "noticed". Maybe the Wait command
used in the macro can be eliminated to prevent that. I'll be much obliged if
Rob or Don can comment.
Sincerely


"Frank Kabel" wrote in message
...
Hi
you posted the same question in this group some hours ago and already
received aqnswers from Rob and Don :-)

-----------------------------
Try adding
application.screenupdating=false
code
reset to =true
---------------------------------

Hi Cheker

You will always see it

Maybe you can use CDO
See the link on my SendMail page
http://www.rondebruin.nl/sendmail.htm


You send me a private mail about CC and BCC
For OE see this page
http://www.rondebruin.nl/mail/oebody.htm
But it is not possible in OE to send text in the body and a files

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
Which post Frank?

"Frank Kabel" wrote in message
...
Hi
see your other post

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
The below code (which was given in this NG + With some minor
alterations by me) intends to check if anything is changed on

column
J then email that changed info to a spesific email address without
the notice of the workbook user...
But it has two problems:
1. If Outlook Express is not opened beforehand, starting of OE is
visible and the user recognizes that something without his/her
control is going on.
2. If Outlook Express is active before the execution of the macro,
yet again a small instance of mail being produced is visible on the
screen.

Can anyone suggest solutions for the 2 problems?
Thanks


'------------------------------------
Dim oldvalue As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
Application.DisplayAlerts=False
If Target.Column = 10 Then
Recipient = "
Subj = Target(1, -6) & " -- written " & oldvalue & " -- " &
Target.Value & ""
msg = "Hey... workbook's been changed"
HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & msg
ActiveWorkbook.FollowHyperlink (HLink)
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%s", True
End If
Application.DisplayAlerts=True
End Sub

Private Sub worksheet_SelectionChange(ByVal Target As Range)
oldvalue = Target.Value
End Sub






  #4   Report Post  
Posted to microsoft.public.excel,microsoft.public.excel.programming
external usenet poster
 
Posts: 11,123
Default short visibility--no visibility

Hi

Not a webpage (I think it is ready tomorrow)

Have you read the CDO page ?
Can you use it?

Try this

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 10 Then Mail_CDO
End Sub

And In a normal module

Sub Mail_CDO()
' This example use late binding, you don't have to set a reference
' You must be online when you run the sub
Dim iMsg As Object
Dim iConf As Object
' Dim Flds As Variant

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")

' iConf.Load -1 ' CDO Source Defaults
' Set Flds = iConf.Fields
' With Flds
' .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
' .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "Fill in your SMTP server here"
' .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
' .Update
' End With

With iMsg
Set .Configuration = iConf
.To = "
.CC = ""
.BCC = ""
.From = """Ron"" "
.Subject = "Important message"
.TextBody = "Hi there" & vbNewLine & vbNewLine & _
"Column 10 is changed"
.Send
End With

Set iMsg = Nothing
Set iConf = Nothing
End Sub


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Cheker" wrote in message ...
Thanks Ron,
I'll be waiting for your example. Hope you can let us know the d/l URL
too...
Regards

"Ron de Bruin" wrote in message
...
Maybe the Wait command
used in the macro can be eliminated to prevent that


No

Use CDO is the only way Cheker
http://www.rondebruin.nl/cdo.htm
I will make a example this evening and upload it to my website.


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Cheker" wrote in message

...
Unfortunately the OE window is visible in front of Excel for a "very

short"
period and the email writing process is "noticed". Maybe the Wait

command
used in the macro can be eliminated to prevent that. I'll be much

obliged if
Rob or Don can comment.
Sincerely


"Frank Kabel" wrote in message
...
Hi
you posted the same question in this group some hours ago and already
received aqnswers from Rob and Don :-)

-----------------------------
Try adding
application.screenupdating=false
code
reset to =true
---------------------------------

Hi Cheker

You will always see it

Maybe you can use CDO
See the link on my SendMail page
http://www.rondebruin.nl/sendmail.htm


You send me a private mail about CC and BCC
For OE see this page
http://www.rondebruin.nl/mail/oebody.htm
But it is not possible in OE to send text in the body and a files

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
Which post Frank?

"Frank Kabel" wrote in message
...
Hi
see your other post

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
The below code (which was given in this NG + With some minor
alterations by me) intends to check if anything is changed on
column
J then email that changed info to a spesific email address without
the notice of the workbook user...
But it has two problems:
1. If Outlook Express is not opened beforehand, starting of OE is
visible and the user recognizes that something without his/her
control is going on.
2. If Outlook Express is active before the execution of the macro,
yet again a small instance of mail being produced is visible on the
screen.

Can anyone suggest solutions for the 2 problems?
Thanks


'------------------------------------
Dim oldvalue As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
Application.DisplayAlerts=False
If Target.Column = 10 Then
Recipient = "
Subj = Target(1, -6) & " -- written " & oldvalue & " -- " &
Target.Value & ""
msg = "Hey... workbook's been changed"
HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & msg
ActiveWorkbook.FollowHyperlink (HLink)
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%s", True
End If
Application.DisplayAlerts=True
End Sub

Private Sub worksheet_SelectionChange(ByVal Target As Range)
oldvalue = Target.Value
End Sub









  #5   Report Post  
Posted to microsoft.public.excel,microsoft.public.excel.programming
external usenet poster
 
Posts: 15
Default can it be done without notice

Hi,
The below code (which was given in this NG + With some minor alterations by
me) intends to check if anything is changed on column J then email that
changed info to a spesific email address without the notice of the workbook
user...
But it has two problems:
1. If Outlook Express is not opened beforehand, starting of OE is visible
and the user recognizes that something without his/her control is going on.
2. If Outlook Express is active before the execution of the macro, yet again
a small instance of mail being produced is visible on the screen.

Can anyone suggest solutions for the 2 problems?
Thanks


'------------------------------------
Dim oldvalue As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
Application.DisplayAlerts=False
If Target.Column = 10 Then
Recipient = "
Subj = Target(1, -6) & " -- written " & oldvalue & " -- " & Target.Value &
""
msg = "Hey... workbook's been changed"
HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & msg
ActiveWorkbook.FollowHyperlink (HLink)
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%s", True
End If
Application.DisplayAlerts=True
End Sub

Private Sub worksheet_SelectionChange(ByVal Target As Range)
oldvalue = Target.Value
End Sub




  #6   Report Post  
Posted to microsoft.public.excel,microsoft.public.excel.programming
external usenet poster
 
Posts: 15
Default can it be done without notice

Hi,
Which post Frank?

"Frank Kabel" wrote in message
...
Hi
see your other post

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
The below code (which was given in this NG + With some minor
alterations by me) intends to check if anything is changed on column
J then email that changed info to a spesific email address without
the notice of the workbook user...
But it has two problems:
1. If Outlook Express is not opened beforehand, starting of OE is
visible and the user recognizes that something without his/her
control is going on.
2. If Outlook Express is active before the execution of the macro,
yet again a small instance of mail being produced is visible on the
screen.

Can anyone suggest solutions for the 2 problems?
Thanks


'------------------------------------
Dim oldvalue As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
Application.DisplayAlerts=False
If Target.Column = 10 Then
Recipient = "
Subj = Target(1, -6) & " -- written " & oldvalue & " -- " &
Target.Value & ""
msg = "Hey... workbook's been changed"
HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & msg
ActiveWorkbook.FollowHyperlink (HLink)
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%s", True
End If
Application.DisplayAlerts=True
End Sub

Private Sub worksheet_SelectionChange(ByVal Target As Range)
oldvalue = Target.Value
End Sub



  #7   Report Post  
Posted to microsoft.public.excel,microsoft.public.excel.programming
external usenet poster
 
Posts: 15
Default can it be done without notice

Hi
Sorry about that but somehow I was not able to see the reply.
Now that you have repeted the key words I'll give it a try.
Thanks a lot Frank.
Also thanks to Rob and Don


"Frank Kabel" wrote in message
...
Hi
you posted the same question in this group some hours ago and already
received aqnswers from Rob and Don :-)

-----------------------------
Try adding
application.screenupdating=false
code
reset to =true
---------------------------------

Hi Cheker

You will always see it

Maybe you can use CDO
See the link on my SendMail page
http://www.rondebruin.nl/sendmail.htm


You send me a private mail about CC and BCC
For OE see this page
http://www.rondebruin.nl/mail/oebody.htm
But it is not possible in OE to send text in the body and a files

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
Which post Frank?

"Frank Kabel" wrote in message
...
Hi
see your other post

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
The below code (which was given in this NG + With some minor
alterations by me) intends to check if anything is changed on

column
J then email that changed info to a spesific email address without
the notice of the workbook user...
But it has two problems:
1. If Outlook Express is not opened beforehand, starting of OE is
visible and the user recognizes that something without his/her
control is going on.
2. If Outlook Express is active before the execution of the macro,
yet again a small instance of mail being produced is visible on the
screen.

Can anyone suggest solutions for the 2 problems?
Thanks


'------------------------------------
Dim oldvalue As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
Application.DisplayAlerts=False
If Target.Column = 10 Then
Recipient = "
Subj = Target(1, -6) & " -- written " & oldvalue & " -- " &
Target.Value & ""
msg = "Hey... workbook's been changed"
HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & msg
ActiveWorkbook.FollowHyperlink (HLink)
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%s", True
End If
Application.DisplayAlerts=True
End Sub

Private Sub worksheet_SelectionChange(ByVal Target As Range)
oldvalue = Target.Value
End Sub




  #8   Report Post  
Posted to microsoft.public.excel,microsoft.public.excel.programming
external usenet poster
 
Posts: 15
Default short visibility--no visibility

Unfortunately the OE window is visible in front of Excel for a "very short"
period and the email writing process is "noticed". Maybe the Wait command
used in the macro can be eliminated to prevent that. I'll be much obliged if
Rob or Don can comment.
Sincerely


"Frank Kabel" wrote in message
...
Hi
you posted the same question in this group some hours ago and already
received aqnswers from Rob and Don :-)

-----------------------------
Try adding
application.screenupdating=false
code
reset to =true
---------------------------------

Hi Cheker

You will always see it

Maybe you can use CDO
See the link on my SendMail page
http://www.rondebruin.nl/sendmail.htm


You send me a private mail about CC and BCC
For OE see this page
http://www.rondebruin.nl/mail/oebody.htm
But it is not possible in OE to send text in the body and a files

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
Which post Frank?

"Frank Kabel" wrote in message
...
Hi
see your other post

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
The below code (which was given in this NG + With some minor
alterations by me) intends to check if anything is changed on

column
J then email that changed info to a spesific email address without
the notice of the workbook user...
But it has two problems:
1. If Outlook Express is not opened beforehand, starting of OE is
visible and the user recognizes that something without his/her
control is going on.
2. If Outlook Express is active before the execution of the macro,
yet again a small instance of mail being produced is visible on the
screen.

Can anyone suggest solutions for the 2 problems?
Thanks


'------------------------------------
Dim oldvalue As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
Application.DisplayAlerts=False
If Target.Column = 10 Then
Recipient = "
Subj = Target(1, -6) & " -- written " & oldvalue & " -- " &
Target.Value & ""
msg = "Hey... workbook's been changed"
HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & msg
ActiveWorkbook.FollowHyperlink (HLink)
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%s", True
End If
Application.DisplayAlerts=True
End Sub

Private Sub worksheet_SelectionChange(ByVal Target As Range)
oldvalue = Target.Value
End Sub




  #9   Report Post  
Posted to microsoft.public.excel,microsoft.public.excel.programming
external usenet poster
 
Posts: 15
Default short visibility--no visibility

Thanks Ron,
I'll be waiting for your example. Hope you can let us know the d/l URL
too...
Regards

"Ron de Bruin" wrote in message
...
Maybe the Wait command
used in the macro can be eliminated to prevent that


No

Use CDO is the only way Cheker
http://www.rondebruin.nl/cdo.htm
I will make a example this evening and upload it to my website.


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Cheker" wrote in message

...
Unfortunately the OE window is visible in front of Excel for a "very

short"
period and the email writing process is "noticed". Maybe the Wait

command
used in the macro can be eliminated to prevent that. I'll be much

obliged if
Rob or Don can comment.
Sincerely


"Frank Kabel" wrote in message
...
Hi
you posted the same question in this group some hours ago and already
received aqnswers from Rob and Don :-)

-----------------------------
Try adding
application.screenupdating=false
code
reset to =true
---------------------------------

Hi Cheker

You will always see it

Maybe you can use CDO
See the link on my SendMail page
http://www.rondebruin.nl/sendmail.htm


You send me a private mail about CC and BCC
For OE see this page
http://www.rondebruin.nl/mail/oebody.htm
But it is not possible in OE to send text in the body and a files

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
Which post Frank?

"Frank Kabel" wrote in message
...
Hi
see your other post

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
The below code (which was given in this NG + With some minor
alterations by me) intends to check if anything is changed on
column
J then email that changed info to a spesific email address without
the notice of the workbook user...
But it has two problems:
1. If Outlook Express is not opened beforehand, starting of OE is
visible and the user recognizes that something without his/her
control is going on.
2. If Outlook Express is active before the execution of the macro,
yet again a small instance of mail being produced is visible on the
screen.

Can anyone suggest solutions for the 2 problems?
Thanks


'------------------------------------
Dim oldvalue As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
Application.DisplayAlerts=False
If Target.Column = 10 Then
Recipient = "
Subj = Target(1, -6) & " -- written " & oldvalue & " -- " &
Target.Value & ""
msg = "Hey... workbook's been changed"
HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & msg
ActiveWorkbook.FollowHyperlink (HLink)
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%s", True
End If
Application.DisplayAlerts=True
End Sub

Private Sub worksheet_SelectionChange(ByVal Target As Range)
oldvalue = Target.Value
End Sub







  #10   Report Post  
Posted to microsoft.public.excel,microsoft.public.excel.programming
external usenet poster
 
Posts: 11,123
Default short visibility--no visibility

Hi Cheker

I upload a page to my site a few minutes ago.
http://www.rondebruin.nl/mail/change.htm

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Cheker" wrote in message ...
Thanks Ron,
I'll be waiting for your example. Hope you can let us know the d/l URL
too...
Regards

"Ron de Bruin" wrote in message
...
Maybe the Wait command
used in the macro can be eliminated to prevent that


No

Use CDO is the only way Cheker
http://www.rondebruin.nl/cdo.htm
I will make a example this evening and upload it to my website.


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Cheker" wrote in message

...
Unfortunately the OE window is visible in front of Excel for a "very

short"
period and the email writing process is "noticed". Maybe the Wait

command
used in the macro can be eliminated to prevent that. I'll be much

obliged if
Rob or Don can comment.
Sincerely


"Frank Kabel" wrote in message
...
Hi
you posted the same question in this group some hours ago and already
received aqnswers from Rob and Don :-)

-----------------------------
Try adding
application.screenupdating=false
code
reset to =true
---------------------------------

Hi Cheker

You will always see it

Maybe you can use CDO
See the link on my SendMail page
http://www.rondebruin.nl/sendmail.htm


You send me a private mail about CC and BCC
For OE see this page
http://www.rondebruin.nl/mail/oebody.htm
But it is not possible in OE to send text in the body and a files

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
Which post Frank?

"Frank Kabel" wrote in message
...
Hi
see your other post

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
The below code (which was given in this NG + With some minor
alterations by me) intends to check if anything is changed on
column
J then email that changed info to a spesific email address without
the notice of the workbook user...
But it has two problems:
1. If Outlook Express is not opened beforehand, starting of OE is
visible and the user recognizes that something without his/her
control is going on.
2. If Outlook Express is active before the execution of the macro,
yet again a small instance of mail being produced is visible on the
screen.

Can anyone suggest solutions for the 2 problems?
Thanks


'------------------------------------
Dim oldvalue As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
Application.DisplayAlerts=False
If Target.Column = 10 Then
Recipient = "
Subj = Target(1, -6) & " -- written " & oldvalue & " -- " &
Target.Value & ""
msg = "Hey... workbook's been changed"
HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & msg
ActiveWorkbook.FollowHyperlink (HLink)
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%s", True
End If
Application.DisplayAlerts=True
End Sub

Private Sub worksheet_SelectionChange(ByVal Target As Range)
oldvalue = Target.Value
End Sub











  #11   Report Post  
Posted to microsoft.public.excel,microsoft.public.excel.programming
external usenet poster
 
Posts: 23
Default short visibility--no visibility

Hi Ron,
Thank you.
I'll read your page and try to adopt your suggestions for my conditions...
Sincerely

"Ron de Bruin" wrote in message
...
Hi Cheker

I upload a page to my site a few minutes ago.
http://www.rondebruin.nl/mail/change.htm

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Cheker" wrote in message

...
Thanks Ron,
I'll be waiting for your example. Hope you can let us know the d/l URL
too...
Regards

"Ron de Bruin" wrote in message
...
Maybe the Wait command
used in the macro can be eliminated to prevent that

No

Use CDO is the only way Cheker
http://www.rondebruin.nl/cdo.htm
I will make a example this evening and upload it to my website.


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Cheker" wrote in message

...
Unfortunately the OE window is visible in front of Excel for a "very

short"
period and the email writing process is "noticed". Maybe the Wait

command
used in the macro can be eliminated to prevent that. I'll be much

obliged if
Rob or Don can comment.
Sincerely


"Frank Kabel" wrote in message
...
Hi
you posted the same question in this group some hours ago and

already
received aqnswers from Rob and Don :-)

-----------------------------
Try adding
application.screenupdating=false
code
reset to =true
---------------------------------

Hi Cheker

You will always see it

Maybe you can use CDO
See the link on my SendMail page
http://www.rondebruin.nl/sendmail.htm


You send me a private mail about CC and BCC
For OE see this page
http://www.rondebruin.nl/mail/oebody.htm
But it is not possible in OE to send text in the body and a files

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
Which post Frank?

"Frank Kabel" wrote in message
...
Hi
see your other post

--
Regards
Frank Kabel
Frankfurt, Germany


Cheker wrote:
Hi,
The below code (which was given in this NG + With some minor
alterations by me) intends to check if anything is changed on
column
J then email that changed info to a spesific email address

without
the notice of the workbook user...
But it has two problems:
1. If Outlook Express is not opened beforehand, starting of OE

is
visible and the user recognizes that something without his/her
control is going on.
2. If Outlook Express is active before the execution of the

macro,
yet again a small instance of mail being produced is visible on

the
screen.

Can anyone suggest solutions for the 2 problems?
Thanks


'------------------------------------
Dim oldvalue As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
Application.DisplayAlerts=False
If Target.Column = 10 Then
Recipient = "
Subj = Target(1, -6) & " -- written " & oldvalue & " -- " &
Target.Value & ""
msg = "Hey... workbook's been changed"
HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & msg
ActiveWorkbook.FollowHyperlink (HLink)
Application.Wait (Now + TimeValue("0:00:01"))
SendKeys "%s", True
End If
Application.DisplayAlerts=True
End Sub

Private Sub worksheet_SelectionChange(ByVal Target As Range)
oldvalue = Target.Value
End Sub











Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Notice that there was a change Ana via OfficeKB.com Excel Discussion (Misc queries) 2 July 30th 09 10:39 AM
Deadline Notice roy.okinawa Excel Worksheet Functions 2 June 27th 06 11:37 PM
can it be done without notice? Cheker Excel Programming 2 October 4th 04 04:18 PM
Change notice Gee...[_2_] Excel Programming 1 June 29th 04 08:24 PM
how to supress clipboard notice? Sherri[_3_] Excel Programming 2 April 27th 04 11:26 PM


All times are GMT +1. The time now is 09:49 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"