command button with labels to choose which file

[almouchie]

I have this simple code


Sub OpenFile()

ChDir "M:\George-Rola\DECEMBER"
Workbooks.Open Filename:="M:\George-Rola\DECEMBER\INVOICES-620.xls"
End Sub


but I want to have a text label in my sheet to write down which file to open, or several files & click the command button to open these file , or use these file for data input

 

[Jaafar Tribak]

Hi,

What do you mean by text labels in your sheet ? How do the labels get their text ? which commandbutton do you have to click ?

It would be helpful if you could elaborate more .

Regards.

 

[almouchie]

salam

tx for ur reply

maybe i should have elaborated more

i have a database with all invoice related data by date, supplier, & type & other data

& i have the individual invoices in different workboooks

i want to update the master file(database) with the number in each invoice
some needs calculation & multiplication of tariffs


i thought i would create a a text box to write in it the invoice file to open & take the data from it
& then click the command button to file the fields accordingly

i dont know where to start

 

[Jaafar Tribak]

Hi almouchie,

If I understand you right, you can just assign your OpenFile sub to the Button and pass the TextBox value as the Workbooks.Open argument:

Sub OpenFile() 

     ChDir "M:\George-Rola\DECEMBER" 
     Workbooks.Open TextBox1.text

End Sub

Regards.