Excel :: Create Circle Object (manipulate Within A Sheet)

Create Macro To Chart Data With Location As Object In Active Sheet
I have been trying to create a macro in excel to chart a selection of data and to output the chart on the active sheet where the data was taken (as opposed to a named sheet). So basically, I have about 300 worksheets with data, and I would like to have a button on each page that automatically charts that data when clicked, and outputs the chart to the page where the macro was clicked. However, I have not been able to figure out a relative reference that will allow me to make the LocationasObject reference simply the ActiveSheet as opposed to a specifically named sheet. See my code below, which references an output to a worksheet called "Charts". Right now, all of my charts are outputting to the sheet called "Charts", as opposed to the active sheet.

Sub ConsDiscChart()
ActiveCell.Offset(29, 11).Range("A1").Select
Selection.End(xlToLeft).Select
Selection.End(xlToLeft).Select
Selection.End(xlToLeft).Select
Selection.End(xlToLeft).Select
Selection.End(xlToLeft).Select
Selection.End(xlToLeft).Select
Selection.End(xlUp).Select
Selection.End(xlUp).Select
Selection.End(xlUp).Select
Selection.End(xlUp).Select
Selection.End(xlUp).Select
Selection.End(xlUp).Select
Selection.End(xlDown).Select
ActiveCell.Offset(0, 1).Range("A1:B1").Select
Range(Selection, Selection.End(xlDown)).Select
ActiveCell.Offset(0, -1).Range("A1:C24").Select
Charts.Add
ActiveChart.ChartType = xlLineMarkers
ActiveChart.Location Where:=xlLocationAsObject, Name:="Charts"
With ActiveChart
.HasTitle = False
.Axes(xlCategory, xlPrimary).HasTitle = False
.Axes(xlValue, xlPrimary).HasTitle = False
End With
End Sub

View Replies! View Related

Create Object, Work With Workbook
I'm trying to open a file and perform various tasks. This is the structure:

Dim xlApp As Object
Dim xlWb As Object

Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = True
Set xlWb = xlApp.Workbooks.Open(BackupFile) ' backupfile evaluates to c: esting est.xls
xlWb.Worksheets(1).Activate

Debug.Print xlWb.Worksheets.Count
Dim ws As Worksheet
For Each ws In xlWb.Worksheets
Debug.Print ws.Name
ws.Activate
Next ws
I think I'm totally missing something. The above works, except for the loop. None of the names show up in my immediate window, and none of the worksheets are activated. xlWB evaluates to nothing, which is where the problem has to be...but why would my first .Activate and Debug.Print lines work? Also, If I declare xlWb as Workbook then absolutely nothing works after the file is opened.

Basically what I want to do is open the file, do a bunch of a stuff with it, then save and close it. I have this all working without creating another object, but the opening of the file is still visible to the user. Seems like turning off ScreenUpdating doesn't truly work.

View Replies! View Related

Create Internet Explorer As Object
I want to create a macro to open a webpage, and with that webpage fill out the fields on the webpage and then hit enter and move to next record. I am having great difficulties with establishing Internet Explorer as my object and maneuvering around inside of it. My data would being in column A so i would expect to use the string below when referencing my data.

Do Until Workbooks(2).Worksheets(1). Range("A" & row) = ""

View Replies! View Related

ActiveX Control Can't Create Object
I copied a routine from this forum that would email a single sheet from a 10-sheet workbook to a recipient. This worked great for a long time, then all of a sudden I started getting the "ActiveX control can't create object" error. Here is my

View Replies! View Related

Error # 429 Active X Can't Create The Object
I am having trouble with the following code... I get error # 429 Active X can't create the object...

Dim blnIOpened As Boolean
Err.Number = 0
On Error GoTo failed
blnIOpened = False
Set MyXL = GetObject(, Excel.Application)

failed:
If Err.Number = 429 Then
Set MyXL = CreateObject(Excel.Application)
blnIOpened = True
End If

If Err.Number 429 Then
MsgBox Err.Number
End If

