Copy Web Text / Source?
Oct 29, 2009
The problem is, these identifiers are in no discernable or predictable pattern. I cannot open the page directly in excel, nor can I use the Import Data from Web function (2007) ... results are simply a blank page.
What I thought I could do, then, is automate the procedure that obtains the source code, which I can parse and look for the current date. Once I have the line with the current date, I can extract the unique identifier, then paste it back into a string and resubmit to the browser.
I just can't figure out how to get to the source code... anybody out there have a way to get to it? Since this is going to ultimately be distributed to 20 or so analysts in different countries, I don't think I can use other tools (like the HTML Extractor from Iconico).
View 2 Replies
ADVERTISEMENT
Jul 14, 2006
I have a workbork for employee time keeping. I have designed an Input Box that has 15 text boxes (7 diff hour types, 2 weeks, one total box). I have everything working properly except I want to make the control source relative. When the user clicks on a name of an employee (A column), then clicks the macro button, the Input Box appears. I need the text boxes to be linked to the cells E:S on the same row as the active cell. I've tried typing in ActiveCell.Offset(0,4) and variants of it, but all are rejected. How can I link the text boxes using active cell and offset?
View 8 Replies
View Related
Dec 10, 2009
I am sure this is simple but cant get me head around it (tried paste & paste link).. I am wanting to copy formulas in file (A) to file (B) with data source linked in the file (A).
i want is when i copy the formulas to file (B) sheet 2 and it should retain the original path say H:excelfile A[sheet1]$G$1+....xls and source from which the data is being used.
View 7 Replies
View Related
Feb 5, 2008
I would like to be able to navigate to a site and save the source text of the html into a text file.
View 3 Replies
View Related
Sep 22, 2007
I would like to copy cells from one worksheet to another, but have the cells that I paste link to the original document. Is there an easy way to do this?
So if I'm pasting from worksheet A into worksheet B, I would like worksheet B to link to worksheet A.
View 9 Replies
View Related
Sep 23, 2007
I am try to copy a worksheet "exactly" from one workbook to another, i.e. all formulas and range names reference the new workbook and not link back to to the workbook they were copied from. The code below brings the formulas and named ranges over still referencing the source workbook: SourceWB.Sheets(sht).Copy after:=TargetWB.Sheets(sht)
View 3 Replies
View Related
Oct 21, 2009
I need to check a website daily to see if a link has been updated. If it has been updated, the beginning of the link changes to a different date. Example: today link is www.10212009dave.com and tomorrow link may be www.10222009dave.com. Lets say the link is on www.gugg.com. The link does not change everyday, but I think a good way to see if it has been updated is to search through the source code in the html for that link.
Thus I would put www.10212009dave.com into cell A1 and tell excel to search the source code on www.gugg.com, and if the contents of cell A1 is NOT found, I'd display a message box stating the link has been updated.
View 9 Replies
View Related
Feb 21, 2008
I have 2 sheets in one workbook; one sheet has a chart with a data table, the other contains the source data for the chart. I want to copy and move the sheet with the chart to a new workbook, but without the source data. I break all links, but then the chart's data table takes the default values and formats in the new workbook after I break the links. For examples, the source data has formats such as currency and no decimal places. However, after copying the sheet, the data table reverts to no dollar sign and decimal places. In addition, the months on the x-axis turn to numbers when the links are broken.
View 3 Replies
View Related
Nov 29, 2007
I work in my Client's office and assist in settling construction disputes. Part of this work is to browse/search their server for documents that may assist in strengthening their case.
During this review I have found an excel document which is a text-only version of a pivot table, ie someone has done a copy, paste special, values into this sheet. I need to extract the original source data from this table back into the list format, as the original source of the data cannot be located
The row titles on the left are activity descriptions, the column headers are dates and the data in the body of the table is hours. As an idea of size the data is spread over 213 columns and 45 rows. Their are more blank cells in the table than entries.
What I would like to do is create the data in it's original form ie
Column A; Date
Column B; Activity Description
Column C; Hours
and have a separate row for each instance of an entry of hours from the pivot table.
View 9 Replies
View Related
Oct 27, 2011
I have a source data sheet that has around 50 columns. I want to copy and past selected columns to a destination sheet.
View 1 Replies
View Related
Apr 26, 2012
I have created a pivot table in a workbook which relates to data from 2011 - 2012 and this works perfectly. What I now need to do is to copy the pivot table (without the data source) to a new workbook for data which will be collected from 2012 - 2013. Unfortunately when I copy it and try and find the new data source it does not update the filters according to the data in the new workbook.
View 5 Replies
View Related
Oct 2, 2006
I have a source sheet which contains data. Within this data there is a column (column 3) called Name and I would like to take the data from this sheet and paste it onto a new sheet but in grouped format. So take all instances where it finds criteria 1, then 2 and so on and just paste it on a new line each time it finds a criteria. So far I have the following code to search
Sub loopy()
Dim rngTemp As Range ' the range variable declaration
Dim intCounter As Integer 'counter as integer
' the following loop goes through all the cells in column a up until the last used cell in the column
For Each rngTemp In Range("a1", Range("a" & Rows.Count).End(xlUp))
'increment the counter if the cell has value fridge
If rngTemp = "Fridge" Then intCounter = intCounter + 1
Next rngTemp
MsgBox "There were " & intCounter & " cells equal to Fridge"
End Sub
View 2 Replies
View Related
Jan 24, 2008
Sheet1 contains a chart using a dynamic name in Source Data: Values. The dynamic name data is controlled by another cell. When I copy the sheet - i.e. Sheet1 (2) - and change the control cell, the Source Data: Values in the copied sheet still refers to the original Sheet1.
View 3 Replies
View Related
Mar 5, 2013
I have data. 2 columns a2:b5
each row has a different font color
apple 4
banana 3
peach 2
pear 1
I want the label in a chart to march the font color of the source cell
So in a chart I'd have 4 labels:
"apple"
"banana"
"peach"
"pear"
I can't see how to do it. When i select the albels it's "all or none". I can change ll the labels to a color. But, I want each individual label to be a diferent color.
View 3 Replies
View Related
Apr 1, 2009
Not sure if this can be done, still a rookie at this stuff. Everything works but can something be wrote into code too change list source?
View 5 Replies
View Related
Nov 7, 2008
I have a protected template and unprotected source worksheets - - - what I would like to happen is for the macro to start and if the source worksheet cell B3 equals "Report Total" then stop - otherwise copy template worksheet then copy 6 specific cells from the source to paste values to specific cells on the newly created worksheet (B_ to C7, D_ to I7, E_ to C9, F_ to K9, A_ to C11, M_ to K11 and then K13=F13-30)
After that then start all over again unless the next row’s cell (B4, B5, B6, . . .) is "Report Total" then stop - - - the row count could be from one to a couple hundred.
Here is what I have so far but I know that with each copy the name will change and as it goes down the source file each row will change and I also need help with that.
Sheets("ee template").Copy After:=Sheets(3)
ActiveSheet.Unprotect
Selection.ClearContents
Range("I7").Select
Selection.ClearContents
Range("C7").Select
Sheets("source").Select
ActiveCell.Offset(0, -11).Range("A1").Select
View 9 Replies
View Related
Jun 12, 2014
I need to back up files, which may be excel or MSword, by copying them from different directories, say C: to the backup directory, say X:. any vba to backup the files? I expect the vba can copy all file listed in column A.
E.g. C: est1File1.xls or C: est2File2.doc, and then pasted to the directory in column B. e.g. X:BackupFolder1 or X:BackupFolder2.
View 1 Replies
View Related
Aug 12, 2009
I need to copy a range of values (actually two ranges). The ranges are of fixed size. Le't say A2:D20 and E2:H20.
Both workbooks have the exact same layout, and they both have the same named worksheet (in this case it's called Entry). However the actual filename of the source workbook is unknown. I know numerous users have changed the filename of the xls file.
I want to instruct them to open the old and new workbook, and open a third workbook containing the copy macro, they run the macro and it copies the data.
How can I reference a known worksheet name but of an unknown workbook name esp when the source and destination share the worksheet name?
View 3 Replies
View Related
Sep 7, 2006
I have a report that was created for 2005 that contains two worksheets: a "source data" worksheet and a " pivot table" worksheet. I cleared out the 2005 data in the "source data" worksheet and replaced it with 2006 data...after this I refreshed the Pivot Table and everything seemed fine. When looking at the file size I noticed that it was almost twice its original size....upon further investigation I found that the Pivot Table was internally holding onto the old source data (the "Show" functionality of the rows/columns in the table lists the 2005 row/column headers as well as the 2006 headers....even though no data from 2005 is shown in the Pivot Table).
Does anyone know how to purge the old data from the internal Pivot Table memory?
I hope this is enough information....let me know if you need more.
Thanks in advance for any help,
Jon
View 9 Replies
View Related
Jan 17, 2013
I'm having a 6000+ records, (contacts DB) exported in Excel 2003 format from MS Outlook.
Except the "First" and "LastName", all other contact elements are in the field "Notes" (which is the BZ column according to the exported outlook layout) multiplied by 6469 (records in total)
Useful information are included !!!
I'll give an example of a record...
Column: BZ, Row: 543 says --> "2110000000-6989000000, 1TOK_TER:17-11-010(25 DAYS LESS),
KATERINA 25 (MANTAS KALNNNNN_HYPERTENSION)1000-150, W:95_105, , HR THE 16wks_US NEFRON OK,
NT OK_B EPIP OK(GOLF BALL)_KAMPILI ORIAKI(DIAITA)_DOPPLER OK, O+,TEST OK(TOX_), , , , , , "
Now, I want every time to take the part of the text says "TER:something..." (part of which is date, but not every time with the known format dd-mm-yyyy, as you see here is yyy, followed by something else, with parenthesis here and maybe more data) and copy it in a new cell..., e.g:CO Column, same Row...
Above and every field which by the way is formatted as General (and it is text mainly) are made by merging older excel fields where data laid here and there, that's why you see the commas...with the method of a module with the following code:
Function MyMerge(Rng As Range)
For Each Cell In Rng
Temp = Temp & Cell.Value & ", "
Next Cell
Temp = Mid(Temp, 1, Len(Temp) - 2)
MyMerge = Temp
End Function
Note1:Records with the above string (TER:dd-mm-yyy) are 771 from 6469.
Note2: As an alternative solution I can see an extraction of the TER:dd-mm-yyy string and the copy in a new place, like the:CO Column, same Row...
View 9 Replies
View Related
Sep 18, 2009
I have an existing spreadsheet with a column of strings (actually VIN numbers). These numbers correllate to a bunch of text files, that can exist in one of three folders (UsernameDesktop1, 2, or 3) on my desktop. What I need the macro to do is:
1) get the filename from A2 (A1 is a heading row)
2) Find the appropriate text file in one of the three folders
3) Put the folder name into I2
4) Scan the text file for some strings, and copy some data that follows those strings into J2:O2 (I can handle programming this)
5) Close the text file
6) repeat above for the remainder of filenames (about 1800 files)
View 3 Replies
View Related
Jul 17, 2014
I have one column full of Item #s and Descriptions. I have another column that I want JUST the Item# in it.
For example:
Column 1:
Gyroscope REF#1234 Bike Thing
Column 2 Should Be:
1234
Column 1:
BallWall Bikes Ret# 12456 Helmet Thing
Column 2S hould Be:
12456
I don't know how to do this (I do know how to do VBA mildly, and I am pretty good with formulas). I also have a database of every Item# that could be in that cell.
View 6 Replies
View Related
Jul 15, 2014
I have a spreadsheet where a cell equals another cell. but i want to convert it to a value.
how can i do that for a range of rows. i know how to do that for one cell.
Code:
If Range("B4:B25").Value = "" Then
Else
Range("B4:B25").Value = Range("B4:B25").Value
End If
View 6 Replies
View Related
Jan 17, 2008
Here is my dilemma: I am opening an HTML file with Excel. There are text boxes that appear in excel from the HTML file with text in them. I would like to write a macro to copy the text from each text box and paste it into a cell. I have attached the excel file with the html text boxes in question.
View 4 Replies
View Related
Jul 31, 2014
Here's an interesting one:
A1 contains a text string which is both bold and unbold (
B1 is blank
I need a macro which scans the cells with text and copies the BOLD portions of the text string into the adjacent cell.
Example:
A1
The sky is blue
Macro is run
B1
sky blue
View 11 Replies
View Related
May 22, 2014
I have a list of text quotes in column A. I then have column B which will have a Y entered if the quote is used in a presentation. I currently have around 100 quotes.
On a separate sheet, I want to be able to effectively say in one cell - If column B has text in it, copy the quote from column A. But the difficult part is how do I make this happen so that I can have multiple quotes being pulled into one cell?
View 11 Replies
View Related
May 27, 2009
I want to copy text to a new spreadsheet only if column A = "47"
The problem is, if I drag the if = formula down in a new spreadsheet, the data will have blank cells and will go down thousands of rows. I want the first "47" to be in the first row, the second "47" to be in the second row of the new spreadsheet and so on. Can this be done?
View 10 Replies
View Related
Apr 22, 2014
In a workbook I need to find all items belonging to a certain person and then copy those items to a new sheet, possibly separated by commas. To make it simple, see example :
Sheet 1 :
Fruit owner APPLEPEAR GRAPE BANANA
Fruit ownersJimJulia MirandaJason
JuliaMatthew MatthewJim
Sheet 2 : this is where I want to put the results
JimApple, Banana
JuliaPear, Apple
JasonBanana
MirandaGrape
MatthewPear, Grape
View 4 Replies
View Related
Jan 15, 2007
Below is the text that I use to copy AL if AJ is not blank:
If Range("AJ2").Value <> "" Then
Range("AL2").Select
Selection.Copy
Range("AL2:AL65000").Select
ActiveSheet.Paste
What I want it to do is copy the formula out of AL2 down to as many cells necessary to populate column AL as long as AJ is not blank. If AJ is not blank I want it copy AL2 down as much as needed to fill column AL. I currently have it running to AL65000 but don't want to leave the formula in that many cells. If there is nothing in AJ I don't want anything to be in column AL.
End If
End Sub
View 11 Replies
View Related
Feb 19, 2009
I am not familiar with using VBA and believe this could solve my problem, I would be glad of any assistance.
I am trying to copy text from sheet 1 of my workbook onto sheet two of my workbook, whilst consolidating into a nice neat list omitting any blank cells.
The text appears on multiple tables each table has 10 rows throughout worksheet 1
A1 = Good
A2 = Bad
" "
A10 = Fantastic
A15 = Good
A2 = Bad
A10 = Fantastic
I hope this makes sense, I do have a formula that will do this =IF(ROW()-ROW($E$500:$E$509)+1>ROWS($K$35:$K$44)-COUNTBLANK($K$35:$K$44),"",INDIRECT(ADDRESS(SMALL((IF($K$35:$K$44<>"",ROW($K$35:$K$44),ROW()+ROWS($K $35:$K$44))),ROW()-ROW($E$500:$E$509)+1),COLUMN($K$35:$K$44),4))) however I have multiple tables and the formula greatly reduces the speed at which the sheet is working.
View 12 Replies
View Related
