Solved

Better way to add data for generating graph by person

Posted on 2011-03-01
14
194 Views
Last Modified: 2012-05-11
I need a better way for staff to enter data in order to generate a graphs. Preferably, the graph display would be on a single page, and you would simply select the person with a radio or list button and the graph would display automagically.
details: In the sheet 'Graph Data Entry' I have four staff who need to enter the same data. I would like to:
Allow data entry easier for the staff w/o scrolling around, but this is just a nicety.
I want to be able to display a single person's graph on sheet 'Team Dashboard WIP', by just selecting the person with list, combo, or radio control.
dashboard-wip.xlsm
0
Comment
Question by:singleton2787
  • 8
  • 4
  • 2
14 Comments
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 35008670
See attached - I've added a data validation list for the list of people and some formulas above the chart (you can simply position the chart over the formulas to hide them).

Reegards,
Rory
dashboard-wip.xlsm
0
 
LVL 30

Accepted Solution

by:
SiddharthRout earned 500 total points
ID: 35008817
Is this what you want?

Sample File Attached.

Sid

Code Used

Private Sub Worksheet_change(ByVal Target As Range)
    If Not Intersect(Target, Range("E5")) Is Nothing Then
        Dim acell As Range
        
        Set acell = Sheets("Graph Data Entry").Columns(1).Find(What:=Range("E5").Value, LookIn:=xlValues, _
        LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False)
    
        If Not acell Is Nothing Then
            Range("E9").Value = acell.Offset(2, 2).Value
            Range("E10").Value = acell.Offset(4, 2).Value
            Range("E11").Value = acell.Offset(6, 2).Value
            Range("F9").Value = acell.Offset(2, 3).Value
            Range("F10").Value = acell.Offset(4, 3).Value
            Range("F11").Value = acell.Offset(6, 3).Value
            Range("G9").Value = acell.Offset(2, 4).Value
            Range("G10").Value = acell.Offset(4, 4).Value
            Range("G11").Value = acell.Offset(6, 4).Value
            Range("H9").Value = acell.Offset(2, 5).Value
            Range("H10").Value = acell.Offset(4, 5).Value
            Range("H11").Value = acell.Offset(6, 5).Value
        End If
    
    End If
End Sub

Open in new window

Dashboard-wip.xlsm
0
 
LVL 30

Expert Comment

by:SiddharthRout
ID: 35008828
Nice one Rorya, using formulas. Never thought of that...

Sid
0
3 Use Cases for Connected Systems

Our Dev teams are like yours. They’re continually cranking out code for new features/bugs fixes, testing, deploying, testing some more, responding to production monitoring events and more. It’s complex. So, we thought you’d like to see what’s working for us.

 

Author Comment

by:singleton2787
ID: 35008991
Nice...but when I change the data in the 'Graph Data Entry' sheet, the graph doesn't update anymore. Do I have to refresh it somehow? Sorry for the possible noob question...
0
 
LVL 30

Expert Comment

by:SiddharthRout
ID: 35009006
The data is the same for every one in the "Graph Data Entry" and that is why it appears that it is not updating :)

Sid
0
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 35009025
Not sure who you are talking to? (just tested mine and it does work for me)
0
 
LVL 30

Expert Comment

by:SiddharthRout
ID: 35009059
singleton2787: In my file, if you will move the chart, you will see the data behind it, That is where the data gets updated. I think I might not have connected the chart to that data but I am sure that you can manage that.

Sid
0
 

Author Comment

by:singleton2787
ID: 35009107
Oh, also...when I copied the Sheet to another workbook it thew a VB error:
Ambigious name detected: Worksheet Changed

Is there a way to fix this?
0
 
LVL 30

Expert Comment

by:SiddharthRout
ID: 35009119
Yes. Can you upload your file? I will change it for you.

Sid
0
 

Author Comment

by:singleton2787
ID: 35009137
I changed the data behind the graph...maybe I am just fumble fingering it?
dashboard-wip.xlsm
0
 
LVL 30

Expert Comment

by:SiddharthRout
ID: 35009178
That is becuase you posted the code that is meant for Sheet "Team Dashboard WIP" in Sheet "New Layouts" :) And there you have 2 worksheet chnage events.

What do you want to exactly do in the Sheet "New Layouts"?

Sid
0
 
LVL 30

Expert Comment

by:SiddharthRout
ID: 35009191
Do you want to connect it to sheet "Data" ?

Sid
0
 

Author Comment

by:singleton2787
ID: 35009224
I figured it out, sorry. Just relinked the graph data like you said.
0
 
LVL 30

Expert Comment

by:SiddharthRout
ID: 35009244
singleton2787: Both our solutions (mine and rorya's work for you. So it is just unfair if you allocate the entire points to me. It should have been shared with Rorya as well :)

Sid
0

Featured Post

Master Your Team's Linux and Cloud Stack

Come see why top tech companies like Mailchimp and Media Temple use Linux Academy to build their employee training programs.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Multiple Open Excel Spreadsheets 12 40
Office 2016 without internet 6 37
Generate a certain future date depending on current cell date. 15 29
Excel Cell Total 3 20
Convert between Excel file formats (.XLS, .XLSX, .XLSM) with/without macro option David Miller (dlmille) Intro Over this past Fall, I've had the opportunity to see several similar requests and have developed a couple related solutions associate…
Improved? Move/Copy Add-in Replacement - How to avoid the annoying, “A formula or sheet you want to move or copy contains the name XXX, which already exists on the destination worksheet.” David Miller (dlmille)  It was one of those days… I wa…
The viewer will learn how to create a normally distributed random variable in Excel, use a normal distribution to simulate the return on an investment over a period of years, Create a Monte Carlo simulation using a normal random variable, and calcul…
Although Jacob Bernoulli (1654-1705) has been credited as the creator of "Binomial Distribution Table", Gottfried Leibniz (1646-1716) did his dissertation on the subject in 1666; Leibniz you may recall is the co-inventor of "Calculus" and beat Isaac…

770 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question