Auto Size Dynamic Changing Chart
Jun 14, 2008
I have created a dynamic chart in excel where either the number of Series or the number of Data Points will change dependent on user inputs in the model. I've done this using the Offset Function in a Defined Name in Excel and dropped this Defined Name into vba code using ActiveChart.SetSourceData.
Anyway, all works fine, pulling the correct data, etc. What doesn't work is the final appearence of the chart. The chart has a Legend placed at the bottom of the chart, as standard, unless there is only one Series, when I remove the legend altogether. Whilst the legend works fine, the Plot Area of the chart doesn't update automatically to accomodate the changing size / existence of the Legend. Does anybody know how to do this? I tried using hieght, etc properties, but I don't know how to make them variable
View 4 Replies
ADVERTISEMENT
Apr 25, 2008
I have a database in excel with a lot of tables in which lets a uses a combo box so the user select can view just one table.
I want to be able to create a macro so when a button is pressed, it copies the data into a new workbook and creates a chart so they can do whatever they want without disrupting anything in the original workbook.
I have been able to find code that will export the data and create a chart (see below) but the problem is the range changes from table to table so I need to find a way of changing how the chart picks up the data range.
Sub Chart_New_Book()
Sheets("Temp").Select
Cells.Select
Selection.Copy
Workbooks.Add
ActiveSheet.Paste
Range("A1").Select
Charts.Add
ActiveChart.ChartType = xlColumnClustered
ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range("A1:C10")
ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet1"
End Sub
So at the moment when charting ony cells A1:C10 will be plotted no matter what the size of the table is and making the target range bigger only sees the blank cells being plotted.
View 3 Replies
View Related
May 27, 2014
I have the following code:
[Code] ....
When I run the macro, some columns are already hidden. The macro doesn't seem to autosize cells correctly. For instance, one cell in a row appears to have some contents hidden (or below the reading area of the cell). In other instances, the rows are auto-size to huge heights and widths.
View 7 Replies
View Related
May 29, 2014
I am faced with the task of reducing the size of a group of userforms because of screen size limitations.Some of the forms are quite complex and I am wondering if it is possible to select the form and all its contents and reduce it proportionately. It is possible to do this with the form frame but I have not found a way to include the controls.
View 3 Replies
View Related
Jan 1, 2008
Is it possible to make a worksheet smaller. What I want to do is to be able to tab from, a1 to b1 to c1 to d1 etc up to g1 and then if I tab again it goes to a2. Is this possible? Is there any way of making it skip the a coloumn when tabbing even if it has data in it?
View 10 Replies
View Related
Dec 21, 2009
I've increased the size of my combo box but the text remains in size 8.
I've tried to click on the box and open the properties but i can only get the sheet properties...
View 9 Replies
View Related
Oct 15, 2012
I am trying to filter a table of dynamic size. My table begins at P3 (first row of data, not column header) and ends somewhere at the bottom of Column AA. I am getting an error "AutoFilter Method of Range Class Failed." Why? How do I fix this?
Here is my code
VB:
If Target.Range.Address = "$B$4" Then
With Sheets("Days Past Due")
LastCell = .Cells(.Rows.Count, "AA").End(xlUp).Row
MsgBox LastCell
ActiveSheet.Range("P3:AA" & LastCell).AutoFilter Field:=17, Criteria1:="MABST"
End With
End If
View 3 Replies
View Related
Jun 8, 2014
I currently have two tables in one worksheet showing the sales of different region.
The problem is, when I sort the data (I can't used the named ranges as it should exclude the first row which is the header), is there a way I can make it dynamic too??
** The Europe table is from A1:G5 where Row 1 is the Header and Row 5 is the Total
Code:
With ThisWorkbook.Worksheets("Sheet1").Sort
.SortFields.Clear
.SortFields.Add Key:= _
Range("G2:G4"), SortOn:=xlSortOnValues, Order:=xlDescending, DataOption _
:=xlSortNormal
.SortFields.Add Key:= _
Range("F2:F4"), SortOn:=xlSortOnValues, Order:=xlDescending, DataOption _
[Code] ........
View 3 Replies
View Related
May 16, 2008
I play in a rock band and i'm trying to create a randomly generated set list based on categories.
Rock, Blues, Slow, & Original are the categories
My sheet of songs is sorted perfectly by these categories already and I have dynamic ranges already named to their respective categories.
the module i am using to randomize these categories does not dynamically expand....
View 8 Replies
View Related
Dec 12, 2008
I have a created a filter in my workbook. Text for the entire spreadsheet is set to Arial | 12 pt. Font. However, when I select any one drop down list the text therein is shown in a font size that is too small. How can I change the font size to make it more readable?
View 2 Replies
View Related
Dec 11, 2007
im using combobox from the forms toolbar. and i have tryed and searched lots of forms and sites but no results, so what im trying to do is change the font size to 12 in my combobox using VBA.
-im using xl2000
-i dont wanto switch to the combox in the active x becouse i have more than 70 comboboxs in this spread sheet. and it will also be very complicated to change the comboboxes due to all the link cell's and there values.
View 9 Replies
View Related
Feb 13, 2014
I am working on a sampling tool in Excel which is based on what a user enters into a column. The user enters observation codes (text) in column A beginning at row 2 and going down to however many they have. I already have formulas which determine the sample size needed based on the number of nonblank values in that column; the resulting sample size is in G4. I'm thinking that I will need to have a form with a button module to select the random sample from the values in col A. This way Excel isn't running the module while the user is entering the values. The resulting sample can be pasted into a separate column or sheet.
View 3 Replies
View Related
Jan 29, 2007
I am having some problems with some charts that are being created via VBA.
If I create the chart at 1600 x 1200 screen resolution at 100% zoom then my chart is fine but if I am at a different level of zoom or a different screen resolution the code for position the top and left and width and height of the plot area does not work as expected.
I have the outside of the chart set at 600 wide by 600 tall and no matter what resolution i'm in it seems that it always stays this way. I just seems the plot area and the legend move around.
View 9 Replies
View Related
Apr 24, 2014
I have a chart with 5 different series. Instead of editing each one, say the marker size, is there anyway I can change the marker size for all of the different series at the same time?
View 1 Replies
View Related
Dec 18, 2012
I've been successful at changing the font size for the Main title and legend using these commands:
Code:
ActiveChart.ChartTitle.Font.Size = 8
ActiveChart.Legend.Font.Size = 8
But the horizontal axis has me stumped. I recorded part of this but can't get it to work:
Code:
ActiveChart.Axes(xlValue).AxisTitle.Font.Size = 8
How can I change the typeface to Times New Roman for all three and change the font size for the Axis titles? hundreds of charts to change and not enough patience to to it manually.
View 3 Replies
View Related
Jul 19, 2012
My question is regarding changing properties in a chart without activating it. My current example is with adding data labels, but there are many other instances I could use this information in. Here is my current code:
VB: ActiveChart.SeriesCollection(2).ApplyDataLabels
However, I was hoping to replace it with something like this:
VB: Sheets("Dashboard").ChartObjects("Chart 1").SeriesCollection(2).ApplyDataLabels
I get the "Object doesn't support this property/method" error. Is there a way to do this? It just seems inefficient to have to activate the chart in order to make changes.
View 2 Replies
View Related
Apr 25, 2014
When you create a chart In Excel, how do you increase the size of the chart?
View 4 Replies
View Related
Aug 27, 2009
I have a working macro where I use a Forms Command Button w/ a Macro that copy/paste specific variables and range in the workbook to a pre-defined PowerPoint template file (in the same directory as the workbook file). See code below: Questions:
1) Is there a better script to reference a value in a cell value in Excel and Paste in PPT template?
2) Is there away to auto scale the copy range from Excel to PPt? Curently I have to manually adjust the height/width parameters.
View 3 Replies
View Related
Jul 2, 2014
I'm trying to come up with a histogram chart that adjusts Bin Size based on user input. I've come up with the formulas for Bins and Frequency, but am struggling when it comes to charting the data to dynamically update when the user changes Bin Size. How to make the x-axis dynamically adjust with the number of Bins.
View 5 Replies
View Related
Aug 17, 2005
I have craeted a chart in VBA, which sits in the middle of the page . I have attempted to move it to a new location with the following code
ActiveChart.Parent. Name = "MyChart"
ActiveSheet.ChartObjects("MyChart").IncrementLeft -237.75
ActiveSheet.ChartObjects("MyChart").IncrementTop 32.25
ActiveSheet.ChartObjects("MyChart").ScaleHeight 0.96, msoFalse, msoScaleFromTopLeft
ActiveSheet.ChartObjects("MyChart").ScaleWidth 1.17, msoFalse, msoScaleFromTopLeft
which I adapted from a recorded macro, but which fails in execution, error message indicates that the Object does not support the property or Method.
View 9 Replies
View Related
May 30, 2014
I am trying to auto size cells depending on the lenght of the data in them. I have added some code in the work book on the attached file, this works on cell that i maunally add data to any where on the active page (template) but the cells that are auto updated with currencey data dont expand?
If you double click column H a list appears select a test and this auto populates the charges accociated with it
Is there a way to do this as it just fills with #### ???
The code in this workbook is below
[code]
Private Sub Workbook_SheetChange(ByVal Sh As Object, _
ByVal Target As Range)
Dim actCol, curCol
[Code]....
View 2 Replies
View Related
Jul 30, 2007
Need a bit of help with a dynamic column resize.
This is the scene. Imagine 2 lists of data, each list 2 columns wide (like 2 lists of names and phone numbers). List 1 covers column A and B, List 2 covers column D and E. I want it so that on the push of a button, columns A-E are automatically resized to be just big enough for their longest content, and column C resizes so that column D is on the next page.
The general idea is that you can print the sheet, and put together the pages relating to the seperate lists.
View 9 Replies
View Related
Jan 6, 2014
I have excel 2007 and I came across the following difficulty:
If I create a graph (or a chart) the default size is "Letter". However, I can switch this "Letter" to "A4" which I need and then create a template. But I always have to manually choose this template for new charts. However switching this any time I create a new chart is a rather bad way to cope with. Even clicking on set as default obviously does not cause to have A4 size for new chart, it still has got size of Letter when adding a new chart.
I assume the solution could be in XLStart templates, but it probably doesnt work for charts that you add. Or at least I didnt find any clue on the internet for this problem.
View 3 Replies
View Related
Sep 13, 2006
I have a macro that takes a worksheet and copies it to another workbook. It works, but the graph that is contained in the new worksheet ends up a little screwy; for instance, the Plot Area is larger than it should be (height-wise along the screen), and the chart's legend isn't in the exact same place as in the original chart.
ThisWorkbook.Worksheets(tempSheet).Copy After:=wb.ActiveSheet 'before:=ThisWorkbook.Sheets(1)
RenameTemplate
'unlink copy from template
'must unprotect before unlinking. We'll leave it unlocked cuz we don't care.
wb.ActiveSheet.Unprotect
'cells
wb.ActiveSheet.UsedRange.Copy 'ThisWorkbook.Sheets(tempSheet).UsedRange.Copy
wb.ActiveSheet.UsedRange.PasteSpecial Paste:=xlPasteValues ......................
View 3 Replies
View Related
Dec 11, 2008
I have a user form on which I need to create a textbox every time the user clicks a button. There are too many to create them all in advance and make them visible when needed. The sample attached, from this forum, is good, except, the numbers in the text box just scroll along and I need to see all the text typed into my textboxes. I would like the textboxes to be multiline, wordwrap and have them resize according to the amount of text.
View 6 Replies
View Related
Jun 25, 2006
What I am trying to do is to give the user the ability to insert a photo and have it autosize into a range of cells--so far I can only get it to work with a single cell and a predefined file. Can this be refined so that rng references a group of cells and pic somehow lets the user input a file name or pick its name and location?
Sub test()
On Error Resume Next
Set pic = ActiveSheet.Pictures.Insert("C:
ange.gif")
On Error Goto 0
If Not pic Is Nothing Then 'Found it!'
Set rng = ActiveCell
With pic
.Height = rng.Height
.Width = rng.Width
.Left = rng.Left
.Top = rng.Top
End With
End If
End Sub
View 3 Replies
View Related
Dec 12, 2011
I am trying to create a chart that would show all of the Amount values for each Size value that is in the example data below. The Size column has fixed values. In my example the values are: .5, 1, 2, 5, 8, 13 and 21. The Amount column data is variable. Any of the static Size values can be associated with many Amount values. I was attempting to have the static Size values on the X (horizontal) axis and the Amount values on the Y (vertical) axis. I would like to have all of the Amount values for each Size value be shown directly above the corresponding size value, in one vertical line. See example below.
I an creating this type of chart in Excel 2010.
Note, I am still new to this forum and don't know how to post pictures or Excel data into my posts. I am also using dots (periods) to provide separation in my examples.
Amount...Size
58.5.......21
1........... 0.5
2........... 1
1.5.........1
27.5.......13
12.5.......5
2............1
3.5.........2
17.5.......8
4........... 2
48..........21
0.5.........0.5
15..........5
11..........2
Chart that I am trying to create. The chart example is not to scale.
...........60.|
...............|..........................................................................*(21,58.5)
Amount.50.|
...............|..........................................................................*(21,48)
...........40.|
[Code] ........
View 2 Replies
View Related
Feb 25, 2014
I am doing an Advanced Filter, and I am using a named range in my VBA code that decides the Criteria range.
The dynamic named range is called 'Criteria' and this is the code:
VB:
=OFFSET(Sheet1!$A$2,0,0,Sheet1!$BZ$23,41)
However, when I run the VBA code, although it works perfectly, afterwards the named range has changed to:
VB:
=Sheet1!$A$2:$AO$3
I just want this to remain unchanged, as it works great. This is my VBA code:
VB:
'Filter and send data to new sheet
Sheets("Sheet2").Select
Cells.Select
[Code]....
View 4 Replies
View Related
Dec 19, 2008
My boss wants me to design a dynamic, updatable chart in Excel 2003. I initially made a Pivot Chart based on a Pivot Table which worked perfectly, but it doesn't look professional enough when printed (or viewed) and she wants me to approach it a different way.
So, I created a graph based on the data in a Pivot Table, and used dynamic ranges as the source for the graph series so that the chart updates when the criteria fields are changed for the Pivot Table. I then added two combo boxes (ie data validation lists) to the Chart sheet, and wrote VBA code so that whenever the combo box values are changed, the Criteria fields for the Pivot Table on the 2nd sheet are updated accordingly, and this in turn causes the graph to be updated as well.
This solution also worked perfectly, but now I've been told to create the graph without macros.
Does anyone have any suggestions? The requirements/details are as follows:
1. The Pivot Table is on sheet "PIVOT", and the graph is on sheet "GRAPH"
2. The Pivot Table has two criteria - School Name and Year Level
3. On sheet "GRAPH" there are two data-validated fields, School and Year, which only allow the selection of valid Schools and Year Levels
Is there any way to make the Pivot Table update when values are changed in the fields on the CHART sheet so that the chart also updates, but without using code nor a Pivot Chart?
View 9 Replies
View Related
Dec 1, 2007
I have a list of codes from which I'm trying to extract all unique entries.
For example, col A has 001, 001, 002, 003, 003, 003, 004, ...
I'm trying to create a report template with formulas that reference col A and return a single unique entry for each code so that the new column has only 001, 002, 003, 004.
Essentially, the codes reference customers. A customer can have multiple purchases -- but I'm trying to create a report in which I can utilize SumIf formulas to Sum the purchases for each customer and represent those purchases on a single line per customer code.
The catch is that the purchases change monthly (i.e., next month the purchases may be 001, 002, 002, 002, 004) so my report template needs to have the flexibility to adapt without me rewriting the SumIf formulas and return SumIf results for only customers 001, 002, 004. Whereas in the prior month, the report returned SumIf results for customers 001, 002, 003, 004.
View 9 Replies
View Related
