I have attached a spreadsheet which, when you enter a matching value in the vehicle column, the cell that matches the vehicle name in both instances (column and row) is ticked. Think I am wanting to use a worksheet_calculate function but cannot figure out how to write the appropriate lookup in VBA. I do not want a formula in the cell.
View 9 RepliesI was reading your Tick Cell Upon Selection article and it works great. I'm just wondering if there is a way to modify it so that they can only select one of the cells in a row.
For example, in this spreadsheet, the cells I have marked for "tick upon selection" are N8-Q8. In this worksheet, though, I only want the user to be able to select one of the four options. Is there a way to format the code so that they either cannot select another cell until they have deselected the first one, or the first one unchecks itself and the new click ticks that cell?
Example: Person selects N8. Person then selects P8. Can it not allow P8 to be selected (and give a warning message) or can it uncheck N8 when P8 is checked?
I have 6 Headings in excel named...
"A" in cell A1, B in B1, "C" in C1, "D" in D1, "E" in E1 and "F" in F1.
There are two projects.
Project 1 has phase A, D & F and Project 2 has phase A, B, C, D & E.
My Specification follows...
1). Take Prject 1 - Which starts from A...in cell A2 I will keyin "A". When the phase comes to an end I will key in the end date of the phase. As soon as I key in the end date in cell A2 Letter D should automatically appear in the cell D2 and when Phase D comes to an end I will key in the end date in Cell D2 which should automatically keyin F in the cell F2. and is the same case for Project 2.
I need to create a macro to where once a cell has had a formula or data inputed that it locks afterwards and cannot be edited without unportecting the sheet or not at all. The problem is I have no idea how to program in VBA. I can get there and select the worksheet but after that I am stumped. How would I enter the macro and what should the macro look like?
View 2 Replies View RelatedHow to make excel automatically insert a comment into a cell when a / is entered into that cell?
The comment needs to simply include the date the / was entered and nothing else.
I would like to achieve the affect where if you click on the cell its contents will change. For example, if you click on it once, a checkmark will appear, but if you click on it twice and x and if you click on it a third time a - will be displayed.
I was thinking along the lines of a marco for the spreadsheet, which would run an if loop to check what was currently in the cell then change accordingly. Is there a command that would allow me to do this, or would is there an even easier way? side note how would I even display a checkmark of square root sign, through vba? This is what I have, It was working but now it does nothing and I cant remember what I tinkered with.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.EnableEvents = False
If Target.Column = 6 Then
If Cells(Target.Row, 6) = "" Or Cells(Target.Row, 6) = "-" Then
Cells(Target.Row, 6).Formula = ""
Application.EnableEvents = True
ElseIf Cells(Target.Row, 6) = "?" Then
Cells(Target.Row, 6).Formula = "x"
Application.EnableEvents = True
Else
Cells(Target.Row, 6).Formula = "-"
Application.EnableEvents = True
End If
End If
Application.EnableEvents = True
End Sub
I have a spreadsheet where we calculate lost time of machinery and how much money is lost. Every day someone enters the hours that the machines were down and then enters comment in that cell stating what happened or what the resolve was. So for example Machine A runs 24 hours a day, but 12-19-08 it had mechanical issues and was down for 2 hours, so the entrant will enter 22 in that cell, then have to right click back in that cell, go to insert comment and enter "need to change belts." Then if he finds out later that they were down another two hours he would have to change the hours, right click in the cell and edit comment. What we have been coming across is that after awhile he just enters the hours and not the comment. Besides firing a lazy operator I would like to make it more user friendly and ensure that the data entry person is entering the comment.
I would like after the hours are entered in the cell for the comment box to automatically open. I figured there has to be a formula to do it, but i am not at an advanced level. Can you help me?
I have an excel file that is used to record information about particular projects. We need to record dates related to these events and these are stored on separate worksheets. These use a key of sorts, where the unique references are replicated on all worksheets.
I have set up the data sheet to generate the unique identifier and the hyperlinks to the Received! and Sent! worksheets automatically as new unique references are added to the Data! worksheet.
What I would like is a VBA code to populate hyperlinks in the Received! and Sent! worksheets in column B, to link back to the Data! worksheet unique reference.
I had used formulas in the past, but the Data! worksheet is massive. I've needed to write hundreds of hyperlink formulas referencing blank spaces in the Data! sheet in anticipation of new projects. It would be better if they were populated as the sheet expanded.
I would like to have the current time/date automatically entered into B1 when A1>0 and I want it to be non volitile, is this possible?
View 9 Replies View RelatedI am trying to apply a conditional cell lock to a worksheet. I am using Excel 2003, not 2007.
In column J, I have a list validation being used. The default value is "Not Claimed", I want to lock the cell from being edited once the value has been changed to any other value on the list.
The worksheet will be password protected to prevent entries into static fields (A:I & N:P).
I also would like to give the user the ability to unlock a specific cell, not the entire worksheet, by entering a password or something if they accidently choose a wrong value from the list.
I have column Q and beyond available if I need to have the password entered somewhere else.
I have attached a sample of the file I am working with.
I found the following code here.
For data entered into column A, it copies the formulas from columns B:E in the row above to the current row.
It works great except fot the first row (A9) where it copies the header row (B8:E8).
How can I get it to not copy when data is entered into A9?
Private Sub Worksheet_Change(ByVal Target As Excel. Range)
Dim c As Range, i As Long
On Error Resume Next
Set c = Intersect(Target, Columns(1))
If c Is Nothing Then Exit Sub
If IsEmpty(c.Offset(-1, 0)) Or Not IsEmpty(c.Offset(1, 0)) Then Exit Sub
i = c.Row
Application.EnableEvents = False
Range("B" & i - 1 & ":E" & i - 1).Copy Range("B" & i & ":E" & i)
Application.EnableEvents = True
On Error Goto 0
End Sub
I need to click on a cell and when I click on it, it should change colour and insert a tick (or other symbol).
View 14 Replies View Relatedhow to do basic formulas in Excel but I are hoping that there is a macro or a VBA or something that can be made which might work for what i need.
I have decided to start a small tour shop (I make the reservations for guests with a hotel in the area and take them on tours of our region) and are looking to make a booking sheet for each month. Nothing complicated just simple. see the attached .xlsx file.
I was wondering if there is a way that when the fields in column A & B are filled in if it could automatically color the corresponding dates in for the same row in the calendar area? like I have manually done on sheet "October 2013"
[URL]
Download the attachment and have a look.
I want there to ALWAYS be 5 FREE/EMPTY rows to be able to enter data into them I also want the black area around the outside to ALWAYS be a further 15 rows in height below that.
Sheet 1 = Simple Example
Sheet 2 = A much larger example
Sheet 3 = Erroneously added data should still extend the sheet by 5 rows each time.
i don`t know how to make this in VBA
But please allow me to explain, if I have numbers in Cell F9 I want image to be displayed as (X <---- which it means wrong) on G9 and message to be appear in H9 says only words are allowed. In case, cell value are words; I want it to show image <---- which it means right) and the message to be say correct. And if cell is empty I want it to show image (!) and the cell beside it the message should say (Please Fill up).
I want to apply this to words instead of numbers as well.
I use MS Excel 2007 and I was wondering if it was possible to enter data for certain things once, and have that data copied automatically every time I type the text. For example, if I type Blue Car in a cell and type 4 in the next cell, is there a way I can program Excel to enter that data every time I type Blue Car?
View 14 Replies View RelatedI am using Jon Peltier's worksheet_change event code to try and automate chart axes.
Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target.Address
Case "$AG$5"
ActiveSheet.ChartObjects("Chart 2").Chart.Axes(xlCategory) _
.MaximumScale = Target.Value
Case "$B$3"
ActiveSheet.ChartObjects("Chart 2").Chart.Axes(xlCategory) _
.MinimumScale = Target.Value
Case "$AG$7"
ActiveSheet.ChartObjects("Chart 2").Chart.Axes(xlCategory) _
.MajorUnit = Target.Value
Case "$L$3"
ActiveSheet.ChartObjects("Chart 2").Chart.Axes(xlValue) _
.MaximumScale = Target.Value
Case "$N$3"
ActiveSheet.ChartObjects("Chart 2").Chart.Axes(xlValue) _
.MinimumScale = Target.Value
Case "$AH$7"
ActiveSheet.ChartObjects("Chart 2").Chart.Axes(xlValue) _
.MajorUnit = Target.Value
Case Else
End Select
End Sub
However, I have some of the cells setup as formulas....but worksheet_change apparently only updates values when manually changed.
I am trying to use excel to score a test. I want to tick a cell to do so. There is an excellente information about Tick Cell Upon Selection, posted here http://www.ozgrid.com/VBA/excel-checkbox-tick-cell.htm. Its range is limited to (A1:A100)
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("A1:A100")) Is Nothing Then
Target.Font.Name = "Marlett"
If Target = vbNullString Then
Target = "a"
Else
Target = vbNullString
End If
End If
End Sub
How can I increase the range so it would target C1:C30, E1:E30 ( total of 17 columns)?.
I need help with creating a macro that runs when a user enters a value in the 'Numbers' column, copies and pastes data in the corresponding worksheet 'Worksheet' column by the value of 'Numbers' column data. An excel file is attached.
View 6 Replies View Relatedis it possible to have a cell return all matches from a list and have the list of matches reduce as you type, then be able to select one item from the list? this is a typical feature on internet sites, but can it be done in Excel?
View 3 Replies View RelatedI have a spread sheet with various tick boxes, that when ticked calculate an accumulative percentage in a cell. This cell is the basis of my graph.
E.g. if the cell displays 80% - the chart with show 80% - simple.
However, I want to write a vba code that changes the fill colour of the chart depending on the percentage.
i.e. if the percentage data = 0-49% I wish the chart to display as red. 50-69% - yellow and 70%+ = green.
I have a worksheet that contains multiple task lists, each having two columns, a "Priority" field and a "Description" field. The data should be sorted by Priority first and by Description second. The header row is 5 and the data is in rows 6 through 50. The first list is in A5:B50, the second C5:D50, and so on until the sixth list in K5:L50. I have a macro that works for one task list, but cannot get it to function for multiple task lists. Below is the macro that functions for the first task list. It is in the code for the sheet tab.
Option Explicit
Private Sub Worksheet_Change(ByVal Target1 As Range)
If Target1.Column = 1 Then
[Code]....
I have several worksheets (Labeled Sheet1,Sheet2,sheet3) What I need to do is to step through each row in sheet3, and do a search in sheet1, it the data was found, then return the row number. I then will need to copy data from sheet1 (rowfound columnA , through rowfound CoulmnBd to sheet3 current working row columnK
View 3 Replies View RelatedIn my spreadsheet, on the first worksheet called "Working". Column A, called "Results", contains carrot ^ delineated string values in each cell (i.e."john^apple^pear^banana^grape^love^heart^pickle"). The majority of string values in every cell in my "Results" column match a "source" column of Pick-List Values, called "Fruits" in the same spreadsheet, however found in a different worksheet called "Lists" (also in Column A). I want to perform 3 functions against my "Results" Column on worksheet "Working":
1.) Report In Column B: Analyze column "Results" by cell and return carrot delineated string values for only those that match my "Fruits" Pick-List
2.) Report In Column C: Analyze column "Results" by cell and return carrot delineated string values for only those do not match my "Fruits" Pick-List
3.) Report In Column D: Identify and return all unique values in "Column C" as a List.
Attached is a simple example of what I'm trying to accomplish called " Sorting.xls"
i'm trying to get data added in one sheet of a workbook to automatically be entered into another sheet. such as a monthly, Quarterly and Annual balance sheet.
View 3 Replies View RelatedI have one column that contains a monetary amount (column AQ) , and another that contains text reading either "inflows" or "outflows" (column AC)
When AC says "inflows", AQ should be positive, and when AC says "Outflows", AQ should be negative.
I need the text in column AQ (the monetary amount) to become red when the the opposite is true.
i.e. When AQ is negative and AC says "Inflows", AQ should become red. And when AQ is positive and AC says "Outflows", AQ should become red.
I am working a project where I need to copy/insert a Row of data onto Sheet 3 if values from Sheet2 are located on Sheet1. Here is my code so far:
Option Explicit
Sub move_rows()
Dim ws As Worksheet
Dim ws1 As Worksheet
[Code].....
Some sent me a large spreadsheet with random rows throughout the spreadsheet highlighted in diffierent colors. I have a module that will sort the spread sheet by Color - however it doesn't work on this spreadsheet because - for whatever reason - every cell starts with a tick mark.
I tried to do a replace all - and excel just told me I was crazy.
I even tried going through and manually removing the tick marks - still no luck.
If I export the sheet in to txt and then re-import it I will loose all the highlights...
I have this piece of code that shows a popup box when the excel spreadsheet loads up.
Private Sub Workbook_Open()
MsgBox "This spreadsheet can design both single-leaf and cavity walls." _
& Chr(13) & Chr(13) & "If only a single-leaf wall is to be designed:" _
& Chr(13) & "Deselect the cavity wall option and complete only the outer leaf input sheet." _
& Chr(13) & Chr(13) & "If a cavity wall is to be designed:" _
& Chr(13) & "Select the cavity wall option and complete both input sheets." _
& Chr(13) & Chr(13) & "All designs satisfy criteria within BS:5628-1:1992 Structural Use Of Unreinforced Masonry", , _
"Spreadsheet Information"
End Sub
Is it possible to place a tick box in the message box that says, "show this message again on startup", then if the user unticks the box the message is not shown again and if the box is left ticked the box will load up again on startup of the workbook????
I am just learning to use VBA and this may be the most simple task ever, but I can't figure it out. I've searched for all of the keywords I can think of, but can't find a solution...
I have a list of names in a sheet. Other columns in this sheet contain data like amount charged, amount paid, etc. This sheet must be manually updated (because the other program won't export the information I need) periodically to ensure proper billing/payment application in the original software (all transactions are handled by other people that I don't trust).
I sort the list so that the all names that are the same (ie John Doe) are together.
A short example list looks like this:
Jeremy Apple
John Doe
John Doe
John Doe
Jimmy Kravitz
Jimmy Kravitz
In updating my sheet, I set up a macro that will input todays date in one of the columns for all occurences of that name (so, every row that contains John Doe in column B, column V will have todays date in it).
Currently, in order for my macro to work properly, I have to manually make the activecell the first occurrence of 'John Doe'. When I'm ready to update 'Jimmy Kravitz', I have to select the first occurrence of 'Jimmy Kravitz' and so on.
Here's my question - Is there a way to use a VBA macro to find the first occurrence of 'John Doe' (and automatically 'know' which name I am updating)? Basically, I need a macro that will take the information that is in the cell in column B in the active row, find the first row that has that same name, and make that cell (column B) the active cell...