Hey Muneera,
One last change has been done in this code where I mentioned * '*Change
done here', basically it was not taking a Slash to get inside a directory.
Now it's is working fine.
Sub XLS_to_CSV()
Dim wb As Workbook
Dim SourcePath As String
Dim strFile As String, strDir As String
Dim
Replace source line with this
Set j = Application.FileDialog(msoFileDialogFolderPicker)
j.Show
SourcePath = j.SelectedItems(1)
On Wednesday, November 26, 2014 4:40:03 PM UTC+5:30, Muneera Shabana wrote:
>
> Good Morning,
>
> Hope you are having a great day!
>
> *Objecti
Thanks Mandeep
But I dont to define the source path, rather browse and open the folder for
converting the files.
please help!
On Wednesday, 26 November 2014 12:57:30 UTC+1, Mandeep Baluja wrote:
> Sub XLS_to_CSV()
>
> Dim wb As Workbook
> Dim strFile As String, strDir As String
>
> SourcePat
Sub XLS_to_CSV()
Dim wb As Workbook
Dim strFile As String, strDir As String
SourcePath = "C:\Users\pc\Desktop\45.November.2014\"
strFile = Dir(SourcePath & "*.xlsx")
Do While strFile <> ""
Set wb = Workbooks.Open(Filename:=SourcePath & strFile, Local:=True)
newpath = "C:\Users
Sub CSV_to_XLS()
Dim wb As Workbook
Dim strFile As String, strDir As String
SourcePath = "C:\Users\pc\Desktop\45.November.2014\"
strFile = Dir(SourcePath & "*.xlsx")
Do While strFile <> ""
Set wb = Workbooks.Open(Filename:=SourcePath & strFile, Local:=True)
newpath = "C:\Users
Thank you so much It works. I made some changes to the loops to locate
the data exactly where I wanted.
Thank you again.
On Tuesday, March 25, 2014 5:41:34 PM UTC-4, Rafael DeLeon wrote:
>
>
> Hello all,
>
> I have a SQL Server Database with a store procedure that I would like to
> displa
Never mind, I received help elsewhere.
On Oct 2, 11:55 pm, vespid wrote:
> I'm making excel macros for the first time and getting things figured
> out, but I have a few questions:
>
> What code do I use to delete columns that have all empty cells EXCEPT
> the top cell (row 1) that contains any o