ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Comments (https://www.excelbanter.com/excel-programming/423580-comments.html)

kirkm[_8_]

Comments
 

Is is possible to show a Comment by code instead of mousing over
it ??
If yes, can its display position be changed at all ?

Thanks - Kirk

Chip Pearson

Comments
 
Kirk,

Try code such as the following:

With Range("E9")
If Not .Comment Is Nothing Then
With .Comment
With .Shape
.Top = Range("E11").Top
.Left = Range("G11").Left
.Height = 100
.Width = 100
End With
.Visible = True
End With
End If
End With

Cordially,
Chip Pearson
Microsoft Most Valuable Professional
Excel Product Group, 1998 - 2009
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)



On Sat, 07 Feb 2009 16:23:51 +1300, kirkm wrote:


Is is possible to show a Comment by code instead of mousing over
it ??
If yes, can its display position be changed at all ?

Thanks - Kirk


kirkm[_8_]

Comments
 
On Sat, 07 Feb 2009 12:27:50 -0600, Chip Pearson
wrote:

With Range("E9")
If Not .Comment Is Nothing Then
With .Comment
With .Shape
.Top = Range("E11").Top
.Left = Range("G11").Left
.Height = 100
.Width = 100
End With
.Visible = True
End With
End If
End With


Thanks Chip, I had a lot of fun -and success - with
your routine. It showed me quite a lot... however I havent
quite got Top and Left working as needed.

The comment should show beside a Form, against its RH side
and Form Top. I can use absolute values, but anyone else using my
workbook may have a different screen resolution - which
presumable would want different values.

The Form is centered (StartUpPosition 1 - CenterOwner) and
I've been trying to use Frm.Width and .Top in place of
Range("E11") and Range("G11").

Maybe you know someway this can be done?
I've been playing with Set rng = ActiveWindow.VisibleRange
and rng.Top - left - height etc. But I've a long way to go !

Also - do you know - can the comment be turned off without
needing to calcualting a Range?

Thanks - Kirk


All times are GMT +1. The time now is 02:10 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com