View Replies! View Related

Create Range Object & Pass To A Subroutine
Create Range Object & Pass To A Subroutine

Sub Test(ByRef objRange As Range)
objRange.Value = "Hi"
End Sub

Sub TestTheTestMethod()
With ThisWorkbook. Sheets("Sheet1")
Set objRange = .Range(.Cells(1, 1), .Cells(i - 1, 3))
objRange.Value = "Hi" 'This works fine !
Test (objRange) 'But here... Getting ERROR 424 -- Object Required
End With
End Sub

View Replies! View Related

Cannot Rename A Sheet To The Same Name As Another Sheet, A Referenced Object Library Or A Workbook Refernced By Visual Basic
I am getting the error from the title of the thread when I try to change a worksheet name.

This worksheet name doesn't already exist in the workbook and I don't have any other files currently open.

I'm not entirely sure what is causing this, but I do need the sheet to be the name I am trying to change to.

View Replies! View Related

Draw A Circle
Ive been trying to draw a circle in excel, although it only draws ovals - Is there a way to draw a circle in excel?

View Replies! View Related

Conditional Circle
Is there anyway to create a checkbox or anything that if a condition were met, it would circle a value?

Simply put, I'm transferring an expense report from paper to excel, and this report is still entered by accounting from hard copies. The expense report requires that all credit card expenses be circled. Previously, I've created cell sized circles, left them unprotected so that they could be dragged over the credit card expense. I would like to add a checkbox somewhere that says, "Circle Expenses" or "Circle All Expenses".

View Replies! View Related

Need To Create A Button That Can Copy Cells, Create A New Sheet And Then Paste There
So I've got Sheet 1 with say

____A___B___C
1___m___i___c
2___r___o___s
3___o___f___t

I would like to create a button that can create a new sheet and paste A1 to C3 at the same location on the new sheet

and I need this to create a new sheet and do that everytime the button is pressed.....

View Replies! View Related

Circle The Cell If The Figure Exceeds 3
I have 4 columns wherein the details are somewhat given below. Is there any way, wherein the figures under the column "No. of times" can be circled if it goes above 3.

Sheet1 CDEF19DateTimeMin.No. of times20Apr-0821Wed - 09-Apr-20082:42 & 2:494 & 23222Thu - 10-Apr-200803:215123Fri - 11-Apr-200810:27, 7:24 p.m., 7:39 & 7:401, 8, 1 & 12424Tue - 15-Apr-200810:26, 10:31, 10:32, 11:26 & 11:306, 2, 4, 4, 25 Excel tables to the web >> Excel Jeanie HTML 4

View Replies! View Related

Simple Two Circle Venn Tool
I've been look for an excel tool to draw venn diagrams with the 'circle' size in propartion to the set (population) sizes and the correct degree of intersect.
Having no luck I've made one myself - it's not pretty (the code sure is ugly) but it get's the job done.

May not work in versions earlier than xl07 - haven't been able to test

So take a look - pull it to pieces all you want.

**Warning**
Attachment contains Macros
**********

Orginal text in thread:
Silly question..but that's never held me back.

View Replies! View Related

Geometry Formula For Circle Calculations
See attached photo. I need a formula to calculate the length of line “c1”. I know the diameter of the circle, and the number of segments. In the photo there are 8 segments but this will change.

View Replies! View Related

Copy Sheet & Create New Monthly Sheet From Present Sheet
I want to create a macro button that can create copy, insert, paste and rename the new sheet in next month's name, like if the active sheet's name is January, I want to copy the whole sheet of January, insert new sheet, paste the new sheet and rename the new sheet to next month like February?

Also rename the new sheet (February) cell B3 the same as new sheet's name (February)

So if month of February is near end, the macro button in February will create the same way as Jan did which means the next sheet will be named March and so on.

View Replies! View Related

