Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
get a sheet of a Excel file
Hi!
Has somebody an example how I get an overview of all sheets of an external excel file, select one sheet and import this sheet into the open current worksheet? All suggestions are welcome! Regards, Mike |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
get a sheet of a Excel file
Start from here
Sub ImportSheet() Dim Wkb As Workbook Dim Wkt As Worksheet Dim MsgStr As String For Each Wkb In Application.Workbooks If Wkb.Name < ThisWorkbook.Name Then For Each Wkt In Wkb.Worksheets MsgStr = "Import " & Wkt.Name & " from " & Wkb.Name & "? " If MsgBox(MsgStr, vbYesNo) = vbYes Then Wkt.Copy Befo=ThisWorkbook.Sheets(1) End If Next End If Next End Sub "Deer Hunter" ¼¶¼g©ó¶l¥ó ... Hi! Has somebody an example how I get an overview of all sheets of an external excel file, select one sheet and import this sheet into the open current worksheet? All suggestions are welcome! Regards, Mike |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
how can i lock a sheet in an excel file???? | Excel Discussion (Misc queries) | |||
Split text file into Excel sheet and separate the final results intoa new sheet | Excel Worksheet Functions | |||
why a excel file,one sheet only, take 23 Mb ? | Excel Worksheet Functions | |||
Convertion of Excel sheet file to .txt file format | Excel Discussion (Misc queries) | |||
Updating excel sheet with selected data from another sheet in the same file | Excel Worksheet Functions |