I've been trying to use combo boxes to open, then copy and paste information from specific worksheets the user requests. So far, my approach has been unsuccessful --and the suggestion to simply use the GetOpenFiles procedure was helpful but failed to address more than the "open files" part of my application. Can variables be part of an excel file address as I've tried to use them in the "strFile =" statement immediately below?
Public strFile As String
Public strSheet As String
Public strSheetName As String
I'm trying to create a lookup process for my address part of my invoice, I want it so when I enter the first address it automatically looks up and enters the rest of the information (Title, Name etc.) I've been trying to do this with vlookup and I can't seem to get it to work. I'm just getting #Ref! returned.
My address 'database' (list of addresses etc) are on a seperate sheet to the Invoice.
When I mouseover columnletter it shows "H" and when i mouseover avgRow it shows "2"... this info is right but I think the problem may be trying to combine a string and an integer value as a range. How can I do this so that celadr is the range H2?
VBA coding for automatically saving an excel file as another file using the current date as part of the file name together with "32ga" as a constant add-in. I also what this macro to run at a particular time of the day let say 00:20hrs. The excel file i want to save as is always open . It has data that changes every 24-hrs.
I need a VB code to open excel files located in a path (fixed path) by providing a part of file name through a input box for ex: I have some files located in my local drive as below
I'm getting an error here. Yr and State are variables defined by an inputbox. Is this not the proper way to write out a filename with variables in the mix?
Data Source= "P:Current Quarter" & Yr & "Files" & State & Yr & ".mdb"
Just wondering if its possible to create a macro which has an inputbox that gives you part of the file name that you would like to open. We have a report that is issued weekly and I'm trying make it so I type in the date of the report in the correct format and it opens the file (saved on my desktop). I don't want to have to go in and edit the macro everyweek to change the file name.
I have a macro to loop through the files in a folder. The macro will then open up the files and copy over to a new workbook.
As I want to rename the worksheets created in the new workbook as part of the file name. Any idea how to extract the file name out and stored in a string?
Currently it will be named after the Cell A1 in the opened file. However I would like to rename as below.
Example, the file name : 030309_Mary Sales.xls, Worksheet Name to Create : Mary Sales. File name : 030309_John King, Worksheet Name : John King
(in the code, 030309 taken from my menu sheet,D4 is the keyword , to search in files containing D4, where D3 is the directory to look in)
Sub RunCodeOnAllXLSFiles()
Dim lCount As Long Dim wbResults As Workbook Dim wbCodeBook As Workbook
I have one excel file and i want to see the VBA code without open excel file. because when i open that excel file automatic delete userform and save then open that file. i have a second copy of that file in that file there is a one other option to see and learn from it. 1.my computer security is High but when i open the file one userform is come and ask me about enable or desable the macro when i check the box that file is open and run properly.
and after that never ask for Enable or desable the macro, every time that file is open in high security without ask..security. for your information many vba code in that file. i have only one question how see the code without open that file ?
I want to create a web address for the attached file and then post the link on my football forum so that members can view the file in their browsers. Is it possible to do this?
I have forms by differnet departments each day. The files are saved as the department's name then date Byrd 82708.xsl. I need a command button that will pull data from three cells in each of these forms. The master list will not be in the same folder as the deparment forms, the cells are E20, f20, f25. I have a text box were the user will input the date, by this date I would like all forms with this date in that folder to have their data pulled from those three cells and returned in master list.
Split from Open Image Using A String & Cell For File Name. what it looks like, but maybe I am not using the FollowHyperlink correctly?
Sub testFloodMap() Application. ScreenUpdating = False Sheets("FloodMap").Select 'Picture = ActiveSheet. Range("W4").Value This works manually with the path in "W4" 'Now I tried to use the FollowHyperlink next Application.FollowHyperlink "C:Documents and Settingsjim hutchMy DocumentsNarrative1My Appraisals2009-" & Sheets("Base").Range("B2") & "floodmap.jpg" Sheets("FloodMap").Select ActiveSheet.Pictures.Insert(Picture).Select Exists = Dir(Picture, vbNormal).....................
1 I need to open a csv file in order to use data in it at location "C:BarkingEMCIN" to input into an xls spreadsheet. I then need to use the info from the xls spreadsheet along with other info input by users to produce another .csv and it be deposited at "C:BarkingEMCOUT"
The name of the file at "C:BarkingEMCIN" will change everyday or even multiple times a day and be in the format "AVA_DA_260208_BPL_EDF_001.CSV" "AVA DA " will remain the same "260208" will be todays date the next 2 will be interchangeable depending on requirements and use BPL EDF and SSE will be interchangeable depending on requirements and 001 will be the version whcih will be changable. _ underscores will be used as seperators
They will then be save in the format "NOM_DA_260208_BPL_EDF_001.CSV" using the same prinipals as before but automatically saving as the next available when needed with a prompt to tell the user what it will be
I get pdf files from my UPS carrier and need only a certain part from the text to import into my administration. Sure I can convert the pdf into text and import it into exel that way, save it into xls or csv and you are in but... is there a short cut? Since you can select and copy a part of a pdf file I wonder if it is may be possible to do so within a macro as well no? Is this a crazy question? because I could not find a similar question by searching the forums. May be I was searching for the wrong subject.
the Data Grabs and pastes perfectly now but the Macro copies the data from the open file - the problem is that every day the filename (eg stats_01_02) changes according to the date so what I want to know is how to have the macro copy the data from an open file using just the first part of the filename.
i made a macro that uses a form with a "browse" button to open a text file and put every word in this textfile in a single cell but i had a problem when copying the address of the file to a textfield, here's the code :
I have a list of about 300 addresses that I'd like to be able to put in a sortable state. In column A1-A4 is the following:
Name Street Address City, State Zip Email Address
Then there is a blank row and then the next address. What I would like to do is figure out a way to take the info in columns A1-A4 and move them horizontally to A1, B1, C1, D1, respectively. Sure, I could cut and paste, but it would take me forever. I tried a macro,
I have 800+ files the problem is that the file name ends in 80 different combination so I need to try all of those for each file.
eg: one of the 800 is "109 st no 103 av" the file could be called: "109 st no 103 av nb1_cleaned.xls" or "109 st no 103 av nb 1_cleaned.xls" or "109 st no 103 av nb 1._cleaned.xls" or "109 st no 103 av sb1_cleaned.xls" . . . .etc
I wrote a code to try all those combinations, the issue lies a space the code adds before _cleaned, how to remove it?.
So the name should be "109 st no 103 av nb1_cleaned.xls" but my code is letting it be 109 st no 103 av nb1 _cleaned.xls
I have a Workbook "forecast.xlsx" and several Workbooks which have a individual Number in the Filename (E.g. "3960........xls", "3961.......xls etc.) in the same directory as "forecast.xlsx" + projects"
Now, I would like to browse through "forecast.xlsx" in column H, searching for hyperlinks. In Column H are these Projectnumbers located which are used in the filenames above. Whenever the Cell cointains a hyperlink, following should happen (that far i managed it by myself):
- Store the Cellvalue in a String Variable - Go to the Directory this.workbook + projects - browse this folder, searching for a File which contains the stored string in its filename - open the file - copy a range - close file - This.workbook.Activate - follow the Hyperlink which has been stored as String before - paste selection - continue browsing through column H, looking for the next hyperlink.
I have a VBA which runs bugless, but it copies the wrong range, but to the correct destination.
See the code below:
Sub RESLT_INPUT_ALL() Dim cell As Object For Counter = 1 To 1000 Set cell = Worksheets("Projects overview").Cells(Counter, 8) If cell.Hyperlinks.Count > 0 Then
I'm really looking for a way to get the full address of the external file by specifying the file name in a cell and then evaluate the formula. For example,
[Code] .....
is the full address of the source file called 'Source'. My idea is: if I just type the file name 'Source' in a workbook's cell $A$1, and in cell $B$1 I want to make the formula something like:
="C:Users["&$A$1&".xlsx]Sheet1'!$F$1"
This will make my project very impressive with this feature: a user just types the file name to establish the link and evaluate the formula for results.
so this gives a part number depending on what number is placed in O6. What I need to do know is look at 2 different cells and for each combination of numbers give a different part number. so if A1 is 2 and B1 is 3 give a certain result.
I am struggling to find a macro which can look at a name in column 'BT' and search it in the address book of Outlook to then place the email address of that person in column 'ED'
There are 35,000+ people in the address book and there may be over 5 email addresses for one name, so is there any way a message can appear for the user to select which email address is correct if there is more than 1 contact for that name?
Assume the following list of addresses are all in separate cells of a single column (A1-A4). I just need the formula to extract the street addresses, and then a separate formula to extract the zip codes.
5430-44 PASCHALL AVENUE PHILADELPHIA, PA 19143 OPA/BRT#: 884350845
4010 MARPLE STREET PHILADELPHIA, PA 19136 OPA/BRT#: 651087200
2618 SOUTH HOWARD STREET PHILADELPHIA, PA 19148 OPA/BRT#: 391251216
5737 WOODCREST AVENUE PHILADELPHIA, PA 19131 OPA/BRT#: 522155600
