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:
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 have a list in Column A" Job List" (the amount of entries will change based on job openings). There are some cells that are blank; randomly throughout. I need to create a new Column B "Current Jobs List" with no spaces. I have to do this weekly and each time I update my "Current Jobs List" from the new data in the "Job List" without any spaces.(I do not want to just do a filter) .
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.
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.
For 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 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.
I 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.
I 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.
I 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."
I 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
I 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 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?
I 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.
Attached 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?
I 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
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.
