Placing A Chart On A Userform
Oct 18, 2007
I was wondering if someone could give me some sample code on how I can get a chart to appear on a userform. What I have is a userform that allows the users to change the inputs that are used in preparing the chart. Then I want a second userform to display the new chart.
I searched the posts and saw reference to saving it as a picture but I am not sure how to go about this. Can I save it as a picture within the excel file? Or does it have to be external. If so, how is this done. And can I do it without interupting what the user is doing on the forms.
View 7 Replies
ADVERTISEMENT
May 17, 2014
I'm trying to use the below code to insert a chart into a userfom, i'm using a tutorial that I've seen used on a few sites.
So far I found this code on the internet, the chart is the worksheet PMC
Set CurrentChart = Sheets("PMC").ChartObject("PMC").Chart
Fname = ThisWorkbook.Path & " emp.gif"
CurrentChart.Export Filename:=Fname, FilterName:="GIF"
Dashboard.Image1.Picture = LoadPicture(Fname)
Trying to load the chart into the image control image1 on the dashboard userform.
The debugger keeps hitting the chartobject section and grinding to a halt.
I have seen other ways of doign this but they require access to different libraries and work is restrictive with these things!
Also I have tried:
Set CurrentChart = Sheets("PMC").ChartObject(1).Chart
Fname = ThisWorkbook.Path & " emp.gif"
CurrentChart.Export Filename:=Fname, FilterName:="GIF"
Dashboard.Image1.Picture = LoadPicture(Fname)
Also the error message i get is: Unable to get the chart objects property of the chart class
View 2 Replies
View Related
Nov 20, 2006
I'm trying to display a graph I've created in a worksheet, in a userform. But it won't work ..
Private Sub UserForm_Initialize()
Sheets("graphraw1").Select
image1 = ActiveChart.ChartArea.Select
End Sub
View 9 Replies
View Related
Jul 26, 2006
I'm trying to make a chart (which will also be on the UserForm) from data that a user will enter onto a UserForm. The problem is that I am trying to select a data range as one of the charts 'series' but I can't quite find the right code. At the moment it looks like this:
ActiveChart.SeriesCollection(1).Values = Range(BMIM20Ttl, BMIM2025Ttl, BMIM2530Ttl, BMIM3040Ttl, BMIM40Ttl)
ActiveChart.SeriesCollection(1).Name = " Total"
ActiveChart.SeriesCollection(2).Values = Range(BMIM2075, BMIM202575, ...
The problem is with the Range function.
View 9 Replies
View Related
May 28, 2014
I am using Access as a backend and Excel as a frontend for my project. Now I have to display a chart in the userform using data from Access database .
View 2 Replies
View Related
Jul 14, 2006
I have made a simple procedure (which will extend to make something that I have to make but for time being) it asks user to select a chart type in a userform using option buttons and then the chosen chart type is taken as the chart type and makes the chart.
problem is that the typechart - variable to identify the chosen chart type - is not being recognised. Here's the coding, the variable is not passed (in yellow bolded) from one procedure to another?
Private Sub NextButton_Click()
Call ShowType
If bFlag = False Then
MsgBox "Not Selected"
Call ShowType
Else
Call MakeChart
End If
End Sub
View 5 Replies
View Related
Oct 22, 2013
What is the easiest way to have a button added into a certain cell? Basically I have my workbook enter columns into a certain sheet. When a column is added into that sheet, I want to also add a button, that gives the option to delete the column that it is sitting in. I tried to record macros to figure it out, but I didnt have any luck figuring out logic behind the button placement.
View 7 Replies
View Related
Apr 15, 2014
I want to add a user-form on a chart, which will have check-boxes that will allow me to select series(lines) that I want see and compare in a chart. Currently my line chart has 24 series (Lines) which makes the chart very difficult to view and looks very busy. How do I add list of check-boxes that will allow me to select one or multiple lines that I want to see at a time?
View 2 Replies
View Related
Mar 3, 2014
I am trying to do the following:
901 > 0 pts
851 - 900 gets 1 pts
LOWEST 3 scores gets 2 pts
Example of what i have for the top three
=IF(D8="-",0,IF(RANK(D8,D$8:D$34)<=3,2,IF(D8<79%,0,1)))
I have tried to change it but cant get it to work for the bottom 3 scores.
View 1 Replies
View Related
Jan 7, 2010
if its possible to place a value (the product of a formula) into a cell ie:
Cell A1 = "a"
Cell A2 = "b"
I would like to be able to say: If A1="a" and A2="b", then place "Yes" into D1.
I realize that =if(and(a1="a",a2="b"),"Yes",0)
placed in D1 would give the same result, but I do not want to have a formula in D1, I simply want the characters "Yes" placed in there.
View 3 Replies
View Related
Jan 8, 2010
If I have 1 Jan thru 31 Dec in A1 - A365, is there a way I can identify every weekend by placing 'X' in Col B alongside every occurrence of Saturday and Sunday?
View 2 Replies
View Related
Jul 23, 2014
Is there any way that I can place a text as fixed position over the highest value on the Y axes in a chart with VBA?
View 6 Replies
View Related
Feb 1, 2014
Is it possible to place a control button on a cell?
View 1 Replies
View Related
Mar 14, 2012
I have an excel file which I run every week. I am capturing the data from my last run onto a separate worksheet. I have a total of 5 columns.
Here's an example:
Date RunNumberValidNot ValidPending 3/2/20122723133/9/201224 0024
I want to leave the data already there static and move my formula to the next row when I run my macro. How can I do this?
View 1 Replies
View Related
Apr 6, 2007
I have created a user form (thanks Datsmart), and now need to place the data that will be inserted in that userfom onto my spreadsheet.
The spreadsheet will have 50 rows, each containing a different project. There will be a button on each row to activate the user form for that specific row. They click the button on the spreadsheet, and the user form opens. They enter the data on the user form, and once they click the "add comment" button on the user form, the data should be entered in the last cell of the row on which the button is located.
Now the complicated part:
The users will use that for to update the project from week to week, but each week's comment needs to go in the same cell, but above the previous comment.
IE:
Week 1
Jan 1: Project lauched
Week 2
Jan 6: Project budget submitted
Jan 1: Project lauched
Week 3
Jan 22: Budget approved
Jan 6: Project budget submitted
Jan 1: Project lauched
The date being the date from the user form, and the comment being the comment from the user form. If the latest date can be bolded that would be a bonus.
They each have to go in the same cell cause all relate to the same project. This same thing will be repeated 50 times for each different project.
View 9 Replies
View Related
Sep 1, 2007
i have a spred sheet that i am trying to give them scores from highest 10 down to 6 then anyone under will get 5
However if there is a tie for first they will each get 10 then the next will only get 8
ex)
a1 b2( this would be there score
3.45 10
3.45 10
3.40 8
3.20 7
2 6
1.99 5
1.89 5
1.5 5
1 5
View 9 Replies
View Related
Jun 13, 2008
I am trying to have 8 various shapes placed on running pages alphabetically, ie 8 modules to a page being 2wide by 4 high. There would be say 200 entries of various combinations and names equating to 80 pages If these can be sorted alphabeitically by name then placed on subsequent pages. Is this possible in excel or in "VB"
View 9 Replies
View Related
Jul 16, 2009
i've been having for quite some time now. I need to input quantity of items into the existing database that holds all the items names which is sorted by category. Below is a sample of the problem:
Table 1 - Items with quantity that is waiting for input:
Quantity
Product
5
Button A White
7
Ribbon B Blue
8
Thread A Black
10
Cloth A White
3
Button B Blue
4Button C White
9Ribbon A Pink15Button A White
Above is just a part of it, the list goes on to over 200 rows long.
Table 2 - Existing database of all products:
Products
Quantity
View 9 Replies
View Related
Apr 11, 2007
I have created a user form to enter data into a spreadsheet. The spreadsheet has 6 columns:
Project number - Team Lead - Client, Budget - Comletion date - latest activity. Example:
#2343 - John - Xerox - $230,000 - Aug. 26, 2008 - Jan 1, 2007: Budget has been approved
#2445 - Michel -ABC Inc - $26,000 - July 7, 2007 - Jan 22, 2006: Budget has yet to be completed, awating input from Engineering
etc
The first 5 collumns are stagnant, and will never change throughout the project. The only one that will be updated on a weekly basis will be the "latest activity" collumn.
So in week 2 the above 2 projects would look like this:
#2343 - John - Xerox - $230,000 - Aug. 26, 2008 -
Jan 23, 2007: Materials under study
Jan 1, 2007: Budget has been approved
#2445 - Michel -ABC Inc - $26,000 - July 7, 2007 -
Jan 23, 2007: Budget approved
Jan 22, 2006: Budget has yet to be completed, awating input from Engineering
(however the activity would be on the same row as the rest of the info)
The latest activity (in the example they are dated Jan 23) are what I am looking to control by using the userform. On the user form there are 2 textboxes, 1 for date and the other for the "latest activity:" text. Once the user completes the 2 textboxes on the userform, they click a button, and the new information should be entered in the same cell as the previous activity, but on a different line and above the last activity.
It simply to maintain some sense of order in the activity area of the report. As various users fill in this section, they all do it differently....(each use a different date format, some hit alt-enter to get to the next line within the same cell, some just att to the end, some put in the mnext cell etc) and by the time it gets back to me it is a mess, and I have to spend a day tidiying it up.
View 3 Replies
View Related
Jan 15, 2010
I have on sheet 2 in column D names of cities the vary like Sydney Brisbane could be twice but each week the cells could have difference city in them. In column F it will have a number in them a difference number each week . I need the total of the number that matches the city added up on sheet 1 that matches the city in sheet 1 which on sheet one the city never moves.
View 4 Replies
View Related
Feb 14, 2014
I have an expanding worksheet and would like to move a button so that it is always near the bottom of the worksheet data. When the button is pressed it reworks the worksheet and adds in some additional rows (up to 10 max). I'd like it so that the procedure also moves the button down keeping it in line with approximately the last row of data but not sure how to do this with vba...
View 4 Replies
View Related
Oct 6, 2009
Part of my code adds a Worksheet to the selected Workbook and then re-orders them alphabetically, but one of the Worksheets (Called home) should always remain at position 1. Is there a way to dictate exactly which postion it should be in so that I can place it there after the sort is complete?
View 7 Replies
View Related
Nov 8, 2008
Placing the date (1-JAN-2008) in the right column for DAY
Now I have a Matrix in which I have the Days as Colum Headings and the Week Numbers as the Rows.
I will be mentioning the Date let's say 1-JAN-2008 in the Cell A1 and I want this date to appear in the approriate Column for the DAY
For Ex:-
The day for the date 1-Jan-08 was a Tuesday, therefore the date should appear in the Column having a Heading Tuesday and in the Column Monday it should show as 31-Dec-07 and the Columns for Wednesday,Thursday,Friday,Saturday and Sunday the Following dates after 1-Jan-08 (i.e. 2-Jan-08, 3-Jan-08, 4-Jan-08, 5-Jan-08, 6-Jan-08).
The appearance of the Date should change as per the day-date combination and as such for the preceding as well as following dates..
Ex:- Lets say for 1-Jan-09 which comes on a Thursday it should display (1-Jan-09) under column Thu and Mon,Tue,Wed should display ( 29-Dec-08,30-Dec-08,31-Dec-08) and Friday,Saturday and Sunday the Following dates after 1-Jan-08 (i.e. 2-Jan-09, 3-Jan-09, 4-Jan-09).
View 3 Replies
View Related
Mar 28, 2013
If you know the autoshape number, it is easy to retrieve any caption text but is there a way to retrieve the text from any autoshape without knowing its number.
Dim ASText As String
ActiveSheet.Shapes("AutoShape 43").Select
ASText = Selection.Characters.Text
This will place the text in AutoShape 43 into variable ASText.
I need the code to get the text from any autoshape I click on reguardless of what its number is.
I use a lot of autoshapes on a worksheet as command buttons. Sometimes, the macro code is identical for many buttons with the exception of what the autoshapes text is. This text is the variable the macro needs. It would alow me to use one macro instead of sometimes 30 or more.
View 7 Replies
View Related
Jul 6, 2006
I know this is basic but I'm having a hard time here. I'm trying to insert certain data into a column of blank cells. I just need the fields to be on there once. As of right now it is pasting the first field multiple times.
Private Sub AA_Click()
If PS = True Then
Range("A61:A70").SpecialCells(xlCellTypeBlanks) = "Pull Stations"
On Error Goto 0
End If
If CS = True Then
Range("A61:A70").SpecialCells(xlCellTypeBlanks) = "C-F-A Switch"
On Error Goto 0
End If
View 3 Replies
View Related
May 29, 2006
Is there any way to use Advanced Filter placing the result (the filtered data) in another sheet ?
I have tried but with no success... An error message is displayed (something like "It's not possible copy filtered data from a sheet to another")...
What do I have to do to get it ???
View 6 Replies
View Related
Jul 11, 2014
I am rather new to excel and currently using excel 2013.
I have a worksheet with column A ( data group) Column B ( Sent date with MM/DD/YY) , Column C Aged Group {using this formula =IF(B2="","",(TODAY()-B2))} , Column D status ( if the record is open or close).
I would like to create a table that can segregate the data group and how many days it has already aged. And then group them with different aged group. Refer to the attached screenshot.
From:-
Data GroupSent Date AgedStatus
Quotation 06/06/1435Open
Invoice 07/11/140Open
invoice 05/01/1471Open
PO 07/01/1410Open
PO 07/05/146Open
SO 06/30/1411Open
Quotation 05/18/1454Open
SO 05/05/1467Open
Cash Note 07/03/148Close
To:-
Data Group0-15 15-3030 above
Quotation
Invoice
PO
SO
Cash Note
testtest.xlsx
View 6 Replies
View Related
Dec 9, 2008
I am currently using a sheet of paper and tallying events. By tallying, I mean placing a small vertical line on the paper, then after 4 vertical lines, I place a diagonal line across the four. At the end of the month, I add all these up. I would like to make a spreadsheet to replace the tallying, but am not sure how to do it. Is this possible? I am beginner to intermediate with Excel and use 2003, but can switch to 2007.
View 3 Replies
View Related
Aug 18, 2009
Column C is the tricky one. It comes from the bank and somewhere in there is a 4-digit tenant reference. I did a formula to try and isloate it and it worked on most but if you look at the very first row, there is a spurious 99 in there, so it didn't work. Is there a way of EXTRACTING the first four consecutive numbers and placing them in another cell?
View 14 Replies
View Related
Jun 24, 2014
I have a simple Excel file composed of three tabs:
-EDIT
-QUEUE
-RESOLVED
On each tab, line 1 has the same headers: Status, Name, Surname, Issue, Details, Last Update
In the EDIT tab, line 2 is dedicated to editing the relevant information under the headers, and once done is validated with a "Done Editing" button: This button would cut line 2, and place it in line 2 of the QUEUE tab, moving down all the others in the list
The QUEUE tab lists all the issues keyed into line 2 of the EDIT tab. An "Edit Selected" button would cut the selected line (or the line in which a cell is selected), and copy it to line 2 of the EDIT tab for further editing, after which it would be placed on top of the queue once again as above.
The RESOLVED tab lists all of the issues marked "Resolved" on the Status column.
What I can't figure out are the macros for the two buttons:
- "Done editing" in EDIT tab adds today's date in the "Last Update" column, then cuts line 2, and pastes it in line 2 of the QUEUE tab pushing down all the lines in the list, and keeping any existing conditional formatting if possible (colours in the "Last Update" column, for ex.). If the status is set to "Resolved" before clicking the button, it does the same, but pastes it to line 2 of the RESOLVED tab instead of QUEUE.
- "Edit selected" in the QUEUE tab just cuts the selected line from the QUEUE tab and pastes it in line 2 of the EDIT tab.
View 2 Replies
View Related
