Is there a way to copy the information in a Windows Explorer page into Excel?
For example, for any given folder or sub-folder in Explorer, I'd like to copy the NAMES of (i.e., not the file itself or the contents of the file) FILENAME, SIZE, TYPE, MODIFIED date, etc..
The following 3 macros do the following.
1st macro . . . When the button is clicked for this macro, Windows Explorer is opened and the folder MyMenuFiles is selected. Works Fine.
2nd macro . . . When this button is clicked, the windows explorer opens with My Documents selected. Works Fine.
3rd macro . . . THIS IS THE PROBLEM ONE. When this button is clicked, windows explorer opens, with the C: drive selected. I want My Computer selected.
I'm sure this is really easy, but I'm learning and not having luck in the search option for previous posts. Thanks for your patience in advance.
I want to open a windows explorer window by using a button in Excel.
how to launch windows explorer from a path that resides in a cell using the code below.
Sub LaunchWindowsExplorer()
Dim PID As Double
Dim strRootPath As String
Const strExpExe = "explorer.exe"
Const strArg = " " '" /e,/root, "
'// Change rootpath here
strRootPath = "J:MyDirectoryWilliams,Bob 7264"
PID = Shell(strExpExe & strArg & strRootPath, 1)
End Sub
The problem I have is that once I have done this a number of times (probably somewhere between 80-100 times then I notice windows explorer starts to play up as if running out of memory. A reboot soon fixes that, however, I was wondering if there is anything I can add to the code to keep it from hogging up memory...if that is even possible.
When I say 80 - 100 times, I don't mean opening up 80 - 100 instances of windows explorer. I mean launching windows explorer, moving some files then closing that instance of windows explorer. Then coming back into excel and repeating that process.
Perhaps, this question is much more related to Windows API but I thought of posting it here incase I get some more ideas.
I am looking forward to develop a program wherein I can prevent or avoid an Excel file being overwritten by a different file with the same name in the same location in windows explorer.
After a rapid search on the internet I have got something which I could use but that would just serve me the purpose of retreiving the overwritten file in windows explorer.
I am trying to launch windows explorer from within excel vba. The routine below is borrowed from another post on this site and modified for my purposes.
Sub LaunchWindowsExplorer()
Dim PID As Double
Dim strRootPath As String
Const strExpExe = "explorer.exe"
Const strArg = " " '" /e,/root, "
'// Change rootpath here
strRootPath = "J:MyDirectoryWilliams,Bob 7264" ..............
What's the code for opening a Windows Explorer window from within an Excel Macro?
View 7 Replies View Relatedi use excel 2007, it s slow to open a file by double-clicking and entering from windows explorer, by googling i fould a fix by adding "%1" at the end of command in "Application used to perform action" (folder options/file types/xls/advance/open). however, to open files in the same instance, i have to keep "DDE message" with [open("%1")]. With both "%1", excel now opens twice.
How to fix it?
Does anyone know the command in VBA to print the current Internet Explorer page? I was exporting it to Excel to print, but I could save time if there is a command to activate the print button.
View 9 Replies View Relatedhow to go back to previous page in internet explorer using vba.
View 2 Replies View Relatedhow to reference cells in 1 page from another and understand basic formula's, and would appreciate any input on how or if i can acheive what i'm trying to accomplish.
I have a worksheet with say 100 rows of information, it is a list of materials to go into a construction job. the columns to the right of the description calculate volume/quantity etc and produce a cost for the item. what i want to do is have a summary page that only lists the items that are being used, not all 100 items are in every job and i dont want to have to print the whole list with a bunch of empty values, which will just waste paper and ink. I'd like to enter a value in a cell or setup a check box or something that i could somehow use to then list that row or a part of that row of information on a seperate sheet, for a nice concise, easy to read list of job materials. i would like to do produce 1 sheet with the cost associated with the item, and one without cost.
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 RelatedI have an Excel Addin that I deploy as a read-only addin on a server share. I instruct my co-workers to add the Add-In as they would any other Add-In, but I tell the to answer NO to the Windows question "Copy 'AddinName' to the Addins folder for John Doe?".
That way, everyone will be working with the server version of the addin, and any time I want to roll out an updated version I just place a new addin file on the server. The next time the users restart Excel, the new version is loaded.
Except users never follow directions and some of them click the default 'Yes' when asked and get a local copy of the addin and never receive updated versions of the addin.
How do I disable the "Copy Addin" question completely? I don't want to depend on the user. I know this is possible because I have this 3rd party addin that we use that is installed from c:Program Files and it just stays there and you're never asked to copy the addin when you install it in Excel.
I am a novice when it comes to excel, but I have a project due at work where I need to search out correct addresses and copy and paste them into the cells where the incorrect info already exists. Here is my problem, I have been working on this no problem for about a week now and today all of a sudden when I copy the text from my search result on google and try to paste it into the cell, it pastes the google link, instead of the text I copied. It does this for the entire row but will not do it for row after row, I might be able to get the next 5 or 6 rows to accepet the correct text, and if I try to just type the info in, it appears as a clickable link.
I cannot figure out what I did, if anything or how to fix it so that I can get this work done.
I'm working on this sheet and i'd like to copy information from row "i,i", insert a new row below it and copy that information to the new empty row.
View 6 Replies View Related=IF(Week1!G38>Week1!G37,1,0)+IF(Week2!G185>Week2!G186,1,0)+IF(Week3!G111>Week3!G112,1,0)+IF(Week4!G111>Week4!G112,1,0)+IF(Week5!G111>Week5!G112,1,0)+IF(Week6!G186>Week6!G185,1,0)+IF(Week7!G186>Week7!G185,1,0)+IF(Week8!G75>Week8!G74,1,0)+IF(Week9!G112>Week9!G111,1,0)+IF(Week10!G223>Week10!G222,1,0)+IF(Week11!G38>Week11!G37,1,0)+IF(Week12!G222>Week12!G223,1,0)+IF(Week13!G111>Week13!G112,1,0)+IF(Week14!G149>Week14!G148,1,0)+IF(Week15!G112>Week15!G111,1,0)+IF(Week16!G75>Week16!G74,1,0)+IF(Week17!G111>Week17!G112,1,0)
Now all I want to do is copy this info from cell C8 to D8 but with the exception that I want to change the > to
As you can see this macro copies a worksheet from one workbook to a new one. It is 14 columns wide by just under 700 rows long. I am losing information out of cells all over the place.
ChDir "H:HOMETIMCEXCELCOUPON_COUNT6_JUN"
Workbooks.Open Filename:="H:HOMETIMCEXCELCOUPON_COUNT6_JUNJUN_2006" + ".xls"
Calculate
Sheets("MONTH_END").Select
Sheets("MONTH_END").Copy
Cells.Select
Selection.Copy
Range("A1").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False .........................
I have a workbook that has close to a hundred sheets in it (see attached). I need to know how to get all of the information onto one sheet in separate columns like this: EMPLOYEE NO| HIRE DATE| NAME| VAC AMOUNT|WEEKS|VAC DATES| # OF HOURS|AMOUNT|PPE
If you review the attachment you will see how the sheet is read from left to right, so I would need the have the information in that order.
Is there a way to copy page setup settings from one workbook to another in VBA?
Example, I have a spreadsheet with 5 tabs with each of them different page setup options.
I have a second spreadsheet with 5 tabs where I need to make the page setup the same for each tab as the saved spreadsheet #1.
Background: This is a workaround for not being able to do copy/paste special values for pivot tables. My workaround is to save an .xlsx as a .mht then reopen and save as .xlsx. The only problem is that I lose page setups through the process.
Is there a way to copy page setup settings from one workbook to another in VBA?
Example, I have a spreadsheet with 5 tabs with each of them different page setup options.
I have a second spreadsheet with 5 tabs where I need to make the page setup the same for each tab as the saved spreadsheet #1.
Background: This is a workaround for not being able to do copy/paste special values for pivot tables. My workaround is to save an .xlsx as a .mht then reopen and save as .xlsx.
I need to move data from "2010" page to page "sheet 1 (2)" so I don't have to double chart.
I want to be able to retrieve data in columns w, x, y, z, ac, and ad, on page 2010 and place them respectively in coloumns I - N on the correct row. (the row that matches the right name)
I dont' know how to do this-I don't know if it complicates things that 2010 has breaks in the data (each month has totals and are broken up. ) can anyone help?
I believe I have xcel 2003 if it matters.
Here's all I'd like to do~I'm a small business owner and I need to create an excel list of potential work contacts. The contacts are listed on a web page like this
aerographics Los Angeles 310. 240. 3308
Now, on the web page if you click on aerographics it takes you to the website. I'd like to copy and paste those same three entries from the webpage in to an excel sheet~and be able to click on aerographics and have it take me to the site. I searched this site and couldn't find the problem replicated. I've tried paste special~it formats the entries I want as URL's, but when I click on them nothing happens. I can type www.googl.com in to a cell and it instantly works as a link. And I have about 500 of this type entry/copy and paste to do so making a hyperlink is impractical.
search sheets by the name of cell , like name would be 17012-23-12-45 i need search by the first 5 letters 17012 , because sheet name 17012 , it would be for a lot of sheets so i need to do it automaticaly , and then that specific sheet has been found i need to copy table from there and some pictures in there
View 4 Replies View RelatedI generate several reports, all saved as seperate files, with the same page settings (margins, headers, footers, etc.). Is there any way to copy these page settings from one file to another so that I don't have to enter the settings seperately for each file?
View 13 Replies View RelatedI am in need of a macro that will:
1. Check cell B1 for my named regions
2. Find all citys in that region from another worksheet
3. Copy the specific details
4. Highlight the information that has just been copied and create a bar chart for comparison
Data to be picked up from "Inc 8%" sheet.
Headings are the same on both the worksheet the information is being taken from and being pasted to.
I need City, Year 1 Turnover - Year 10 Turnover data to be copied.
Region Help.xlsm
I've been trying to code a macro that will select a worksheet (that has formulas) to copy just the values into a new workbook. I want the page setup data to also be included. It seems that if a select the workbook and do a copy, it includes the formulas. If I select the cells, then do a paste/special values into the new workbook, the page setup is the default one. Each worksheet that I want to copy/paste has different page setup values and I'd like to be able to carry over the page setup. Otherwise, I have to have code to do all the page setup in the macro. There are over 20 worksheets and it's slow.
This code does the copy/paste special but no worksheet page setup is included
Worksheets("Data1").Range("A1:E22").Select
Selection.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveWorkbook.SaveAs Filename:= _
"U:My DocumentsLearning VBA filesTestNewWorkbook.xls"
Windows("ProjectFilesChapter07 test.xls").Activate
I want to add a button on my Worksheet that will basically copy the last portion of the sheet (about 40 lines) and insert it at the bottom of the sheet (above the button). Each time the button is clicked, the last 40 lines will be copied and pasted. The script also sets the page break to the appropriate line. To achieve this, I've set up a hidden sheet that contains the line numbers and last page number. The script accrues these numbers every time the script runs.
I realise there may be a better way to do this, but at this point I'm trying to stick to what I know. I'm trying to use the function Row().Select, and I keep getting an Error 13. Example of my
Sub AddPageTest()
Sheets("SetPoint").Select
Dim CopyRows As String
CopyRows = Range("C13").Select
Dim InsertRow As String
InsertRow = Range("C14").Select
Dim SelRange As String
SelRange = Range("C12").Select
Dim LastPageNum As Integer
LastPageNum = Range("C5").Select
Dim NewLastPageNum As Integer
NewLastPageNum = LastPageNum + 1
Dim LastPageBreak As String
LastPageBreak = Range("C15").Select
Dim NextPageFirstRow As Integer
NextPageFirstRow = Range("C4").Select + 1...................
transfer data from several sheets to a master data sheet. The problem I am having now is there are couple blank cells. My code just ignore the blank cells on the master data sheet and paste next to the last cell with content. For example I attached a test excel. with my code. I want to leave the blank cell as it is to keep the same product in one row. below is my code.
VB:
Sub Copypaste()
'
' Macro8 Macro
For Each ws In Worksheets
[Code].....
I am a complete amature at Marco's and formulas. I have been trying to create what i need but i am unable to get it to work. I have a worksheet named "Course dates incl. pursuit" which has a table which runs from B7 to J144 in the table it has date, number, name, location, job, area, notifified, on system and passed?. in that order. I want if the passed column which is in J if that has a Y in it to copy and paste into another worksheet on the next avaliable line, worksheet name "Master."I would like it in a slightly different order if that is possible they have the same titles on the table but would like it to go number, name, location, job, area and date. Running from B5 to G(end of spreadsheet). That is the main part i would also like to to copy and paste into another worksheet if the answer is "N" but the above part is the most important part. Due to the computer settings i am unable to attach it
View 6 Replies View RelatedWhat I would like a macro to do is take information from cells A1 to P1 on sheet1 and add them to the table in sheet2 and then I can save the workbook. The information in A1 to P1 is taken from other cells around the workbook. Once the information is in sheet 2 I can delete or change the informtion in sheet 1 without it affecting the copied information in sheet 2.
The next time I open the workbook I can enter the information in cells A1 to P1 on sheet1 then run the macro again and will then take the information and add it to the bottom of the table in sheet2 underneath the previous information that had been added - obviously the source of this information will now be deleted.
I will need to do this again and again building up the table in sheet2. The table will also use columns A to P like in sheet1.