Macro Code To Log Onto Web Page Form
Aug 9, 2008
Im using information from oracle to do applications on excel. As im nothing related to IT department and I'm working on a BIG company, i did it by myself, i dont have support.
What i did is to investigate about oracleas (portal), then from my excel application i create the URL of the search i need, query it and paste on the document the table i need. I did this from months and worked great.
But now portal have been upgraded and need to do login before use it. I have some amateur knowledge about some HTML, PHP, CSS but i dont get how to fill the username and password for this new portal.
I will copy part of the code from portal that i think is the key:
<SCRIPT TYPE="text/javascript">
<!-- Comment out script For old browsers
Function setFocus()
{
document.forms[0].ssousername.focus();
};
window.onload = setFocus;
//-->
</SCRIPT>
<NOSCRIPT>
</NOSCRIPT>
<TABLE WIDTH="90%" BORDER="0" CELLPADDING="0" CELLSPACING="0">
<TR>
<TD>
<BLOCKQUOTE>
<BLOCKQUOTE>......
View 9 Replies
ADVERTISEMENT
Feb 24, 2008
I have been looking for some VBA code that simple, when it runs, opens a browser and a specific, hard coded website. Is this possible in VBA?
View 2 Replies
View Related
Mar 5, 2008
I am currently using the following code in order to open a web page by clicking a button:
Private Sub Timetable18_Click()
ActiveWorkbook.FollowHyperlink Address:="http://journeyplanner.tfl.gov.uk/user/AHF/JP15__00006e8e.pdf"
NewWindow = True
End Sub
However, when this is executed it returns the following error:
Run-time error '-2146697210 (800c0006)':
Method 'FollowHyperlink' of object '_Workbook' failed
Clearly, I'm doing something wrong. I wondered if it had anything to do with the fact that the webpage I'm trying to open is a pdf and not html or similar, but this doesn't appear to be the issue.
View 4 Replies
View Related
Oct 29, 2008
I have a worksheet that changes in length. There is a formula that calculates how many pages the sheet will be. The also is a print button on the sheet that will print a coversheet "Sheets("Title")" and then it is supposed to print the data on the second sheet. Below the code I have so far... I know I am missing something, but knowing very little about macros I just can't seem to figure it out.
View 2 Replies
View Related
Apr 26, 2008
Filling in a webform using the code below, works fine until I add a bit to set a Value to a field name that comes from a Radio Button. I'm presuming its because it doesn't actually select the Radio Button (as seen when I step through, you can see all the other values/fields update). Updates the page with all the other values correctly updated except for changing the Park Status.
With WebBrowser1
.Navigate NMCURL
Do While .Busy: DoEvents: Loop
Do While .ReadyState <> 4: DoEvents: Loop
With .Document.forms("CFForm_1")
.PageAction.Value = "Enter"
.SelectedCallID.Value = TicketNo
.lastactionby.Value = UserName
.ActionType.Value = ActionType
.Description.Value = Description...................
View 2 Replies
View Related
May 21, 2009
I have a report that I use and right now I have a command button that prints the report x2. What I would like to do is to have it print one in color and one in grayscale. I could do this I think with two different buttons, but I would like to utilize just one. I tried creating a macro but it did not pick up the fact that I changed the properties to black and white.
View 2 Replies
View Related
Apr 9, 2008
I am trying to dynamically add controls to my user form based on some values in my cell. I am successfully able to create a text box dynamically but my label is not getting displayed. here is my code
Private Sub UserForm_Activate()
On Error Resume Next
If (ThisWorkbook. Sheets("Sheet2").Cells(1, 8) <> "FALSE") Then
Dim ctl As Control
Dim ctl1 As Control
Set ctl1 = Me.Controls.Add("Forms.Label.1", ctl1, True)
With ctl1
View 9 Replies
View Related
Mar 31, 2009
I'm missing something in my UserForm initialization code. If I fill the form out once and click 'OK' (run the code to put the form data into a sheet), when I go back into the form all the old info is still there. If I then click 'Cancel' (Unload Me) and reopen the form, the old data is cleared out. What am I missing to make it clear it out the first time?
View 2 Replies
View Related
Aug 6, 2008
I'm working on automating a task in internet explorer with excel. A webpage contains a form with fields. The fields have different names. I have a loop that figures out name of the field and the value I want to put into it. This is what im tying do do:
Dim myString As String
myString = "myField"
ie.document.forms(0).myString.Value = "hello"
View 2 Replies
View Related
Nov 8, 2008
On a user form I have added a multipage Object. It has 5 pages. How can I have each page caption read "Name" Comments where "name" is pulled from a worksheet field (say Questions!C2).
So the Caption needs to pull from a field and be concatenated with the word "Comments"
View 5 Replies
View Related
May 7, 2006
I have a userform1 with multipage 1 which has 5 pages. Is it possible to select page 1 from a label on page 5. I have the following code assigned to label 18 on Page 5 but I can't get to Page 1. In fact, the code does absolutely nothing.
Private Sub Label18_Click()
MultiPage1.Value = 0
End Sub
View 9 Replies
View Related
Feb 13, 2007
I have a UserForm with a MultiPage form on it. Page1 is a totals page with 3 TextBoxes. Page 2 and counting are item pages. Each page also has 3 TextBoxes (nutrients for that item).
Purpose is to add all of the values in the first TextBox on pages 2 + and place the total into the first TextBox on page 1. Repeat this for the other two TextBoxes.
The problem is that I have no way of knowing how many pages I will need!
Is there a way to add a new page to the MultiPage and copy all of the formatting and controls from the formerly last page on to it? I would like to do this with an "Add" button.
View 9 Replies
View Related
Jun 29, 2007
I need a macro that will print a hidden page that is linked to the page I have active.
It needs to be able to find the correct hidden page that corresponds to the active page because there are multilple pairs of the hidden/visible pages. The name of the hidden page is the same as the visible one with "printout" added to the end. When created, the sheet code names are sheetn and sheetm; n and m being consecutive numbers.
View 3 Replies
View Related
Apr 10, 2009
I have created a form that pops up using a macro when the form is opened. It is a simple form that uses optionbuttons in a group to select Intl or Dom.
Problems:
1) How do you get the form to close once a button is selected?
2) The user can close the form without selecting a button (the X at the top).
3) How do you get the data selected onto the excel spreadsheet?
View 9 Replies
View Related
Jun 9, 2009
When I view a sheet under Page Break Preview, it shows the Page numbers in the centre of the Page. While I am aware that it would not print the page number I was wondering if there is an option to remove/hide the page numbers.
View 3 Replies
View Related
Jun 17, 2008
I have the following code in Usertransfer and I actually want to Launch the userQuestions Form and Automatically Click the Prev Button? How can I achieve this?
Do I need to make things public?
UserTransfer
Private Sub CmdCancel_Click()
Unload Me
End Sub
UserQuestions
Private Sub CmdPrevQuestion_Click()
If m_QID = 1 Then..............
View 9 Replies
View Related
Oct 30, 2008
For some reason the following code creates a blank page everytime. Is there a way to have it not do this that I am not seeing?
View 2 Replies
View Related
Oct 13, 2006
i am trying to make excel open a web page then naviagte to a link. I know how to do this if the link has the same address all the time using
Set ie = CreateObject("InternetExplorer.Application")
With ie
.Visible = True
' Go to web page
.navigate [url]
Do Until .readyState = 4
DoEvents
Loop
but how could I navigate to a link which continually changes.
for example on a web page the link always shows "report", but the actual address may changes say every hour.
Is there a way to navigate to what ever address sits behind "report"
View 9 Replies
View Related
Sep 16, 2006
I need to build an Excel application that allows a user to select and download files from a website. The files change daily. Is there a way in VBA to obtain the current list of files that are available for downloading?
View 4 Replies
View Related
Apr 27, 2007
I have a task that pulls out information from the website. I need to write a vba code to find the last row. Since the no of rows are always not the same. I would need the excel masters help to solve it. Just a small piece of guidance would also help me.
In my work sheet I need to find the word " Function Name: Cleaning" if this is there then I should find the occurence of the word " name". If I find that then the code should copy the values in the column after name till it sees a space ( means no value). Should copy till that and paste that in another work sheet.
View 9 Replies
View Related
Oct 24, 2011
The issue I am having is that the code fails if there is ever a "sheet2" left open. I need it to always target the sheet Data5m.
What seems to happen is the sheet targets the first available sheet. This book only consists of 1 sheet, but generates other sheets later, sometimes extra sheets are left open.
Microsoft Excel Objects - This Workbook code
'The following is for the Userform DataReport code
DataReport.ComboBox1.Clear
Columns("N:N").Select
Range("A2:HX29921").Sort Key1:=Range("N2"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Data5m.Range("A1").AutoFilter
Call FillCombobox(Data5m.Range("N2", Data5m.Cells(Rows.Count, "N").End(xlUp)), DataReport.ComboBox1)
DataReport.Show
End Sub
Forms - DataReport
Code:
Private Sub ComboBox1_Change() 'was A, now N
DataReport.ComboBox2.Clear
If Data5m.FilterMode = True Then: Data5m.ShowAllData
Data5m.Range("A1").AutoFilter field:=14, Criteria1:="=" & DataReport.ComboBox1.Value
Call FillCombobox(Data5m.Range("X2", Data5m.Cells(Rows.Count, "X").End(xlUp)).SpecialCells(xlCellTypeVisible), DataReport.ComboBox2)
[Code] ..........
View 1 Replies
View Related
Feb 12, 2010
I am looking to read the source code for a website that keeps the stats for a hockey league in Sweden
For other sites i can use the code below and it works fine, but the site i am using to get the Sweden stats seem to keep the data in some type of a Java app (sorry still somewhat of a newbie) and doesn't work the same as the others
when i veiw the source code just by right clicking the page all the data i want shows up. When i try to use my code it doesn't get the stuff i want.
I have tried both objDoc.body.innerHTML and objDoc.body.outerHTML and i get different results but not the same as right clicking on the page and viewing the source, is there another command that i can use to get it all?
the website is
HTML [url]
Sub Get_Stats()
Const strURIpre As String = [url]
Set ie = CreateObject("internetexplorer.application")
ie.Navigate strURIpre
Do
If ie.ReadyState = 4 Then
ie.Visible = False
Exit Do
Else
View 9 Replies
View Related
Jul 6, 2009
VBA Code To Activate/Press Button On Web Page. press a button on web page using VBA
View 4 Replies
View Related
Aug 11, 2007
I would like to know what code I should use that would do the following:
I have a form that has a command button called "OK", when I click on the button I would like the code to run another form that I have.
View 9 Replies
View Related
Nov 28, 2006
I need to remove all existing page breaks in a document and add a page break every 72 rows. I've tried some similar codes from this forum with other functions that I don't need in it.
View 7 Replies
View Related
Mar 5, 2007
Find, View, And Replace Values With A Form
Mr.Bill provied a help by submmiting an example... i liked the example and i did try it. the example is NOT complete.. i would like to do
1. delete option [ i did it but when i did it delete the whole rows then i retype the columns again ]
2. to filter the data which are approved in another sheet
in case you did get my questions pleasae do download the [Tracker-Suggestion. zip ] in this link Find, View, And Replace Values With A Form
View 8 Replies
View Related
Mar 24, 2014
I'm looking to populate a series of sequential codes based on a code prefix.
Sheet 1: Master Code list
Column A = Lookup Value
Column B = Code Prefix
Sheet 2 - Results page
Column A - list of lookup values - sorted in value order - The number of occurances varies for each value
Column B - Results list
I want to populate Column B in the second sheet with a sequential code list for each different value in column A. So for the first value it would have the prefix then proceed numerically (Prefix0001, Prefix0002, Prefix0003...) then for the next value its prefix in sequence (2ndPrefix0001, 2ndPrefix0002, 2ndPrefix003...), etc
I'm wondering if there is a way to do this all in one step or else if there is a way way to number each occurance of the lookup value in the second page, in which case the code can be concatenated easily by a lookup of the code.
I suppose on the back of this there is another query - is there a way to concatenate a number where the format is 000# where the concatenated value will retain the leading zeros? I've been trying and it is stripping them out.
View 2 Replies
View Related
Jun 12, 2009
Whats the VBA code for transfering selections on a multi select list box to a page.
ex. the list box has selections from 1 to 20 and I want to select 3,4, and 5
then on the page I want it to say 3,4,5
View 9 Replies
View Related
Nov 14, 2008
I'm playing with simple UserForms to get the hang of VBA. I was trying an example for the help files (Using xl2K), and this isn't working. My first challenge was figuring out that I needed to 'create' a UserForm to begin with.
View 2 Replies
View Related
Jun 8, 2009
I have a spreadsheet with about 30 charts on it that I would like to attach a macro to which opens the chart in a form. I've figured out how to do this last part, but am stuck on how to pass a variable to the form code which tells excel which chart to copy. Essentially what I'm doing creating a macro for each chart which would run when that chart is clicked on. This macro is identical for each chart except for the name of the chart being passed.
Sub Chart1_click()
ShowChart "Chart 1"
End Sub
Sub ShowChart(c As String)
frmChart.Show
End Sub
In the UserForm_Initialize code located in the userform module, I'd like to call the code which saves and loads the image of the clicked on chart. But here's where I'm stuck. How do I pass c to the code in the form module...e.g, how to pass c to UserForm_Intialize and to ChartZoom? Here's what I have so far...
Private Sub UserForm_Initialize(c As String)
ChartZoom c
End Sub
Private Sub ChartZoom(c As String)
frmChart.Show
Dim Cht As Chart
Set Cht = ActiveSheet.ChartObjects(c).chart
Dim CName As String
CName = ThisWorkbook.Path & "cht.gif"
Cht.Export Filename:=CName, FilterName:="GIF"
imgCht.PictureSizeMode = fmPictureSizeModeZoom
imgCht.Picture = LoadPicture(CName)
End Sub
View 9 Replies
View Related
