Hi Jyothi, Here is the link to find more details about ComboBox. Combo Box Regards
Hi, I would like to know more details about your query.
There are a few activities that you can't perform on Microsoft Excel worksheets or workbooks through the Microsoft Excel installable...
[img alt_text='' description='']http://vbaf1.com/q/wp-content/uploads/2018/05/listing.jpg[/img]
[img alt_text='' description='']http://vbaf1.com/q/wp-content/uploads/2018/05/screen.png[/img]
Dear sir Still have one more writing problem, it is taken only first rown of the invoice, second row is...
Thanks for the help. I have resolved the above isued. by giving following "Scrap items - "& VLOOKUP(B11,INDIRECT(SELECT&"!B:C"),2,0) I used...
[img alt_text='' description='']http://vbaf1.com/q/wp-content/uploads/2018/05/Untitled.jpg[/img]
I would recommend you to examine the following example :
Excel Advanced Userform & More Faster Data Searching Method
Ago in the same folder with the Excel Workbook, “records” named text file is created. Later the data are transferred into text file as separated by spaces.
Sample can be examined at the following page : Transferring Data To The Text File
New folder (if folder doesn’t exist) is created at the same place with workbook.
The workbook’s sheets as new workbooks are copied in this folder.
Dim Sheet As Worksheet, SheetName$, MyFilePath$, N&
Application.ScreenUpdating = False
MyFilePath$ = ActiveWorkbook.Path & "\" & _
Left(ThisWorkbook.Name, Len(ThisWorkbook.Name) - 4)
.ScreenUpdating = False
.DisplayAlerts = False
On Error Resume Next
For N = 1 To Sheets.Count
SheetName = ActiveSheet.Name
.Name = SheetName
.SaveAs Filename:=MyFilePath _
& "\" & SheetName & ".xls"
.CutCopyMode = False
Application.ScreenUpdating = True
MsgBox "The Process Was Carried Out Successfully", vbInformation
Working Template Can Be Downloaded Here