Comment Text Property
Nov 17, 2003Is there a way to change the font size and style of a comment of a certain cell?
I mean is it possible to have the sizes of comments varies in one worksheet?
Is there a way to change the font size and style of a comment of a certain cell?
I mean is it possible to have the sizes of comments varies in one worksheet?
I have a spread sheet were the area is getting very limited. I need to insert a small icon and when the mouse goes over (like it does in a form tool tip) will show the value of a cell (text value) located in another sheet in same workbook, or I was thinking inset a comment next to the icon and link the comments of the comments text to cell with the text value.
View 14 Replies View RelatedI have a spread sheet were the area is getting very limited. I need to insert a small icon and when the mouse goes over (like it does in a form tool tip) will show the value of a cell (text value) located in another sheet in same workbook, or I was thinking inset a comment next to the icon and link the comments of the comments text to cell with the text value.
I've look the properties of this to objects and can figure it out.
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.
if 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 have a userform within an Add-in. The form contains multiple text boxes, shown as a grid. When the user uses the calculate button - the text box in question is raised and highlighted using the follwing code within a case statement:
View 2 Replies View RelatedI don't understand what I am missing. but I can't paste a string into a cell [range.cells(x,y).text = string]
Here is my ' ' -delete any rows that contain "Fab 11"
' -rename any cell that has "Supply x" (Delete " supply x" from text)
Dim cellText As String
Dim i As Integer
Dim lastRow As Long
Dim rngSigac As Range
Dim wb As Workbook
Dim ws As Worksheet
I am trying to combine the text from the comments boxes of a full row of cells into the comments box of a separate other cell in order to provide an overview of the comments in these cells in one place.
View 2 Replies View Relatedwhen i use a macro to add a comment to one of my cells, if i put in too much text the box doesn't resize itself and you can only read part of the comment. how to resize the comment box to the size of the text i put in?
View 2 Replies View RelatedI need to figure out how to make certain text bold in a comment using vba. I'm making it so it adds a comment that looks like this:
View 7 Replies View RelatedI have a text box in a USERFORM .Have the following code associated with the text box. (which perform basic arithmetic.... e.g. If engineers wanna key in 39+137, instead of 176.)
[Code] .....
When I run the userform, the userform’s INITIALIZE procedure populates the textbox with value from a cell in the spreadsheet. When I delete the value completely , it gives error almost instantaneously:
Error is "Could not set the value property. Type Mismatch".
I have a text field at the bottom of a user form that remains hidden (i.e. visible = false) until the user clicks the "Ok" button. At that point, I want the text field to appear as the macro is running (it's a large macro, so the text field just says "processing, please wait...").
The first line of my macro is:
Cell B4 is selected by user and then runs the macro. The macro then looks UP (A3, A2, A1 etc) cell by cell until it finds the first cell that has a valid date in it and if that date is same as the date that the macro is being run pastes "This Text" into the comments section (Not replacing everything in the comments but simply adding to it.)
Column A
2/20/2009
(empty cell)
Dave
Jonathan
Steve
2/21/2009
James
Sally
Tyler
(empty cell)
John
Betty
I am in need of a macro that will copy the text from A1, and paste it to a comment on every cell that contains text within sheet 1.
View 4 Replies View RelatedI'm trying to copy and column of text (R4:R300) and paste the text as comments in the previous column (Q4:Q300).
View 3 Replies View RelatedI need a nudge in the right direction with how to amend the below code so that it :
1: cycles though all cells in a workbook, and sees whether the text reference of the cell contains a picture filename (i.e. searches for .png or .jpg in the cell contents)
3: if (1) is correct, it retrieves the picture from "C:/Users/jeff/Documents/Standards/" and pastes it as a cell comment background in the cell to the right (and overwrites any comment backgrounds that might already exist there)
The code below does something a bit different: it looks in a defined range, then adds a comment with a background picture retrieved based on the text in the cell to the left.
I'm sure this is a pretty basic change, but my VBA skills aren't up to it...I've only just started reading though Walkenbach's Power Programming! I'm using Excel 2007
Sub InsertComment()
'www.contextures.comxlcomments03.html
Dim rngList As Range
Dim c As Range
Dim cmt As Comment
Dim strPic As String
On Error Resume Next
Set rngList = Range("A1:A5")
strPic = "C:/Users/jeff/Documents/Standards/"
On Error Resume Next
For Each c In rngList
With c.Offset(0, 1)...................
Is it possible to change the default text size on comments I insert throughout my spreadsheets? I have to enlarge 100% of them.
View 2 Replies View RelatedI have a table with huge amount of data. I use a UserForm with textboxes to populate the information of the required row.
There's a Comment Box text on a specific cell that I need to populate on one of the textboxes but I am unable to do it.
The code I have that works well, populates the cell content:
[Code].....
Now, on that cell, there's a comment text that I need it populated as well on another textbox but it doesn't work. I tried:
[Code] .....
But this doesn't work.
Is it possible to insert text as a comment on another sheet based on a date?
I have Sheet 1, that has 3 columns, Name, Date, Reason
Sheet 2 is a monthly calendar with the dates in E5:AH5 and the names from D6:D10.
What I am trying to do, is when they enter their name, date and reason on sheet 1, I want the reason to to be inserted on sheet 2 as a comment in the cell that matches the date and the name.
I have a number of comment (all column D) that have lots of data in each one.
The data will appear like this (each new entry (new entry denoted by a date))
01-May 12:58:05 Liam
02-May 16:18:27 Josh
07-May 11:51:26 Bob
02-May 01:13:34 Terry
What i want to know is, can i change the colour of the text in the comment, if its todays date. So in this case 07-May 11:51:26 Bob goes red (its the 7th here for me).
I have a form with several combo boxes, and they function just the way I like as far as being able to pick from the list, or typing in them and having it show you the next available item in the list as you add letters. Whats happening that I would like to know how to deal with is... as soon as you type a letter that is not in my lookup range it generates an error. "Could not get the list property - Invalid property array index". I don't want people to be able to add to the list, but I would like a msgbox to pop up. Then allow them to go back to the box and try again.
View 2 Replies View Relatedi have the following code to insert comments into cells, however if the user cancels the input box (i.e. doesn't insert any text), a comment is still added with their details and the comment 'FALSE'. Is there anyway to stop comments being added if the user cancels the input?
Sub Insert_Comment()
Dim iReply As Integer
Dim cl As Range
Dim sComment As String
Dim sText As String
Dim UserNameWindows As String
Having problems with trying to get my vba code to access the SpecialCells property. Receiving the following error.... Unable to get the SpecialCells property of the Range class. The section of my code is below that is causing the error. Keeps stopping on the "Selection.SpecialCells(xlsCellTypeVisible).Select" line.
Sheets(" Book Query").Range("A6:I6").Select
Sheets("Book Query").Range(Selection, Selection.End(xlDown)).Select
Selection.SpecialCells(xlsCellTypeVisible).Select
Selection.Copy
Sheets("Inventories and Variances").Select
Sheets("Inventories and Variances").Range("A7").Select
attached excel file .I need the data thats there from B4:E8 to be displayed on cell I9 as a comment .is there any way to do it ?
View 6 Replies View RelatedFor some reason my selection won't return to where it's supposed to in a listbox after I've increased it's column widths. It's very strange.
I've put together an example of the issue as the actual workbook is enormous, but the demonstration seems to work.
I've tried exporting the Listindex resetting code to an external function, but it didn't help either.
Can anyone understand this behaviour?
I would like to Copy the cell value from A1 into the next available empty cell in a column (in this case sheet2 A) so that I can create a list of values from A1 over time and graph it.
View 6 Replies View RelatedSub test()
With Worksheets("BUDGET")
.Range("E10").EntireRow.WrapText = True
With .Range("B10").CurrentRegion
With Intersect(Worksheets("BUDGET").Rows("10:" & Rows.Count), .Cells).Borders
.LineStyle = xlSolid
.Weight = 1
End With
End With
End With
End Sub
This code works fine on my Laptop (2007). On Desktop (2003), gives error: Unable to set the LineStyle property of the Borders class
.LineStyle = xlSolid highlited
I have tried this (on both computers) in a larger procedure(where it should be) and in a Module of it's own. Same results.
i was searching in VBA help & found this example:
a macro that steps through the list of files found during a search and displays the path for each file.
With Application.FileSearch
For i = 1 To .FoundFiles.Count
MsgBox .FoundFiles(i)
Next I
End With
how can i modify this macro so that it displays only
the file name not the full path
for example instead of displaying
"C:Documents and SettingsDesktopMainstatment1.txt"
i want it to display
"statment1.txt"
macros in excel XP.
I written up a marco code to do series of calculations for me. I have one program that will use different matrix size (say 5 rows by 5 colums for one set of calcuations and open up another, but with 105 rows and 35 columns)
Now,
the way it works is the user input data in row 1 and column 1 and the marco does the following codes-
Dim numrows As Integer
Dim numcols As Integer
numrows=worksheets("template").usedrange.rows.count
numcols=worksheets("template").usedrange.columsn.count
thisworkbook. names.add "matrix",,,,,,,,"=!r2c2:r" & numrows & "c" & numcols
this code defines my range that will be used in the formulas further down the code.
the problem is that I test ran the code using the matrix=b2:ai105
and I was using the code for a run with matrix=b2:q77
but the code is giving me the range from the previous macro run (ie. b2:ai105) and want it to use the matrix based on new data size (say b2:q77).
I tried using activesheet.usedrange into the macro, but it does not work.
Basically I need to "reset" usedrange property so it uses the correct range every time.
I'd like to know if anybody of you knows which is the property that determines the number of tabs in a tabbed panel. I'd like to realize a dynamic tabbed panle where the number of tabbed panels are regulated by a variable.
View 5 Replies View Related