User Input File Name
I want to be able to call a workbook (to copy data from)
based on the file name that the user inputs. The workbook to be called would be already open (but there would likely be other workbooks also open at the same time). I tried something like this: Dim RawDataSheet As String RawDataSheet = InputBox("What is the name of the file that contains the raw data?") Windows("RawDataSheet").Activate Range("A1").Select Thanks in advance |
User Input File Name
You put your variable name in quotes. That won't work, unless you have a
window with a caption of RawDataSheet. Try: Dim RawDataSheet As String RawDataSheet = InputBox("What is the name of the file that contains the raw data?") Windows(RawDataSheet).Activate Range("A1").Select You may want to do something like "If Left(RawDataSheet, 4) < ".xls" Then RawDataSheet = RawDataSheet & ".xls" or put in some sort of error handling at least. Ray at work "kem" wrote in message ... I want to be able to call a workbook (to copy data from) based on the file name that the user inputs. The workbook to be called would be already open (but there would likely be other workbooks also open at the same time). I tried something like this: Dim RawDataSheet As String RawDataSheet = InputBox("What is the name of the file that contains the raw data?") Windows("RawDataSheet").Activate Range("A1").Select Thanks in advance |
User Input File Name
kem
One method(among others). Dim RawDataSheet As String RawDataSheet = InputBox("What is the name of the file_ that contains the raw data?") Application.Workbooks(RawDataSheet & ".xls").Activate Range("A1").Select End Sub Gord Dibben Excel MVP - XL97 SR2 & XL2002 On Mon, 14 Jul 2003 13:28:35 -0700, "kem" wrote: I want to be able to call a workbook (to copy data from) based on the file name that the user inputs. The workbook to be called would be already open (but there would likely be other workbooks also open at the same time). I tried something like this: Dim RawDataSheet As String RawDataSheet = InputBox("What is the name of the file that contains the raw data?") Windows("RawDataSheet").Activate Range("A1").Select Thanks in advance |
All times are GMT +1. The time now is 04:09 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com