I am sure this can be done - I found a similar thread but in a different context to what I need.
I have a user of a workbook who insists on putting irritating red cornered comments in cells, rather than using the handy (and rather large) comments field I put in, especially for her.
How would you prevent the copy/paste of cells that have comments?
Also, how would you allow cells with comments to be copied and pasted without pasting the comments?
I also have an aside question about the forum advanced search. When searching for multiple search words, how would you type the search to include all words, for example, "prevent" & "paste" & "comments".
I know that you can add a comment to a cell using a statement like
Range("A1").AddComment "Hello"
But is it possible to add more text to that comment using VBA?
I tried things like
Range("A1").AddComment "Hello."
Range("A1").Comment = Range("A1").Comment + " How are you?"
but I guess I can't alter the comment that way.
im using comments to display images for easy look up
when i save a picture i want it to be that size when i hovver over the comment
but when i insert the picture it doesnt open the size that i saved it as
i manually have to resize the image so its legible
why is this and is there a way round this?
I was wondering if there was a way to add comments (that you see in spreadsheets) on a userform in vb editor. So that when you run the form and the user moves the mouse over a textbox then it displays the comment.
View 2 Replies View RelatedI want to create a comments box whenever a cell is double clicked in sheet "Settlements"
View 9 Replies View RelatedFor each cell, instead using a comment, I need another way to show a large amount of principaly letter texts, without using hypervincules, and ofcourse comments.
By the way, the same text I enter or modify put in this "way", I need to modify in the MSWord document and viceversa.
I appreciate the linking do not open another app, because the large amount of them I need to work with.
I have a sub that works just fine, but I need to test it for blanks.
Sub AddToComment()
Dim rCell As Range
Dim cCom As Comment
Sheets("Support Detail").Select
With Range("e5")
.ClearComments
Set cCom = .AddComment
End With
Sheets("Sheet1").Select
For Each rCell In Range("a4:a23")
cCom.Text Text:=rCell.Text & " " & cCom.Text
Next rCell
End Sub
I only have 1 line of test in the a4:a23 range - so I'm getting 19 spaces before the text in the comment. If the cells within a4:a23 are blank, how do I ignore them? I'm not sure how to interpret this code, so I'm sure it's probably easy:
cCom.Text Text:=rCell.Text & " " & cCom.Text
I have an excel worksheet which has a lot of comments attached to individual cells. Is there a way to convert these comments into a microsft word document along with the contents of the cells to identify where they originated? Also Is it possible to convert just a selection of cells into word document rather than the whole worksheet.
the little red triangle in the corner of cells with comments in. Note: I know how to print the actual comments - however, the colleague I'm assisting only wants to show that there is a comment without actually showing said comment. I'm using Excel 2007.
View 3 Replies View RelatedI have a workbook that I received from a vendor that when I click in a cell a comment appears. There is no line or comment indicator for each comment. So I went into the tools - options - views - comments section and chose no comments. The comments still appear and when I go to the tool bar - view - comments nothing appears. I checked for any VBA code and didn't see anything. I was able to get around this problem by copy/paste special into a new worksheet, but curiosity is killing this cat.
View 2 Replies View RelatedI have several worksheets that have comments in the cells. Most of the comments i have set to "un-hide" and they can be printed. I now have this one spreadsheet where no matter what I do I cannot print the comments.
I must have something turned on or off but for thwe life of me I cannot figure out what it is. I can see the comments on the screen but when I go to print preview they are not there.
I would like to copy and paste comments from one cell to another. I don't want to copy and paste the contents of the cells, just the comments and the formatting that goes with the comments.
View 3 Replies View RelatedI have several comments being placed into a pivot table from a macro. However, all of a sudden, when I changed the source of the Pivot table, the comments now do not appear when hovering over the cell. They only appear way off to the right if I click "review," "Show/hide comment" or "show all comments."
View 1 Replies View RelatedI have been able to use a time stamp code to put a date and time in a cell... I then worked out how to use this to list dates and times in the same cell (instead of replacing the cells contents)... using this
View 7 Replies View RelatedI have slight problem with an OnChange Event by Target.
I am looking to be able to change a cell value from one to another, create a comment block that says "person B for person A" , change the color and be done.
If the cell is empty then the code should exit the sub (not working). If the cell has already been change once then I want the comment box to show a second line of who changed what.
What I tried in the comment box, thinking it would keep the value:
Here is a picture example of what I mean, just randomly found on google:
http://www.projectwoman.com/uploaded...ent-763577.jpg
Maybe an insignificant thing I want, but can the line from the comment connecting to the red indicator be removed? Added an example since my comments show up below the selected cell with VBA code.
I searched for a code to add pictures to comments with VBA.
I only found this:
I have code that adds comments to a field once the field has been changed. What happens is you right click the field, select a field that has been added to the right-click menu called FYI. After FYI is selected an InputBox() statement is used and a box appears for you to type comments. Then what you typed is added to the comments in the cell.
Is there a function like the InputBox that allows you to use a List Box instead. I have tried finding it but cannot locate what I think it is. This is probably simple but I can't think of anything. I guess I could create a user form that pops up but I thought this would be easier to just have a Dop list appear like the InputBox if there was a function already in Excel?
With the help of Venkat1926 I established a macro that successfully hides a number of rows that are unrquired (based on dates):
View 14 Replies View RelatedI would like to use a macro to automatically extract the comments in Sheet 1 ( those comments are Customer Names and Their addresses ) to a new Sheet 2 which will print shipping labels.
I have manually created the first three labels on Sheet 2 to show what I want to accomplish. The tricky thing is, that some Customers receive 2 or more artworks...
Currently we have an excel sheet in which it contains four sheets(sheet1,sheet2, sheet3 and sheet4). In this sheet1,sheet2,sheet3 and sheet4 there is some text data in the columns.
what we are looking is we want a comment box to appear when one moves the cell focus in a sheet (sheet3 or sheet4) to a cell in the field column. In the comment box it should display the data which is in the other sheets(sheet1,or sheet2). The items in the comment box should be data field column,fight type,Defect colour, and list in english column.
The comment should be temporary..i.e it appears when focus is on the particular cell in column field and disappers when focus is moved to another cell.
Can anybody help me with a code that shows a comment within the user form when specific a checkbox is selected?
I am attaching a sample file with user form containing 6 checkboxes. I need when Name6 is selected, a comment "Test" to appear inside the user form beside the checkbox.
if u check my file u can see some comments in calender sheet in january but i want to apply this for other months by repayment dates..
View 11 Replies View RelatedAttached is a screen shot of a bit of a file I made to use daily. It needs to be used by many people and always starts out new each day. I'd like to make the comments on the right stay "full size" when the sheet is scrolled down (it needs to be able to scroll). The top 3 lines are "fixed" and don't scroll. I've tried comments ( currently ), pictures, imported pictures...everything I know to try. How can I make the comments box persist without "rolling up" when the remainder of the sheet is scrolled?
View 2 Replies View RelatedI have the following code which deletes the specified value from each cell in column B that contains that value, (note it only deletes the value from that column and not all in the row).
Code:
Sub delete1()
Dim lr As Long, i As Long
With Sheets("Database")
lr = .Range("B" & Rows.Count).End(xlUp).Row
For i = lr To 2 Step -1
If .Range("B" & i).Value = 1 Then .Range("B" & i).ClearContents
Next i
End With
End Sub
Now what I need is to adapt it slightly so that it also adds a comment to the cell in Column I and the current date in Column L, (on each row where the deleted value was).
The comment would be something like "old data archived" and the date in any format, preferably dd/mm/yyyy.
I have inserted a comment on a cell.... what required is the comment should show every time the cell is selected/highlighted with the keyboard - no matter the mouse pointer is on the cell or not.
Whereas, the comments only shows when the mouse pointer touches the cell...
Need one column to combine three columns I have a in a spreadsheet.
Column A - Comments
I have a comment called Duplicate or blanks
Column B - Comments 2
I have a comment called Loss Fund or blanks
Column C - Comments 3
I have a comment of Y or N
I just a want formulae which put the following in one column
Where it is Duplicate in Column A
Where it is Loss Fund in Column B
Where it is Y in Column C
So I have one field for all comments.
Sub CommentThem()
Dim cell As Range
On Error Resume Next
Selection.ClearComments
On Error GoTo 0
For Each cell In Intersect(Selection, ActiveSheet.UsedRange)
If cell.Formula "" Then
cell.AddComment
cell.Comment.Visible = False
On Error Resume Next 'fails on invalid formula
cell.Comment.Text Text:=" Days: " & cell.Value & Chr(10)
On Error GoTo 0
End If
Next cell
End Sub
I am using this formula to extract the [h]:mm value from a cell and place it into the cell comments. The current result gives me a result of Days: 3.9339797008547 for a cell with the value of 94:24. Is there anyway to change this to only 2 decimal places (3.93) without changing the initial cell value.
I have a worksheet with the following in Column E and F respectively:
ID Name
100 aaa
100 bbb
200 ccc
200 ddd
200 eee
300 fff
400 xxx
500 yyy
500 zzz
500 kkk
500 lll
500 mmm
When I input an ID number in Cell A1 and if it is found in the above table, it should bring all the names corresponding to that ID in a cell comment.
The ID Number is repeated in the above table because the names in Colum F are the dependants name for that particular ID.