I've some code to add a comment with the value of the corresponding cell 9 columns across:
For Each rCell In rRng.Offset(0, 0).Resize(rRng.Rows.Count, rRng.Columns.Count)
On Error Resume Next
rCell.AddComment
On Error GoTo 0
rCell.Comment.Text "Previous value was " & Cells(rCell.Offset(0, 9).Value) '(rRng.Row, rRng.Column).Value
how to copy the contents of multiple comment boxes and paste in a single comment box.
The big picture is that I have a number of cells with numerical values in and text in comment boxes. I want to be able to click a button to copy the contents of the comment boxes and paste them, along with the numerical value from the cell, into a single comment box, ordered by highest to lowest value within the comment box, then delete the original cells and comments.
I am quite new to VBA but have been coping quite well so far with information of the web and analysing recorded macros.
I'm wondering if it is at all possible to have a cell comment automatically update depending on what data is input in the cell (via user input, VLOOKUP, etc.)?
For example, if cell A1 contains the text "CHARLES" with a comment saying "Employee of the Month", and is then subsequently updated with the new text "JOHN" (again, via direct input, a VLOOKUP, data validation, etc.) is there a way to have the comment automatically update to say something else, such as "Team Lead" for example?
I've considered using VBA to accomplish my goal, but am unsure how to compose an effective code to do so. I've also considered perhaps creating a named table filled with all the different comment possibilities I would like to have used in this cell and then inputting a formula in either cell A1, or the comment contained therein, that would then call the corresponding text from that table based on the data in cell A1. Honestly, I'm not sure that what I'm trying to do is even possible;
I have some code that finds the appropriate string for a comment from another sheet. I then want to add the string to the appropriate range selection but am encountering an Object Variable or With Block Variable Not set on this section of
Range("C" & i).Select
ActiveCell.Comment.Delete <== Here Or the Next line
ActiveCell.AddComment (Commenta)
ActiveCell.Comment.Shape.TextFrame.AutoSize = True
Where Commenta is the string value I want to add.
How, via VBA, would I add a comment from a userform (text box name: txtReason) into a cell that may already have a comment in it? I would like to keep the comment that is in the cell and then have the program add a "/" and the next comment from txtReason..
(using excel 2010)
I am working on a database and trying to remove duplicates. When there are duplicates, I want to take the contents of one cell and copy them as a comment on the cell above (or below).
I tried to work on a small macro to do so, but the contents of the cell cannot be copied (it comes out as a blank).
The long way is to 'double click' in the cell, Ctrl+A, cut, click the cell above, Ctrl+F2, paste. This way is very long as I have thousands of duplicates.
What is the best way to reference a cell in another workbook and return the cell contents and the comment on that cell. I would like the comment to come across as a comment in the new workbook becuase the comment is actually a picture.
Hope this makes sense. I did find a macro through googling but I couldn't get it to work? I don't really want to copy and paste because eventually I have hundreds of sheets & thousands of cells to refer to.?
I have a spreadsheet with some cells which return values using INDEX and MATCH to bring back the entire details of a person based on there membership number. However I require the comments to be attached with the returned values. The comments have there image in, rather than just text.
I have found some answers with vba, which do the process, however you had to manually enter the cell, from which the comment was to be copied from, into a pop up box. This involved finding the box myself to then select the box to take the comment from. In doing this I had found and read the comment, which is the is the process I'm trying to bypass.
I need to copy a cell content to a Comment into another worksheet in
the same cell ref.
sheet1
A1 = apple
A2 = orange
Sheet2 - target
A1 = comment (apple)
A2 = comment (orange)
i need to have a way to link a small picture/thumbnail to a cell. so that there is a way to preveiw it. Ideally like what happens with the comments where you hover over the cell and the comment would pop up. or failing that may be a cell linking to the image.
View 8 Replies View Relatedmake the contents of the cell comment box dependent on the cell contents? eg if the cell contents = 2 and a seperate table says 2 is "poor" can it automatically populate the comment with "poor" ?
View 5 Replies View RelatedWhen I insert a comment in a cell, my corporate version of Excel displays my employee number. How can Code a cell to populate this employee number.
View 3 Replies View RelatedI'm using a function at the moment to copy the comment text from cells, but would like to Change it a Little. At the Moment I have:
[Code]...
There are 3 Basic Groups that the comments refer to, eg: If a comment is a 1,4,11,14 it's Group A. 2,5,12,15 are Group B, etc...
Is there a way to insert a pdf into a cell comment? I found how to insert an object but when I do that it covers the entire spreadsheet. I would like to be able to add pdf's to cell comments.
View 3 Replies View RelatedI have the code below, and it works perfectly on my Mac. But... on my PC it does not.
The cell comment does not resize horizontally when I enter text. So if I enter a long comment I get a comment box that extends far to the right to fit the contents in. Vertically it is fine, nothing cut off and no extra space.
Any ideas why this would be? Any ideas how I can force the text to wrap in the cell comment box?
Code is below:
Sub AddCom()
Const USERNAME As String = "Greer:"
Dim strCommentName As String
Dim cmnt As String
Dim NoMore As Boolean
Dim Pos As Long
cmnt = InputBox("Please enter a comment")
strCommentName = cmnt & vbLf & Now
On Error GoTo 0
With activeCell...........
I have a set of data with text in one cell and images in a cell adjacent the text to illustrate the text. I am trying to figure out how to add a comment to the cell containing the text and take the image in the adjacent cell and put it in the comment.
Is there a way to do this, or do I have to write a macro that saves the images as their own files and then insert the image files into the comment?
I'm using this formula on Sheet2 to populate a cell (copied across and down)...
=IF(COUNTIF(Master!$F$1:$F$300,$A2)>=COLUMNS($B2:B2),INDEX(Master!$B$1:$B$300,SMALL(IF(Master!$F$1:$F$300=$A2,ROW(Master!$F$1:$F$300)-ROW(Master!$F$1)+1),COLUMNS($B2:B2))),"")
In cell B2 Sheet2, I would like to have a cell comment that is populated by the data in Master! that is alongside the data looked up in this formula, this principle would apply to every cell in my range... Sheet2 B2:AC100.
So on Sheet2 B3 is populated by B11 from Master!, I would like the comment to be the value of A11 on Master!
I want to select any cell on a spreadsheet, then run a macro that inserts a comment to the selected cell with the inserted comment text being the selected cell entry (value/text/ date). Primarily to insert a cell date value to comment before overwriting it with a tick to represent completion. The comment then contains the date for archive info purpose.
View 2 Replies View RelatedI have a worksheet with about a dozen cell comments in one column. I am able to add and edit cell comments to other cells throughout the worksheete, but I can not edit any of the existing comments. I've tried all of the usual ways to edit the comment (Shift/F2, Insert-Edit Comment, etc.), but nothing opens the comment in edit mode.
View 3 Replies View Relatedif choose a cell then the code works fine, but when i choose a selection of cells
(ex. A1 A2A3 A4) then the code fail to excute in this line: Invalid proceduer call or argument error
.AddComment "hmk :" & Chr(10) & " value was " & ActiveCell.Value
and then fail to excute in this line: typr mismatch error
Selection.Value = (Selection.Value) * r
now here, does have to be loop to solve
here is the full code
Sub test()
Dim r As Integer
ActiveCell.ClearComments
i need to have a way to link a small picture/thumbnail to a cell. so that there is a way to preveiw it. Idealy like what happens with the comments where you hover over the cell and the comment would pop up. or failing that mabe a cell linking to the image.
View 6 Replies View RelatedI'm trying to do something with pictures that have been inserted into cell comments. I'd like to be able to copy a picture that had been inserted into a cell comment, and save as .jpg with file name and file location designated by other cells in the spreadsheet. For example A1 contains "monkey" and has a picture of a monkey inserted into a comment on the same cell. B1 contains "zoo". I'd like to copy the picture from A1's comment and save as monkey.jpg to location c:zoo. Is this kind of thing possible in VBA?
View 5 Replies View RelatedMy situation is like this:
-I have two sets of data in two different sheets. The data is similar, but it is taken in two ferent times, so there are some cells, which content has changed.
-I want to make a macro that identifies the changes in the latter (newer) sheet compared two the older one and to:
a) Highlight the cells (this works)
b) Add a comment to each cell that has changed so that the content of the comment is the content of the "older" cell. (so that one can easily see from the newer sheet that highlighted cells have new values and the old values are in the comment) (this is not working)
Here's my code so far. Like I said I can't make the comment work. I tried it with the same text in all comments ("test comment") and it worked but I can't make it to go and get the data from my older sheet.
OLDER = my sheet with old data
NEWER = my sheet with updated data
NEWTABLE = my table on the NEWER sheet where I want to check the changes
[Code].....
being able to setup pics within the cell without setting up the pics in comments. I need the pics to be visible as day so when I save them in pdf form they can be seen by my clients without them having to click and go reference other files. Also if this is possible, is their a way I can load the pics using no more than 3 steps to get the sheet to start loading the pics, I am needing to minimize some steps just for saving time. I plan on using this setup for inspections and can't spend a lot of time changing the pic size and opening different files.
View 3 Replies View RelatedAs said a box appears with information guiding the user to what should be entered.
I inherited this spreadsheet and would like to edit the contents of this box and also learn how to make them myself.
Also I'd like to note that the box does not respond to right clicking
if its possible to link contents of a cell to a comment.
IE - Whatever the cell contents in sheet 1 A5 would reflect in the comment in sheet 2 A5 Im happy if its coded that would work.
Say I copy "My name is John Doe"
In Cell B2 or D9 or whatever, I want to insert a Comment with it being "My name is John Doe"
How do I make Paste work in Comments?
I form a string and put that string into a selected cell as a comment. Mostly it works fine but as the string gets over a certain length (255 characters?), the string gets "truncated" in that only the characters over that length get put into the comment.
View 7 Replies View RelatedI have data validation and conditional formatting set for my sheets. However, I cannot figure out something.
I want a "comment" box (just as if I would click on "add comment") to pop up automatically if the user enters a certain value in a cell.
For example, if cell C4="1" then no further action is required. If cell C4=anything other than "1", then the user would be required to enter a comment. I would also like the comment to autopopulate with the users login id.
I will attach the book I am working on for reference, but I do not have any code written for this as I could not figure out where to start.
I have a excel document that I log the cell changes by logging it to a comment block but once the cell is blank I would like to delete the comments the next time it is document is opened. This would have to happen on three sheets. I have an idea for the code but can't seem to get it together.
View 9 Replies View Related