Macro To Copy Current Sheet, Create, & Rename New Sheet From Current Open Sheet
EXAMPLE: Complete Sheet called "Day1". When day1 is complete you click on button and it then copies itself and creates and renames new sheet to "Day2", then when "Day2" is complete you click on button and it then copies itself and creates and renames new sheet to "Day3", and so on and so forth to "Day30".

View Replies! View Related

Automatically Re-name Sheet To Cell Value & Create Copy Of Hidden Sheet
I have a workbook with a hidden sheet ("Template") and a visible sheet("New Job"). I need code so when cell F1 in "New Job" is populated:

1-the sheet is renamed to the value of F1,
2-a new tab is made (a carbon copy of the hidden sheet "Template")
3-the new tab is named "New Tab" and marked as unhidden.

Public Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Name = Range("F1").Value
End Sub

Function WorksheetExists(SheetName As String, _
Optional WhichBook As Workbook) As Boolean
Dim WB As Workbook
Set WB = IIf(WhichBook Is Nothing, ThisWorkbook, WhichBook)
On Error Resume Next
WorksheetExists = CBool(Len(WB.Worksheets(SheetName).Name) > 0)
End Function..................

View Replies! View Related

Clear Object In Sheet
I have many objects in a sheet, for example Picture(from file), Oval, command button... I want to clear these objects. How can I do ?

View Replies! View Related

Create New Sheet For Each Row Of Another Sheet Auto Populate Data.
i have a sheet called 'sample database'. it consists of 56 columns, each with a specific title in row 1. i.e. name, surname, mobile_number, and so on.
from row 2 onwards the data has been populated for roughly 200 rows.

i have another 'Capture Sheet' which has the same titles as 'Sample database' except it's in a different format. its a printable form that is given to new employees when they start. once they have completed it it gets captured into the 'Sample Database' sheet.

my wifes boss now wants 1 new sheet for each row in the 'sample database' sheet based on the format/layout of the 'capture form'.
how can i get the 'capture form' to auto populate the data from the 'sample database' sheet and create a new sheet for each row?
i know this is possible i just dont know how to do it.

View Replies! View Related

Macro Pull Data From Each Sheet And Create A Summary Sheet
I need to create a macro that will scan a spreadsheet for the number of sheets and then pull data from the same places on each sheet in order to create a summary sheet. Let me try to explain a little better.

The spreadsheet I'm working with has a separate sheet for each new deal our company makes. Each of these sheets is in the same format - we use a template and fill in the data based on that whenever a new deal emerges. The sheets contain basic info about the deal in the first few rows and columns, then some narratives with dates describing the progress of the deal, and then a list of issues and whether or not they have been resolved. The problem is, each of these sheets contains too much info for a quick, high-level overview with the bosses so they've asked me to create something that will pull the basic info, the most recent narrative, and any unresolved issues from each sheet. This way, each time there's an overview scheduled with the bosses, the macro can be run and it will create a new sheet with data from each sheet in the workbook.

View Replies! View Related

Error - Number:429:' GetObject. ActiveX Component Can't Create Object
VBScript code snippet below is being used in an ASP page but the call to GetObject never attaches to a running instance of Excel. Since visible property is set to True, I can see the instances accumulate in the TaskBar each time the ASP page is called, so there are obviously instances to attach to.

Dim excelApp
Set excelApp = Server.GetObject(,"Excel.Application")
If (err <> 0) Then
Set excelApp = Server.CreateObject("Excel.Application")
End If
excelApp.UserControl = True
excelApp.Visible = True
excelApp = Nothing

GetObject errors out with the following error: Error - Number:429 Source:Microsoft VBScript runtime error Description:ActiveX component can't create object

View Replies! View Related

