Hi,
use below or pfa
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Value Then
If Target.Comment Is Nothing Then
Target.AddComment
Target.Comment.Text Target.Value
Else
Target.Comment.Delete
Target.AddComment
Hi,
use below or pfa
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Value Then
If Target.Comment Is Nothing Then
Target.AddComment
Target.Comment.Text Target.Value
Else
Target.Comment.Delete
Target.AddComment
Hi Pankaj,
PFA .!!!
Regards
Ashish
On 18 August 2014 10:24, Pankaj Kumar pankaj...@gmail.com wrote:
I need VBA code to copy the cell value and paste in comment box for the
same cell.
Example: If I select any cell or merged cells which has some text in it
then code should copy
Hello ,
I am trying to send multiple email with attachment with the help of Vba.
Unfortunately I am getting an error “Automation error 440”
Need your help in regards to the attached file.
Awaiting for the reply !
Thanks,
Ujjwal
--
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do
chek if attachment is there in place?
On Mon, Aug 18, 2014 at 4:32 PM, Ujjwal Desai ujjwal1...@gmail.com wrote:
Hello ,
I am trying to send multiple email with attachment with the help of Vba.
Unfortunately I am getting an error “Automation error 440”
Need your help in regards to the
Hi
Check this..
Cheers!!
On Mon, Aug 18, 2014 at 11:22 AM, son nguyen sonnguye...@gmail.com wrote:
Dear Mr Joshi
Thank for your help ,but it isn't to meet my requirement because I only
exclude sunday not weekend.You could give me a other solution.
Thanks a lot.
Son
2014-08-16 23:28
Hi Vaibhav,
The file path given contains the attachment but still it gives me with the
automation error.
If you can give me another code or solution I would appreciate.
Thanks,
Ujjwal
On Aug 18, 2014 5:19 PM, Vaibhav Joshi v...@vabs.in wrote:
chek if attachment is there in place?
On Mon,
Try this code, if file doent exist it will pop up exit macro.
Try changing file location manually to chek working of code.
Sub CreateMail()
Dim objOutlook As Object
Dim objMail As Object
Dim rngEntry As Range
Dim rngEntries As Range
Set objOutlook =
Hey Paul,
first of all, thank you for getting back to me and sorry that it took me so
long to respond. Since I couldn't access this group from work, I tried
re-creating the same scenario at home - with success, except for the one
issue that things were fine when in debug mode. I figured out
Thanks vaibav for your prompt response. It looks good but the problem with
this code is that whenever you double click on any cell in the sheet, it'll
pop - up the message box. But my requirement is restricted with couple of
cells only. Can we modify the code where input box will ask for cell
Hi Vaibhav ,
Finally now working !
But once the macro is executed it does generates the auto email with
attachment too.
But it prompts an error Type Mismatch
How can we fix this problem ???
Thanks,
Ujjwal
On Mon, Aug 18, 2014 at 6:48 PM, Vaibhav Joshi v...@vabs.in wrote:
Try this
Dear Excel Guru,
I am trying to write a code for,
Select particular folder and copy some ranges one bye in my current sheet.
Here are some limitation.
Selected folder contain sub folder.
Multi select, and dependent folder should also be read.
I am providing the code,
Sub NEWMASTER()
'
On which line you are getting error?
On Tue, Aug 19, 2014 at 12:40 AM, Ujjwal Desai ujjwal1...@gmail.com wrote:
Hi Vaibhav ,
Finally now working !
But once the macro is executed it does generates the auto email with
attachment too.
But it prompts an error Type Mismatch
How can
hi
check this, i have modified Ashish ji's code. Select cell for which you
want comment to appear run macro by clicking blue button.
Cheers!!
On Mon, Aug 18, 2014 at 9:16 PM, Pankaj Kumar pankaj...@gmail.com wrote:
Thanks vaibav for your prompt response. It looks good but the problem with
Hi Vaibhav ,
on the below line :
If Dir(rngEntry.Offset(0, 3).Value) = Then
MsgBox File rngEntry.Offset(0, 3).Value doesnot exists,
exiting macro.
End If
On Tue, Aug 19, 2014 at 11:12 AM, Vaibhav Joshi v...@vabs.in wrote:
On which line you are getting error?
On Tue, Aug 19,
15 matches
Mail list logo