I have a cell comment on a series of columns and want to show only one column at a
time. For this reason I hide the ones not used, but the cellcomment doesnt move and
is still at the original place. How I move the comment when the original colums between are hidden ?
I need to have users be able to modify notes to various pre-set comments on a protected sheet, however I do not want to have them be able to move the comment box (shape)...
View 8 Replies View Related1)After comparison and no difference between the cells
1.1) If the cell selected is blank then there will not be any color
1.2) Else the cell will be colored GREEN
2)After comparison and there is difference between the cells
2.1) Cells wiill be colored RED
However, my code seems to be unable to execute (1.1) . Pls help to see if there's any thing wrong with my code
For K = 1 To 31
For L = 1 To 29
'Do a comparison of the cells
If StrComp(Array_compare(A, 1), Array_compare(A, 2)) = 0 Then
If IsEmpty(Array_compare(A, 1)) Then
Sheets(3).Select
Cells(K, L) = Array_compare(A, 1)
Else
Sheets(3).Select .................
I have a report where, month in month out, i have to append columns on the right, to give a Year to date figure. Now there are many rows with different numbers but one of the columns is call [NOTES]. This is where the user can provide commentry on the weekly figures.
Now whats getting annoying is i have to copy this commentry and then create a comments box then paste the text in there and finally, hide the comment.
So what i want to be able to do is be able to Copy the cell, then, have a right click menu button saying "Paste As Comment", so it paste the selected cells contents into a comment and hides it.
I have a worksheet where some cells contain a comment. I don't know beforehand how many of those cells are present, nor their address. I want to write a macro that stores the values of only the cells that contain a comment into an array (of course the size of the array is not known beforehand). This should be done by scanning through those special cells in a given order (by rows, by columns, whatever).
View 4 Replies View RelatedHow 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've been trying to figure out how to use a formula that would enable me to copy/copy & move a range of cells right one column if a certain criteria is met.
Basically, if a criteria is met, I want to 'copy' everything from a row to another row, but offset it by one column (so that what was in, let's say, a1 would be in b2).
I've been tinkering with index(), if() and offset() in various combinations but think I must be missing something.
I have come across a format issue I need to deal with it at work.
I have a list of data like this:
A
1234567
8956423
4561237
7531596
8524561
In Column A, I have about 2,000 lines of information. What we want to do at work is create this information to be held in one cell at the top of the excel and in numerical order.
Like this:
A
1234567, 4561237, 7531596, 8524561, 8956423.
I have the following code that will go down through column "L", look for the value "ATS", and if found will move it to the right 1 cell. this works find,
My need is to also move the 2 cells directly below the cell containing "ATS", then clear the contents of the "Original" 3 cells before going to find the next instance of "ATS".
Sub Move_Values()
Dim myrange, cell As Range
Set myrange = ActiveSheet.Range("L4", Range("L5000").End(xlUp))
For Each cell In myrange
If InStr(cell.Value, "ATS") > 0 Then
cell.Offset(0, 1).Value = cell.Value
cell.ClearContents
End If
Next cell
End Sub
I have 2 col A & F. F col associate with date values & Col A has some color cells.I want to move down those color cells to a selected non-color cell row when run a macro.
I have code which perform to move color cells down to selected cell but problem is, if i have A4 & A6 color cells and i selected F2 cell & run macro then color cell A4 & A6 move down to cell A2 but cell A3 move to place A6. The sequence is
A1A2A4A6A5A3A7A8 & so on but i want cell A3 just push down the order & sequence will be
A1A2A4A6A3A5A7A8 & so on My code is as
Code:
Public Sub Move_colored_cells_rows()
' Instead of moving the entire row , 10 columns will be moved
Const NUMBER_OF_COLUMNS = 10
[Code]....
I would like to move the data in one column up by 1/2 a row without moving the other columns/rows in the spreadsheet
Here is an example I made quickly in Photoshop - the above image is what I currently have in Excel, and the lower image is what I would like to achieve, with the column shift that I would like circled in red
(the empty space under the column heading is just an artifact from the edit, it doesn't have to be there)
I have an excel file that contains data from bank transactions.
In column A at irregular intervals is a cell with " User Group:" It depends on how many transactions there are in a batch, could be 1 or up to say 200 as to when the next "User Group" cell is found.
After that also in column A is "Item" then "Lodgement Ref" then at the end "Batch Totals"
i.e.
User Group:
Item
Lodgement Ref
Batch Totals:
User Group:
Item
Lodgement Ref
Lodgement Ref
Lodgement Ref
Batch Totals:
I want to find each instance of "Item" then move that cell and every cell over to column CK down to and including "Batch Totals" i.e. A3401 to CK3410 to CM 3400 so it lines up with the top of the transaction block.
There are over 60,000 lines so it's worth trying to find a solution as I can then use the methodology to make other refinements in the spreadsheet.
I have attached the sample file where I have noted what I want as a comment. I need to check for the value " Function Name: RF Pick" if this is there then the code should move 2 rows down check whether that row has the value " Each" if its there just move one row down and move the cells as I need in the output.
View 7 Replies View RelatedAttached is a document, column C & F highlighted in green are areas that users will input data. I need to create a button (top left of spreadsheet) that when pressed moves both the data from column C & F up into the box above. The top set of dates would be deleted and the dates from Trip 2 would move up into the Trip 1 position, Dates from Trip 3 would move up into Trip 2 position and so on.
View 2 Replies View RelatedI'm trying to do is loop through a range of cells, and if the cell meets a condition I want to move it and 2 cells to the right of it left by one cell.
Sub MoveRangeOfCellsBasedOnCellCriteria()
Dim myrange, cell As Range
Set myrange = ActiveSheet.Range("H2", Range("H65536").End(xlUp))
For Each cell In myrange
If IsNumeric(Left(cell.Value, 1)) _
Or Left(cell.Value, 5) = "UNIT " _
Or Left(cell.Value, 4) = "THE " _
Or Left(cell.Value, 5) = "FLAT " Then
Else
cell.Range("A1:C1").Select
Selection.Cut
cell.Offset(0, -1).Range("A1").Select
ActiveSheet.Paste
cell.Offset(1, 1).Range("A1").Select
End If
Next cell
End Sub
i need to have 6 or so cells copied and pasted into another sheet. (when a button is pressed) However before the data is pasted it checks if there is anything in the cell(s) that are being pasted into, if there is something then move down a line and paste. Here is the code i have already:
Sub Order2Invoice()
Sheets("OrderDatabase").Select
Range("B65536").End(xlUp).Offset(1, 0).Select
With ActiveCell
.Value = Orderform!G5.Value
.Offset(0, 1) = Orderform!E10.Value
.Offset(0, 2) = Orderform!E11.Value
.Offset(0, 3) = Orderform!E12.Value
.Offset(0, 4) = Orderform!E13.Value
.Offset(0, 5) = Orderform!E15.Value
.Offset(0, 8) = Orderform!E15.Value
End With
Sheets("Invoice").Select
End Sub
Is there a way to delete comments in a selected range of blank cells?
View 7 Replies View RelatedWhen adding a comment I check for an existing comment, if exist then delete and add new comment and some text in that cell. This works as long as the cell has an existing comment; other wise it advances to the "Else" where I thought I would be entering a comment and text in an empty cell. Why does my macro treat an empty cell as if it has a comment?
View 4 Replies View RelatedThe macro below only works for a single cell, how to include merged cells?
Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)
On Error Resume Next
Dim cmtText As String
[Code]....
I'd like to know how to have the comment feature without the red triange on cells with comments. I didn't want to use data validation comments because I want the hover feature.
View 5 Replies View RelatedI try to edit comments in cells of a certain column and nothing happens. I am able to edit other comments throughout the spreadsheet, but when I select "edit comments" for these particular cells, no edit box is displayed for editing. It worked fine a couple of weeks ago.
View 11 Replies View Relatedcolumns consist of 1,2
I selected only 1 value of cells
I want to add comments to all the 1 value cells by selecting all 1 by shift + ctl +down
I can put same comments to all the cells?
If you want to have the same comment applied on many cells you could apply it to a single cell, then use the copy and paste special tool bar commands (under Edit) In Paste Special select "Comments" but value is going of that cell.
Reference the archives at:
http://www.mrexcel.com/archive/VBA/17448.html
How can I modify this sub to skip cells that are empty? I only want cells that are populated within the range to actually display the comment indicator, with the cell text transferred to the comment.
Ideally, I'd also like the text to be moved (not just copied) to the comment and leave an 'X' in the cell, in place of the text that was transferred to the comment, but I'll settle for the action above.
I am having trouble writing a macro to do the following. Someone had created a spreadsheet a while back that highlighted the cell green and inserted a comment with the person's name and date/time if they changed anything in that cell. The macro works great, but I need a macro to undo the changes.
I would like a macro that will remove all comments from the sheet and revert the cells back to their original color. Since the cells encompass many colors, at the very least, I would like the macro to remove the comments and make the cells the default shading (white).
I noticed that I have several (@200) comments that when visible displays Cell X Commented by (my work user number) in the lower left corner of the excel window. I'm not sure how to change this so its the company name instead of my work number. I'd be using a loop to go through each comment but need help with the line that would change this part.
View 8 Replies View Relatedis there a way to stick a few row of cells together so that when i move one they all move.. i have some rows that when i sort them i want them to move together with the other ones..
View 9 Replies View RelatedI'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 an Excel 2007 workbook with several sheets, and various cells in several of the sheets have column headers with a description in the same cell enclosed in curly brackets, e.g. Header{Description}. I would like to to keep the column headers in their respective cells, but move (cut) the descriptions along with the brackets to the respective cell comments.
View 1 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 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 Related