Conditional Insertion Of Object In Sheet
I need to insert an arrow in a sheet, in a location and a direction which can be controlled by me (I don't mind hard coding the location and direction), based upon a cell value being positive, negitive or 0. I realise that it will require some code but can't find any infomation on doing anything like this through google or in the various VBA texts I own.

View Replies! View Related

Create Sheet If Sheet Doesn't Exist
I need to be able to check if a certain worksheet exists in the active workbook. If that worksheet does not exist I need to make it. I already have the code for creating a new worksheet but I'm not sure how to check if the worksheet already exists.

View Replies! View Related

Custom View Error. Cannot Shift Object Off Sheet
I have a very wide sheet in which I have hidden and saved seven views.I am using it for a very long time but when i did some edit work in the 'full' view,the other views are not showing. In stead I am getting the messages "cannot shift objects off sheet" and "some view settings could not be applied".This is very frustrating since a lot of patience was tested while making this wide data.

View Replies! View Related

Vba Error Run-time 429 Activex Component Can't Create Object - Excel & Outlook 2007
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)

View Replies! View Related

Run-time Error '429' ActiveX Component Can't Create Object
I am trying to generate excel report output from access by click of a button. Part of the code is as follows:

Dim lngColumn As Long
Dim xlx As Object, xlw As Object, xlc As Object
Dim DBS As DAO.Database
Dim rst As DAO.Recordset
Dim blnEXCEL As Boolean, blnHeaderRow As Boolean

blnEXCEL = False

'If we do not want the first row we set Header to false
blnHeaderRow = False

'Establish an EXCEL application object
On Error Resume Next
Set xlx = GetObject(, "Excel.Application")

If Err.Number <> 0 Then
Set xlx = CreateObject("Excel.Application")
blnEXCEL = True
End If
Err.Clear

I worked on development on a server and worked fine. However when I have moved the code and database to the desktop of mine I am having
the following error in the line

Set xlx = GetObject(, "Excel.Application")

Run-time error '429'
ActiveX component can't create object

View Replies! View Related

Create New Sheet From Template Sheet
I am using a code to create a new sheet using a click button, and currently have a template file that is being used.

Private Sub cmdNewSheet_Click()
Sheets.Add Before:=Sheets("Finish"), Type:="C:Documents and SettingsAdministratorMy Documents Stock ControlStockTemplate1.xlt"
Sheets(Sheets.Count - 1). Name = txtNewSheet.Text
txtNewSheet.Text = ""
End Sub

What i want to do is use a sheet in the workbook as a template. The sheet i want to use is simply called 'Temp', and the workbook i am working in is called Stock1.xls. Is this possible? I have had a look at past threads, but cannot find anything that points me in the right direction.

View Replies! View Related

Manipulate Notepad Document
I'm using the following code to copy columns of data in a worksheet of mine. The code once activated will open "notepad" and copy the columns of data in my excel worksheet. Here is the

View Replies! View Related

Manipulate Inputbox Text
I have a macro that takes input from the user and replaces certain text on several worksheets. One of the inputs is a username in the format of firstname.lastname. I need to manipulate this input such that the dot is removed and the first twelve characters only are used, all in upper case. e.g. Michael.Jackson would become MICHAELJACKS

I know how to use cells.replace to replace the text but I don't know how to use a formula to manipulate the inputbox text before I do the replace.

View Replies! View Related

Being Able To Manipulate Data By A VLOOKUP
I have a dataset that has replicated Data Values for example "Bob 25" in one row, "Bob 32" in another and so on. This is contained in one data sheet. I want to be able to do something like a VLOOKUP however I want to every instance that the data value occurs to be represented sequentially in my table, so that every instance of "Bob" would be in represented in my table.

View Replies! View Related

