ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   File directory into a listbox (https://www.excelbanter.com/excel-programming/283430-file-directory-into-listbox.html)

Richard Edwards[_3_]

File directory into a listbox
 
All,

In listbox1 I am trying to retreive the contents of directory
"k:\files\*.csv" and am having real problems in doing this.

Can anyone give me the quick answer.

Thank you.

Richard



Chip Pearson[_2_]

File directory into a listbox
 
Richard,

Try something like

Private Sub CommandButton1_Click()
Dim FName As String
With Me.ListBox1
.Clear
FName = Dir("k:\files\*.csv")
Do Until FName = ""
.AddItem FName
FName = Dir()
Loop
End With
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Richard Edwards" wrote in message
...
All,

In listbox1 I am trying to retreive the contents of directory
"k:\files\*.csv" and am having real problems in doing this.

Can anyone give me the quick answer.

Thank you.

Richard





Richard Edwards[_3_]

File directory into a listbox
 
Thank you very much. Spot on!

Just another quick question that I forgot to ask 1st time round. How do I go
about using the file I have highlighted?

ie: variable = listbox1.selection(?)

Thank you.

Richard


"Chip Pearson" wrote in message
...
Richard,

Try something like

Private Sub CommandButton1_Click()
Dim FName As String
With Me.ListBox1
.Clear
FName = Dir("k:\files\*.csv")
Do Until FName = ""
.AddItem FName
FName = Dir()
Loop
End With
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Richard Edwards" wrote in message
...
All,

In listbox1 I am trying to retreive the contents of directory
"k:\files\*.csv" and am having real problems in doing this.

Can anyone give me the quick answer.

Thank you.

Richard







Chip Pearson[_2_]

File directory into a listbox
 
Richard,

To get the selected file in the list box, use

With Me.ListBox1
If .ListIndex = 0 Then
Variable = .List(.ListIndex)
End If
End With


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Richard Edwards" wrote in message
...
Thank you very much. Spot on!

Just another quick question that I forgot to ask 1st time round. How do I

go
about using the file I have highlighted?

ie: variable = listbox1.selection(?)

Thank you.

Richard


"Chip Pearson" wrote in message
...
Richard,

Try something like

Private Sub CommandButton1_Click()
Dim FName As String
With Me.ListBox1
.Clear
FName = Dir("k:\files\*.csv")
Do Until FName = ""
.AddItem FName
FName = Dir()
Loop
End With
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Richard Edwards" wrote in message
...
All,

In listbox1 I am trying to retreive the contents of directory
"k:\files\*.csv" and am having real problems in doing this.

Can anyone give me the quick answer.

Thank you.

Richard









Richard Edwards[_3_]

File directory into a listbox
 
Got it. Thank you.


"Chip Pearson" wrote in message
...
Richard,

To get the selected file in the list box, use

With Me.ListBox1
If .ListIndex = 0 Then
Variable = .List(.ListIndex)
End If
End With


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Richard Edwards" wrote in message
...
Thank you very much. Spot on!

Just another quick question that I forgot to ask 1st time round. How do

I
go
about using the file I have highlighted?

ie: variable = listbox1.selection(?)

Thank you.

Richard


"Chip Pearson" wrote in message
...
Richard,

Try something like

Private Sub CommandButton1_Click()
Dim FName As String
With Me.ListBox1
.Clear
FName = Dir("k:\files\*.csv")
Do Until FName = ""
.AddItem FName
FName = Dir()
Loop
End With
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Richard Edwards" wrote in message
...
All,

In listbox1 I am trying to retreive the contents of directory
"k:\files\*.csv" and am having real problems in doing this.

Can anyone give me the quick answer.

Thank you.

Richard












All times are GMT +1. The time now is 08:16 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com