0 Reputation Points
Unknown Quality Score
No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
1 Posted Topic
 | [QUOTE=daskeyboard]Anyone have another suggestion - the microsoft example is slightly prolix.[/QUOTE] :) Dim xlsApp As Excel.Application Dim xlsWB As Excel.Workbook Dim xlsSheet As Excel.Worksheet Dim xlsCell As Excel.Range Dim xlsDatei As String xlsApp = New Excel.Application xlsApp.Visible = True xlsWB = xlsApp.Workbooks.Open(Path) xlsSheet = xlsWB.Worksheets(1) xlsCell = xlsSheet.Range("A1") Greetings from …  |
The End.