Manipulate Pivotfield Without Names
Range("B5").Select
With ActiveSheet. PivotTables("mypivot).PivotFields("team")
.Orientation = xlRowField
.Position = 2

This will move the data row field called "team" to be the second from the left. I would like a way to move whatever (without mentioning the field's name) field is in position 2 to position 3. Similar to an "offset" to the right.

View Replies! View Related

Manipulate Text File
I have the following text file. I need to show in excel as follows:

1st column : Company No eg 006
2nd column : Expense Type eg 060
3rd column : Agreement Type eg HIP
4th column : Agreement Number Columns C&D added together.
5th column: Tot Def Expense

The breakdown above should be at an agreement level.

View Replies! View Related

Macro To Manipulate Article Sentences
I'm trying to write a macro that will take 5 articles that I have written and separate the sentences out....

So what I need to happen is I take the articles and pop them into excel, then the macro will pick the first sentence of the first article, then the first sentence of the second article, then the first sentence of the third article....and basically repeat this for all the sentences in all the articles also while adding a "|" in between the sentences and adding a starting "{" and an ending "}" for each of the first sentences, second sentences and so on.....

I don't know that I'm making any sence here so here is a very small example of what I need to happen....

Article 1 Paragraph 1: I like blue. I like Green. I like Purple.
Article 1 Paragraph 2: I like flowers. I like dasies. I like tulips.

Article 2 Paragraph 1: I like football. I like basketball. I like soccer.
Article 2 Paragraph 2: I like food. I like wine. I like beer.

Article 3 Paragraph 1: The sky is blue. The sky is dark. The sky is night.
Article 3 Paragraph 2: I love stars. The moon is big. The moon is full.

So each of articles would need to be placed in separate sheets I'm guessing?

Below is what I need the text to look like when the macro has finished.....

Spun Article Paragraph 1:

{I like blue.|I like football.|The sky is blue.}{I like Green.|I like basketball.|The sky is dark.}{I like Purple.|I like soccer.|The sky is night.}

Spun Article Paragraph 2:

{I like flowers.|I like food.|I love stars.}{I like dasies.|I like wine.|The moon is big.}{I like tulips.|I like beer.|The moon is full.}

I hope this all makes sense.....

I already set this up using the record macro feature of excel and it works ok but I end up having to do a lot of editing because it will put to many brackets in or not enough so I was hoping for some advise or possibly some code example that could get me headed in the right direction....

View Replies! View Related

Manipulate Rumba Mainframe Display
I routinely work with RUMBA mainframe display and was trying to create a VBA macro to enter data from a spreadsheet into the mainframe but after pressing enter the mainframe has random wait times on the status bar saying "Host Busy...Please Wait" and then changing to "Ready" when able to accept my next command.

how I can make a method of waiting for the mainframe to be ready before excel continues its sendkeys.

View Replies! View Related

Manipulate Text File Using VBA
I had a problem today where I had to make some changes to a couple of large text files (100mb+). It seems that the File System Object (Microsoft Scripting Runtime) can only read or write at any one time so I ended up writing this. It opens two text streams at once , one to read and one to write and creates a revised file. Not very exciting but I thought somebody might find it useful ...

Sub ChangeTextFile()
' Manipulating a text file with VBA
' Loops through text file and creates revised one
' This code requires a reference (Tools > References) to Microsoft Scripting Runtime
Dim FSO As FileSystemObject
Dim FSOFile As TextStream, FSOFileRevised As TextStream
Dim FilePath As String, FilePathRevised As String
FilePath = "c: est.txt" ' create a test.txt file or change this
' adds "_Revised" to your file name
FilePathRevised = Left(FilePath, Len(FilePath) - 4) & "_Revised" & Right(FilePath, 4)........................

View Replies! View Related

Object Library Invalid Or Contains References To Object Definitions
I'm getting the following error:

"Object library invalid or contains references to object definitions that could not be found"

I wasn't getting that error last night and I'm not sure what I may have done to cause this error.

It seems to be cause by code running on one sheet of my workbook, but I'm not really sure about that. I'm still a bit of a novice at VBA.

I'm using Excel 2002 SP3 and I'm running MS XP Home as my OS.

Do you have any ideas what can cause this error and/or how to trace down the offending objects/code?

View Replies! View Related

Manipulate Current & Last Values Of A Cell
In Cell B1 I'm trying manipulate (either sum or find the difference for) the current and most recent prior values of Cell A1. The value in Cell A1 changes frecuently because it gets its values from a DDE link.

How do I :

1. Display in Cell B1 the current change in value of Cell A1 ?
2. Display in Cell C1 the sum of changes which have taken place in Cell B1 ?
3. Ideally I'd like to also be able to manually reset the value of Cell C1 to zero at any time.

I think this is a macro, or array, or pivot table thing, and is probably simple, but all of that is well beyond my current skill level.

View Replies! View Related

Import And Then Manipulate Data From Another File Automatically
I am working on a file that is going to import and then manipulate data from another excel file automatically. I would like this to be as smooth as possible and I am running into a problem. The file I am importing the data from is password protected, so I am opening it in read-only. Also, the file contains links to other excel files.

What I would like to do is indicate in the code to open the file in read-only format so that the user doesn't get a message box asking for the password. Also, is there a way to suppress the message box about updating the links? I have tried application.displayalerts = false but that didn't solve my problem.

View Replies! View Related

Manipulate & Displaying Text In Cells
I have a variable COMTXT that loads (via loop) several short lines of text to form a "mouthful" of comments together. But have 2 issues with it.

1- I need to add a carriage return after loading each short line of text. [code] Module1.COMTXT = Module1.COMTXT + Sheets(3). Cells(Module1.COMCODE, 1)
[?CODE]I have try'd [& vbCrLf &] in many syntax's to no avail.

2- When displaying COMTXT to a sheet, its too big for the cell ! and not able to enlarge the cell without major disortion to rest of sheet. How do I acheive this and allow the text to display like a textbox or label, covering many cells and rows.

View Replies! View Related

VBA To Manipulate Pivot Table Report Filter
I have a pivot table created from a data table with three columns: Date, Sales, and Customers. I have the Date column in the Report Filter and I want to change the date based upon a value in a cell range named Date, of all things. The pivot table is located in another worksheet and the range Date is changed by a spin button in the active worksheet.

My code is:

Sub ptDate()

Dim pt As PivotTable
Set pt = Worksheets("Pivot Tables").PivotTables("PivotTable1")

pt.PivotFields("Date").ClearAllFilters
pt.PivotFields("Date").CurrentPage = Range("Date")

End Sub

View Replies! View Related

Manipulate Date Ranges For Monthly And Quarterly Reports
I am currently trying to manipulate date ranges for monthly and quarterly reports, and am having trouble doing this. I have attached a file with an example of what I would essentially need.

I would need the "Nbr of Projects", "Nbr of Days worked", "Nbr of International Projects" and "Nbr of Local Projects" cells filled in under each respective report, based on the data in the top left.

If a project falls in two months, such as "18.12.2008 to 15.01.2009", this would be treated as 1 project for December and 1 project for January. Also, I would need only "NETWORKDAYS" included in the solution, so 11 days in this example.

View Replies! View Related

Circular References (manipulate Each Part Based On The Other Parts)
I am trying to create a calculator in excel that has five parts. I want to manipulate each part based on the other parts. I cannot figure out how to remove the formula and replace it with the derived number without a circular reference. The circular references slow down the main macros of my program.

View Replies! View Related

Manipulate Chart Data Labels Height, Width....
I m working with bar charts and as I've heard these labels can be a bit of a pain. I've got the labels in roughly the right position 90% of the time however that other 10% has me in rolling fits.

My issues
1. A label within the chart area is wrapped on two lines, how could I restrict Excel from wrappign the label
2. A Labels position covers some of the data reported and thus makes the graph messy

how could I find the position of the end of the bar and also the length of the datalabel so I could reposition it. Note I am using 2003 and that I am trying to use

activeChart.seriesCollection(s).item(i).Datalabel.left

for finding the position although this is only really where im getting to. finding the wrapping position and also being able to manipulate the length of the label is proving tricky.

View Replies! View Related

Manipulate Values & Formatting In Closed Workbook
I have 2 workbooks, one containing all my code and userforms and another containing all my data (which is continuously updated/ dynamic). I want to be able to manipulate the data without ever opening the workbook (at the moment I use the open workbook method, but it is extremely slow). I have found some code (Jwalk) which I think meets my needs (and is instant). I have adapted this so it points to a specific path rather than the active path as below etc. but I need to adapt it further so that:

1. When the data is opened it is formatted exactly the same as it is in the original sheet which includes any coloured cells, bold fonts, cell width, height and so on

2. Any changes I make can be saved back to the original sheet in the closed workbook.

3. The data always opens in a named specific worksheet i.e. "TempSheet" which sits in the workbook containing the code (my code is called from a userform within this workbook).

The code I am using from Jwalk is as follows:

Sub GetDataDemo()

Dim FilePath$, Row&, Column&, Address$

'change constants & FilePath below to suit
'***************************************
Const FileName$ = "Book1.xls"
Const SheetName$ = "Sheet1"
Const NumRows& = 10
Const NumColumns& = 10
FilePath = ActiveWorkbook.Path & ""
'***************************************

I am still learning VBA and can adapt/write small pieces of simple code, I have tried incorporating the paste special method, but in all honesty, don't know what I am doing and it results in lots of errors. Can anyone help me get this working/point me in the right direction? Also, what does 'Const' do? how do I bring in the data without specifying the number of rows, as this will be different every time?

View Replies! View Related

Manipulate Web Page Controls To Retrieve Data
I retrieve data about local reservoirs (elevation, precipitation, gated release, ...) from a web site [url]. Retrieving the reports requires manipulating three drop boxes ("Select lake", "Year", "Data Type"). After that, I copy the data to the clipboard, and, back in Excel, push a button that pastes the text and extracts the data.

I'd like to programmatically manipulate those controls so that data retrieval can be completely automated.

View Replies! View Related

Create Summary Sheet
I have a sheet in my workbook named Summary, from this I would like to run a macro that cycles through every sheet except "Summary" & "Variables" & "Cash" and puts the sheet name in E5:down and cell AH30 from every sheet in F5:down.

I know it's possible, but I'm not sure how to set up the loop.

View Replies! View Related

Use A Button To Create New Sheet?
Is it possible to create a button in or out of a cell and when that is clicked it will generate a new sheet in the same workbook.

Now this is throwing the line to you clever people... Having then created a new sheet can it be that in say A:1 it will display the date the sheet was created AND make a popup box appear to allow the user to enter a name for the new sheet?

View Replies! View Related

VBA To Create New Sheet ...
I would like to be able to have a macro, linked to a button, so that when you press that button it creates a new named sheet based on data in a particular cell.

I.e. There is a table with the following data:
Apples (A1)
Oranges (A2)
Pears (A3)

There are also the sheets Apples, Oranges & Pears.

You enter 'Grape' in cell A4, then when you press the button it creates a new sheet named Grape.

Also when a new sheet is created, the 'input cell', in this case A4, is moved down one so that when the next sheet is needed to be added, it doesn't just add the same sheet (i.e. in the example above, we don't end up with a new sheet named 'Grape' each time we click the button).

View Replies! View Related

Macro To Create New Sheet
I want to create a Macro that will create a new worksheet when the user so desires using a message box.

The workbook contains 4 tabs, for example, named as follows: (1) template (2) 250 (3) 825 and (4) 975. I want the marco to work as follows:

1- Macro will ask user "please type store number"
2- Macro will then make of copy of "template" and create the new sheet
3- if user types in "860", I want to the macro to name the new sheet "860" and place the new worksheet between sheets 825 and 975.

Also - this may be asking too much but is it also possible to also prevent user from entering non-valid numbers? The valid numbers are 001 - 999. ie; if user enters "1500", return message "invalid entry".

View Replies! View Related

Create Circle Object (manipulate Within A Sheet)

I'm trying to learn about class modules and how to create object that i can manipulate within a sheet. i'd like to create a simple cirlce object that i can visibley see on a sheet. is this possible and if so any idea on how i start?

I'm trying to learn about class modules and how to create object that i can manipulate within a sheet.

i'd like to create a simple cirlce object that i can visibley see on a sheet.

is this possible and if so any idea on how i start?