I want to use VBA to insert an Organisation Chart in Excel 2007 (ie if I did this manually it would be Insert, SmartArt, Hierarchy), but I cannot find anything on line that shows how to do this in Excel 2007. I know the code for Excel 2003, but that does not work in 2007.
View 4 RepliesI have a text box within a chart tab which is populated with text values from a worksheet within the workbook. That part works fine however i want to be able to achieve the following example:
Current Text: Component Name - Notes
if there are notes against the component name i want the name to remain in black and the notes to change to blue
Aim: Component Name - Notes
If there arn't any notes then for the component name and the "-" to change to a light shade of grey
Aim: Component Name -
There are 26 components, each on their own lines in the textbox so im thinking either a loop where the cell reference is variable eg. ("CY" & i) or using the .find with a variable.
My code so far is:
Code:
Sub Chart_Notes_NTCA()
Dim i As Long, j As Long, Counted As Long, Total As Long
Dim Ans As String, Notes As String
Dim Cht As Chart
[Code].....
1) i have office 2003 on a laptop. within powerpoint, i can create a 'microsoft excel chart 11' object. to create a link to the excel data source, do i have to go through the odbc sql setup? it works, but i don't want my powerpoint to be dependent on some excel file somewhere. what are the other options to insert/make a functional pivot chart in powerpoint with the data also within powerpoint? the data as sheet option does not result in the chart being a pivot, it's just a plain chart. it has to be a proper object, not an image paste or a chart that updates links with the excel file open.
2) i have office 2007 on my other laptop. i can not find any suitable object to choose from to make a pivot chart in powerpoint. what's the best way to go about in 2007 version?
3) am i going about this the wrong way with the objects? should i be after vba code?
I am using excel 2010, i try to insert active x control command button insert but " cannot object insert" like this message came?
View 3 Replies View RelatedI have written a sub with the purpose of finding rows based on a critieria, copying the rows to another worksheet and deleting the original row.
The code:
Code:
Sub MoveToIgangvaerende()
'
' Flytter opgaven til sheetet Igangværende projekter
'
Dim i, j, Index As Integer
Forfra:
For i = -1 To 1000
If Sheets("Pipeline").Cells(3 + i, 20) = "Ja" Or Sheets("Pipeline").Cells(3 + i, 20) = "ja" Then
[Code] ......
I get the error message "Method 'Delete' of object 'Range' failed" at the line "Sheets("Pipeline").Cells(3 + i, 18).EntireRow.Delete".
The sub has previously worked perfectly fine.
i am totally new in excel and i am using excel 2007, my question is : how can i create an object in an excel sheet, so that when the mouse cursor move to it, it pops up anohter image?
View 4 Replies View RelatedI started a new job and my new company uses Excel 2010 (64-Bit). The code below was written for use in Excel 2007. I am trying to open an XML file and simply paste the results in a spreadsheet but I am getting this error, "Method 'OpenXML' of object 'Workbooks' failed" at the "set oWX" line in the code.
Sub GetNetTIEDAH()
Dim idate As Integer
Dim strThisBook As String
[Code].....
I have some VBA code that in one portion of it an Outlook e-mail is created and the active workbook is attached and sent. This code used to work on Excel & Outlook 2003, but now in Excel & Outlook 2007 I'm getting the error:
Run-time error '429':
ActiveX component can't create object
and is stopping on the line
Set OutApp = GetObject(, "Outlook.Application")
FY If I comment out the Set OutApp... and If OutApp.... lines and uncomment the Set OutApp create object line, I still get the same error.
Dim OutApp As Object
Dim OutMail As Object
Dim SigString As String
Dim Signature As String
'Set OutApp = CreateObject("Outlook.Application")
Set OutApp = GetObject(, "Outlook.Application")
If OutApp Is Nothing Then Set OutApp = CreateObject("Outlook.Application")
OutApp.Session.Logon
Set OutMail = OutApp.CreateItem(0)
I want to put a hyperlink into an existing spreadsheet (which already has some hyperlinks in) but for some reason that option is now greyed out on my tool bar.
View 3 Replies View RelatedI need to insert a drop down box into my spreadsheet, and depending on the option selected, the formula used to calculate the value into another cell changes. How do I implement this in Excel 2007?
To put this in context, I need a list of acids in cell C3. Depending on the acid selected, the formula used to calculate acid concentration in another cell (D3) changes. I need a way to implement this.
I am using Excel 2007. I would like to be able to type "dlta" followed by a space and have autocorrect change it to the symbol for Delta (a triangle). I got it to work in Word because I could right click and paste the symbol in the autocorrect dialogue box. Excel won't let me do that. I also tried typing Alt+68 because I believe that is the code for the symbol I want but all I get is a "D".
View 11 Replies View RelatedHow do I insert an animated gif into a worksheet in excel 2007?
View 8 Replies View RelatedExcel 2007.
Insert - Object allows me to insert a object (display as icon is used). Is it also possible to insert multiple objects in one go? Via this option I can always only select 1 object.
with the following: The VBA macro I am using, is derived from the excellent "Table of Contents" macro written by Erik Van Geit, a few years ago.
I have a workbook (in Excel 2007, Windows XP) with an Index sheet and 200 other sheets (called ScreenShot1 to ScreenShot200). Each of these 200 sheets has had an image pasted in the top left corner.
At present, using the macro below, a hyperlink is placed in cell A1 on each of these 200 sheets (it's behind the image) that links to cell M1 on the Index sheet. What I would like this macro to do is make each image the hyperlink back to cell M1 on the Index sheet. Please note that the images are not named.
VBA code below,
Sub create_TOC()
Dim i As Integer
Dim msg As String
Dim fc_order As Range
Dim sht As Object
'**** EDIT the following lines ****
Const TOC = "Table of Contents"
Const Index = "Index"
Const CellLink = "A1"
'**** END EDIT ****
[Code]....
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.
I have a Pie Chart that which is updated based on a dropdown list.
The pie chart works fine for all my dropdown options - except one!
Basically, on this particular chart, the entire chart is filled with one colour even though the split is 90/43.
I am using Excel 2007. The options for Fill are set to Automatic & Vary Colors by slice is checked.
I have built a chart using dynamic nameranges. The problem that I am facing is I tested it on two systems . One system the charts works fine but the other system the charts does not work . Both are excel 2007. Now the error that I get is if I see the chart data source from one system it is showing "!". The other file shows the chart data source as "0!". What should I be checking so that it works in the other system as well?
View 6 Replies View RelatedI'd like to know if it's possible (Excel 2007) to insert a function/button into a cell, which when clicked, will paste whatever is on the clipboard?
You can see a screenshot of my document here, and I'd like to insert a paste funtion in the red circle. Is it possible?
[URL]
I am looking for a way of allowing users to edit the existing cells at their will, but simultaneously disabling the option to insert/ delete columns or rows.
By enabling Sheet Protection, I cannot find a way to do it. Can I?
I am on MS Excel 2007 by the way.
I found the way, just unlock all cells in Format Cells, Protection Tab. Then Protect sheet and de-select what you want to disable.
I have a form that collects four pieces of information from the user and places each into columns A, B, C, D on a sheet. I would like to automatically add an option button to column E so that a user could select it and then click a control button to delete the corresponding row.
Is this possible or is there maybe a better way to do this in Excel 2007.
I am currently using MS Excel 2007. Is there a way in VBA to automatically insert missing columns based on a defined series or range of values?
For example, we have a report that displays columns of: Year 2004 to Year 2012 per column (9 columns in total).
Sometimes, it displays missing a year or years (thus; our report has less columns). For example, it only shows 2008 to 2012 (missing 2004 to 2007). At times, it misses some years in between. What we do is manually add those missing years by manually inserting columns then inputting the missing year as their column headers.
Is it posisble for VBA to check if the columns contain all of the defined Year range (for example, you've initially defined: Year 2004 to Year 2012)? Afterwards, all missing columns are automoatically inserted (in chronological order or based on your defined values or range).
Using excel 2007 I've created a new tab and wanted to place the 2003 file menu on it. I don't know how to include it automatically in the tab using a combination of XML and VBA. So I created a button with the callback to run some code. Unfortunately, it still places the item in the Add-in tab. How can I get the undernoted code to operate within my new tab with either XLM or VBA?
Code:
Sub InsertFileMenu2003()
Dim cb As CommandBar
Set cb = Application.CommandBars.Add("xl2003 Menu", , True)
CommandBars("Built-in Menus").Controls("&File").Copy cb
Application.CommandBars("xl2003 Menu").Visible = True
End Sub
I have a line charts with values above and below zero.
Im looking for a way to colour the steps below zero in one colour, and above zero in another colour - without doing it manually.
Using Excel 2007.
I've just switched to 2007 and can't seem to find where they've moved the ability to change the width of bars in a chart. Where is it in 2007?
View 7 Replies View RelatedI have inherited a series of Word reports containing links to charts in several Excel files. I can tell by the link in Word that one of the charts is named 'Chart 6'. Is there an easy way to locate which chart in the Excel file is 'Chart 6' (and on and on for all of the other charts linked in the Word doc)? There are upwards of 21 charts in each Excel file linked to each of the Word reports. I am using 2007 but the files are in 2003 format because of limitations of the program from which the data comes for the charts.
View 4 Replies View RelatedI'm attempting to chart data obtained from our phone system to see when users are logged in/on rest.
I'm using Excel 2007.
The data we extract has:
person | status | start | finish | duration
Status is either "login" or "rest"
Start/finish is time (h:mm)
Duration is a formula (h:mm, finish - start)
I want to have a stacked bar chart that shows when a person was logged in/on rest; one bar for each person.
x-axis: person
y-axis: time (8am - 6pm)
legend: status
The problem I'm encountering is that each person logs in and out multiple times throughout the day (therefore, has multiple lines to their name in the data), and I can't get this information to appear on a single bar for each person.
I've sorted the data into a pivot table which gives me the information I want, but how to get the chart.
Row labels
a. Person
b. status
c. start
Values
Min of duration
Ideally, I would like to avoid using a Gantt chart within cells (as it would involve vlookup/if statements), but am beginning to think that's my only option...
I'm using Excel 2007 and I have a reasonable level of experience with VBA coding in normal / object modules, but I have no experience with class modules or events ... so I do not have a good command on what goes into a normal module vice a class module if I want to use mouse events to rotate a chart.
I am looking to rotate a chart ... Since I am not allowed to post a file, I will give the 3D array here:
1.0000
2.0000
3.0000
4.0000
[Code]...
I have placed into a normal module the following code (based on what I was able to pick up from MSDN):
Code:
Dim myClassModule As New EventClassModule
Sub InitializeChart()
Set myClassModule.myChartClass = Worksheets(1).ChartObjects(1).Chart
End Sub
And I have placed the following code into a class module named EventClassModule (also based on what I was able to pick up from MSDN):
Code:
Public WithEvents myChartClass As Chart
I want to rotate the chart by using click and drag, and, if possible, I'd also like to be able to zoom in and out via some method (say a mouse wheel event).
In the following link, a guy has done a beautiful job of enabling scatter plot rotation using scroll bars, but I'd like to be able to use mouse events instead:
3d scatter plot for MS Excel (VBA macro)
Using Excel 2007: I have a column graph whose numbers/labels on the vertical axis go from ($300,000) to a positive $550,000.
Question: How do I get the labels on the vertical axis to appear in the "accounting format" with the "negative numbers in red" and the "positive numbers in black or blue"?
I have tried to find the answer online and it appears to need to find Format Data Series, which I have been unable to do.
I would like to multiply a serie in 'series values' (before presenting on a chart) with a factor (in a formula like ='[1]name'!$V$2:$V$148)
in other words I would like to do something like
=('[1]name'!$V$2:$V$148)*50
but I don't seem to succeed with the correct syntax.
In Excel searching for "multiply series values" under "edit series" there is to read:
"Use this option to include additional data series on the chart or to modify the name and values of existing data series without affecting the data on the worksheet."
So what I want to do seems to be possible.
Excel 2007 version 12.0.6611.1000
I know I can create a temporary column with the multiplied values but THIS IS NOT the way I want to solve the problem.
I'm having a problem with named ranges in a chart. I'm using Excel 2007 in Windows XP.
I have a line graph with twenty different series all using dynamic ranges. I created each series individually, typing the name and then the dynamic range I had previously defined. As far as I am aware, Excel demands when writing the reference that you specify which sheet/workbook this named range is from, so, given the scopes of my ranges are all 'workbook', I added the name of the workbook to the references.
e.g.
Series name:
Series1
Series values:
='workbook name'!range1
This seems to work fine, but when I save and then re-open the file, the dynamic ranges no longer work. If I go to Select Data and look at the reference for a series, it has been changed thus:
Series values:
=[0]!range1