I have a bar chart with a few text boxes on it. When I select the chart to print it, the text boxes don't print (or show in print preview). I have to select the cells that encompass the chart to make them print. I have even grouped the boxes with the chart and it still doesn't print them.
How I can make the text boxes print when I select the chart only?
Arised from my earlier posting in Populate ComboBox With Specific Sheet Column Range. I have the following working code below, but am having trouble finding coding examples to select specific cells from the selected row (that was found by selecting a ComboBox value)and update TextBoxes with those individual values after the UserForm has been initialized (the bold "GREEN" comment in the code below). I have been able to find plenty of references to update TextBox values to Cells, but that doesn't do me much good in this application since the User needs to verify the old data in these cells before updating them using the UserForm TextBoxes.
I was toying around with several different variations of code (none of which worked properly), so I left it out for clarity of my working code. I'll post up this non-working code as needed, because I really wanted a fresh answer...not what I was trying to do. The attached file should be sufficient to see what's going on
Private Sub UserForm_Initialize()
With Sheets("SR Information")
.Range("A2", .Cells(Rows.Count, "A").End(xlUp)).Name = "MyRange"
End With
SRnumber.RowSource = "MyRange"
End Sub
Private Sub SRnumber_Change()
Dim ServiceRequestNumber As String
Dim c As Range
Dim rngG As Range
Sheets("SR Information").Select
With Selection
ServiceRequestNumber = SRnumber.Value
For Each c In Intersect(ActiveSheet.UsedRange, Columns("a"))
If c = ServiceRequestNumber Then..................
I have a Services Quote work book that contains many tabs only some of which may be used for a particular quote.
I would like to have a macro that I could assign to a button that would check the value of a particular field on each tab and if that field is greater than 0, then it should select that tab as one to be printed. Once all tabs are checked and either selected or not selected, the macro should print the selected tabs.
I want to be able to print individual rows from my sheet. When I try, they run onto a number of pages. The information needs to be printed along with the column headers to make sense. Is there a way I can do this and get the rows to 'wrap' to save paper?
View 9 Replies View Relateduser form that has a list box that only picks up visual worksheet (not hidden ones) and then allows the user to select which ones to print via check boxes.
View 5 Replies View Relatedi have 2 userforms one with textboxes and the other one with listbox and textboxes.
Everytime user input their data(ie:first name, last name, address etc) in the first form the data's going to be saved in Worksheet("customerSheet") and later on to be displayed in the second form. using the listbox you can select the customer's name and the customer info will be displayed in the textboxes.
here's my code in second form
Private Sub UserForm_Initialize()
Worksheets("CustomerSheet").Activate
Range("A1").Select
'ActiveCell.CurrentRegion.Name = "Database"
'Selection.End(xlDown).Select
'ActiveCell.address(False, False)
viewCustomerBox.RowSource = "A2:A15"
End Sub
I have a large chart made up with hundreds of rows and around 10 columns. Normally I would use certain pieces of data to find the correct row that would provide my answers. I have set up an extra column beside the chart that will put an X next to the row that will provide my answer. What formula could I use to have excel copy the row beside the X, and put it on another sheet in the workbook?
View 1 Replies View RelatedI am trying to make a dynamic chart with a drop down/cell selection. I have a table with names vs. months. Each name/month has an associated value. I want to display a bar chart that I select with a drop down. i.e. If I select January, the chart will show january's data. If I select February, february's. Etc.
I tried to set my series values as: =indirect($C$1) where C1 is the entry cell for the month and the value corresponds to a named range. I get an error that says "That function is not valid."
When I try to put just the named range, excel highlights the correct range but then tells me that "the formula you typed contains an error. Try one of the following..."
I have a chart, I need to select a cell beneath that chart. It can be the top cell or top left cell. So is there a way, by using vba, to know which cell is the top or left cell being covered by a chart
View 2 Replies View RelatedSeeking a way to automatically select just the populated range of cells in Cols A, B and C starting with row 2. In this sample there are 48 however this changes.
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlBarStacked
ActiveChart.SeriesCollection(1).Name = "=Sheet1!$C$1"
ActiveChart.SeriesCollection(1).Values = "=Sheet1!$C$2:$C$48"
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(2).Name = "=Sheet1!$D$1"
ActiveChart.SeriesCollection(2).Values = "=Sheet1!$D$2:$D$48"
ActiveChart.SeriesCollection(2).XValues = "=Sheet1!$A$2:$A$48"
I have data that I am importing regularly and the number of lines of the data is highly variable. I have written code that first inserts a column of data I need for my Y axis, then the second part of my code should select the my X and Y range and change the graph accordingly then thirdly modify the limits of the major axis to the nearest largest multiple of 10 of the data. My sections 2 and three are not working properly.
Here is my code:
Sub Tip_Elevation()
'
' Tip_Elevation Macro
' Insert Tip Elevation Depth (Ft)
'
' Keyboard Shortcut: Ctrl+Shift+I
'Insert column needed for Y Axis
Cells.find(What:="Test").Activate
[Code]....
I have a line chart that tracks daily inventory and daily distribution. The chart also has a static value of Max inventory and Min inventory levels. Is it possible to shade the area between the Min and Max levels on the chart a different color from the rest of the chart. For example the chart has a white background and I would like to shade the area betwen the min a max a light blue across the width of the chart.
View 4 Replies View RelatedI would like to know if there is a way to print several different workbooks at once but keeping my printing format which I would like to be Landscape and Fit to one page. Reason is simple as I work in a office where staff is handed in several jobs to do everyday. They finish the jobs and log all the info on the database. I log on to database and put all their daily diaries and because it is all over the place I have to go in each file and set printing preferences which takes an hour in the morning and hour in the evening. I could do with some sort of automation where all diaries are automatically printed in Landscape and Fit on one page.
View 2 Replies View RelatedI have a report that is generated from a manufacturing process that looks like the example below. the report is 40 pages long when all the data is printed. i am looking for a way to only print this range if a dimension is "out of tolerance". if the dimension is within tolerance, there is always the "garbage" text of plus and minus. if every row is "within tolerance" in the range the cells in the OutTol column would all contain the "garbage" text but it will not always be identical. so, in summary, actual OutTol values = print and all "garbage" = not printed.
NomActDevLoTolUpTolOutTol
Y-0.956-0.9480.008-0.0030.0030.005
Z-1.413-1.4130.000-0.0030.003---*|++++
DIA0.4220.4240.002-0.0030.006----|+*++
POS0.0160.0110.005
At the moment I've got a chart with 3 series lines on it and each line has 12 points. I need to select the 12th point on each series in the chart and create a label for it. The 3 lines are Budget, Forecast and Actual and often the Forecast line hits the same points as the Budget line in the chart and every time I try to find a way to select the last point on the Forecast line, I end up selecting the budget one because it's the one in the foreground.
I can select the forecast line with the keyboard arrows, but not the last point.
I also try to zoom in to get it but one of my charts has exactly the same forecast line as budget line and I still need the forecast line because the forecast will change in future.
I can delete the budget line then add it back, but this is difficult and one I'd have to repeat many times because I'm always making graphs and labelling the final point in a series is something I'm going to have to do more often.
How do I select the last point on the forecast line if it's directly behind the budget line?
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
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 RelatedHow do I paste the first chart into the second chart but maintain the format of the second chart?
View 2 Replies View RelatedI have a big clunky spreadsheet that I thought I'd tidy up by adding a userform to keep the info
There's a combination of textboxes, option buttons, listboxes and a multipage. Everything seems to load correctly, and selecting an item in a listbox correctly fills the textboxes, but when I change the value of the textboxes, only 2 out of 4 holds that value and sends it to the correct cell.
The code that is supposed to send all the values is;
VB:
Private Sub CommandButton1_Click()
'check that a row has been selected
If Range("K3") = "" Then
[Code].....
The culprits are TextBox3 and TextBox4.
I've tried changing the names, I've checked that there are no other textboxes pasted on top, I've even tried adding in a MsgBox line to show the value of the textbox; if the form loads and the box grabs a value of "ABC" from the spreadsheet, and I change it to "DEF", when I hit the button to execute the above code the textbox goes straight back to "ABC".
But it's not an issue with TextBox2 ...
Other parts of the code include a UserForm_Activate block and 5 x ListBox_Click's.
So the think is that i have 197 textbox and i whant it to fill them with the range of a sheet preselected automatly with a loop.Whitout a loop i have this.
VB:
Dim e As Integere = CInt(TextBox198.Text)
TextBox1.Text = Sheets("Dia" + " " + CStr(e)).Range("A3").Value
that work, but its to slow, if i try this and also to modify
VB:
Dim e As Integer
For e = CInt(TextBox198.Text) To CInt(TextBox199.Text)
Dim i As Integer
For i = 1 To 17 [code]....
Where Textbox198.text define the start day (sheet), and Textbox199 the final day, this is highlighted.Also i dont know how to write the textbox(i).text loop, i try a lot of ways and always have problems.I tried to write like this that also didnt work out: TextBox & i & .text and TextBox+i.text
how to create an array of textboxes in excel vba. I have declared an array of type textboxes and I'm still getting errors. I'm assuming its a flaw in my understanding here. The error is Runtime error 13 'type mismatch'.
View 2 Replies View RelatedUsing vba textboxes too do math .I have attached a sheet too explain, not sure if its possible. If it is I know this is the place too find out.
View 4 Replies View RelatedI'm populating the textbox (which is locked, so can't be edited) using
Private Sub ComboBox1_Change()
If ComboBox1.Value = "JS Logs" Then
UserForm1.TextBox1.Value = "A load of info on how JS works" & vbCrLf & "blah, blah blah"
elseif etc. etc.
Does anyone know how I can add formatting to the textbox? E.g. making certain bits of the text Bold/italic/different size/underlined etc? I don't want to apply this format to the whole textbox, just bits of the contents (i.e. sub-titles)
I have a user form that has a section of 32 text boxes that all information randomly placed inside some of them. Most of the them will be empty.
Is there an easy way to have have a macro loop through these text boxes and find their values (if they have any), and then place those values on the next available row in a worksheet?
Here is a picture of what they look like
What I'm trying to do is get the next rows in my sheet to say:
5
1
22
32
11
23
1
15
etc...
I have about 21 textboxes that are going to be watched by 1 textbox called totaltime on a userform.
I created the code below to add up those 21 textboxes, but it's not showing anything even though they are populated, some with zeros and some with one through eight.....
I have a number of textboxes, or other boxes, using exactly the same code. In visual basic you can assign an index to these boxes and create one code where the index number specifies the box you are working with.
I have tried finding a way to do thing in VBA, but came up against a blank. I realise that this is either not possible or very simple, but right now I am stuck with the 'not possible'. Does anyone know if the 'very simple' is an option. It would greatly decrease the size of my program, make it easier to visualise and not make me change to much each time.
Of course I refer to subs as much as possible making these routines 3 line routines (sub-call-endsub), but still there are a lot of textbox1_click() routines whereas textbox_click(index) would be nicer.
Is there a way to do something like this? The purpose is to get the value from a text box and put it in a cell...
View 4 Replies View RelatedI am working on a form in VB and have a textbox that needs to be formatted so that every four spaces in the TB has a dash (users will input an Account Number).
View 2 Replies View RelatedUserForm1, page5. From Combobox1 I choose a city and the textboxes give me the values from Sheet3. I'd like to color in green the smallest value. for example, if for LHR I find for A-4214, B-4420, C-3127 => value 3127 to be green. The problem is I have more textboxes in other pages and some of them are colored in green also. Is possible to reffer to these textboxes from page5 only?
View 8 Replies View RelatedI have a form and I would like certain textboxes to be inaccessible via tabbing. In the properties for each textbox I have selected LOCKED, so that their values cannot be altered. Is there a way to completely bypass them when tabbing?
View 1 Replies View Related